blob: c4a01bd10ca1ec22b2020e1aa6e1c06bef37b249 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
/*
* Smithsonian Astrophysical Observatory, Cambridge, MA, USA
* This code has been modified under the terms listed below and is made
* available under the same terms.
*/
/*
*---------------------------------------------------------------------------
*
* Blt_OpSpec --
*
* Structure to specify a set of operations for a TCL command.
* This is passed to the Blt_GetOp procedure to look
* for a function pointer associated with the operation name.
*
*---------------------------------------------------------------------------
*/
typedef struct {
const char *name; /* Name of operation */
int minChars; /* Minimum # characters to disambiguate */
void *proc;
int minArgs; /* Minimum # args required */
int maxArgs; /* Maximum # args required */
const char *usage; /* Usage message */
} Blt_OpSpec;
typedef enum {
BLT_OP_ARG0, /* Op is the first argument. */
BLT_OP_ARG1, /* Op is the second argument. */
BLT_OP_ARG2, /* Op is the third argument. */
BLT_OP_ARG3, /* Op is the fourth argument. */
BLT_OP_ARG4 /* Op is the fifth argument. */
} Blt_OpIndex;
#define BLT_OP_BINARY_SEARCH 0
#define BLT_OP_LINEAR_SEARCH 1
extern void *Blt_GetOpFromObj(Tcl_Interp *interp, int nSpecs,
Blt_OpSpec *specs, int operPos, int objc, Tcl_Obj *const *objv,
int flags);
|