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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
/* !BEGIN!: Do not edit below this line. */
#ifdef __cplusplus
extern "C" {
#endif
/*
* Exported function declarations:
*/
/* 0 */
EXTERN int Blt_CreateVector(Tcl_Interp*interp,
const char *vecName, int size,
Blt_Vector**vecPtrPtr);
/* 1 */
EXTERN int Blt_CreateVector2(Tcl_Interp*interp,
const char *vecName, const char *cmdName,
const char *varName, int initialSize,
Blt_Vector **vecPtrPtr);
/* 2 */
EXTERN int Blt_DeleteVectorByName(Tcl_Interp*interp,
const char *vecName);
/* 3 */
EXTERN int Blt_DeleteVector(Blt_Vector *vecPtr);
/* 4 */
EXTERN int Blt_GetVector(Tcl_Interp*interp, const char *vecName,
Blt_Vector **vecPtrPtr);
/* 5 */
EXTERN int Blt_GetVectorFromObj(Tcl_Interp*interp,
Tcl_Obj *objPtr, Blt_Vector **vecPtrPtr);
/* 6 */
EXTERN int Blt_ResetVector(Blt_Vector *vecPtr, double *dataArr,
int n, int arraySize, Tcl_FreeProc *freeProc);
/* 7 */
EXTERN int Blt_ResizeVector(Blt_Vector *vecPtr, int n);
/* 8 */
EXTERN int Blt_VectorExists(Tcl_Interp*interp,
const char *vecName);
/* 9 */
EXTERN int Blt_VectorExists2(Tcl_Interp*interp,
const char *vecName);
/* 10 */
EXTERN Blt_VectorId Blt_AllocVectorId(Tcl_Interp*interp,
const char *vecName);
/* 11 */
EXTERN int Blt_GetVectorById(Tcl_Interp*interp,
Blt_VectorId clientId,
Blt_Vector **vecPtrPtr);
/* 12 */
EXTERN void Blt_SetVectorChangedProc(Blt_VectorId clientId,
Blt_VectorChangedProc *proc,
ClientData clientData);
/* 13 */
EXTERN void Blt_FreeVectorId(Blt_VectorId clientId);
/* 14 */
EXTERN const char * Blt_NameOfVectorId(Blt_VectorId clientId);
/* 15 */
EXTERN const char * Blt_NameOfVector(Blt_Vector *vecPtr);
/* 16 */
EXTERN int Blt_ExprVector(Tcl_Interp*interp, char *expr,
Blt_Vector *vecPtr);
/* 17 */
EXTERN void Blt_InstallIndexProc(Tcl_Interp*interp,
const char *indexName,
Blt_VectorIndexProc *procPtr);
/* 18 */
EXTERN double Blt_VecMin(Blt_Vector *vPtr);
/* 19 */
EXTERN double Blt_VecMax(Blt_Vector *vPtr);
typedef struct TkbltStubs {
int magic;
void *hooks;
int (*blt_CreateVector) (Tcl_Interp*interp, const char *vecName, int size, Blt_Vector**vecPtrPtr); /* 0 */
int (*blt_CreateVector2) (Tcl_Interp*interp, const char *vecName, const char *cmdName, const char *varName, int initialSize, Blt_Vector **vecPtrPtr); /* 1 */
int (*blt_DeleteVectorByName) (Tcl_Interp*interp, const char *vecName); /* 2 */
int (*blt_DeleteVector) (Blt_Vector *vecPtr); /* 3 */
int (*blt_GetVector) (Tcl_Interp*interp, const char *vecName, Blt_Vector **vecPtrPtr); /* 4 */
int (*blt_GetVectorFromObj) (Tcl_Interp*interp, Tcl_Obj *objPtr, Blt_Vector **vecPtrPtr); /* 5 */
int (*blt_ResetVector) (Blt_Vector *vecPtr, double *dataArr, int n, int arraySize, Tcl_FreeProc *freeProc); /* 6 */
int (*blt_ResizeVector) (Blt_Vector *vecPtr, int n); /* 7 */
int (*blt_VectorExists) (Tcl_Interp*interp, const char *vecName); /* 8 */
int (*blt_VectorExists2) (Tcl_Interp*interp, const char *vecName); /* 9 */
Blt_VectorId (*blt_AllocVectorId) (Tcl_Interp*interp, const char *vecName); /* 10 */
int (*blt_GetVectorById) (Tcl_Interp*interp, Blt_VectorId clientId, Blt_Vector **vecPtrPtr); /* 11 */
void (*blt_SetVectorChangedProc) (Blt_VectorId clientId, Blt_VectorChangedProc *proc, ClientData clientData); /* 12 */
void (*blt_FreeVectorId) (Blt_VectorId clientId); /* 13 */
const char * (*blt_NameOfVectorId) (Blt_VectorId clientId); /* 14 */
const char * (*blt_NameOfVector) (Blt_Vector *vecPtr); /* 15 */
int (*blt_ExprVector) (Tcl_Interp*interp, char *expr, Blt_Vector *vecPtr); /* 16 */
void (*blt_InstallIndexProc) (Tcl_Interp*interp, const char *indexName, Blt_VectorIndexProc *procPtr); /* 17 */
double (*blt_VecMin) (Blt_Vector *vPtr); /* 18 */
double (*blt_VecMax) (Blt_Vector *vPtr); /* 19 */
} TkbltStubs;
extern const TkbltStubs *tkbltStubsPtr;
#ifdef __cplusplus
}
#endif
#if defined(USE_TKBLT_STUBS)
/*
* Inline function declarations:
*/
#define Blt_CreateVector \
(tkbltStubsPtr->blt_CreateVector) /* 0 */
#define Blt_CreateVector2 \
(tkbltStubsPtr->blt_CreateVector2) /* 1 */
#define Blt_DeleteVectorByName \
(tkbltStubsPtr->blt_DeleteVectorByName) /* 2 */
#define Blt_DeleteVector \
(tkbltStubsPtr->blt_DeleteVector) /* 3 */
#define Blt_GetVector \
(tkbltStubsPtr->blt_GetVector) /* 4 */
#define Blt_GetVectorFromObj \
(tkbltStubsPtr->blt_GetVectorFromObj) /* 5 */
#define Blt_ResetVector \
(tkbltStubsPtr->blt_ResetVector) /* 6 */
#define Blt_ResizeVector \
(tkbltStubsPtr->blt_ResizeVector) /* 7 */
#define Blt_VectorExists \
(tkbltStubsPtr->blt_VectorExists) /* 8 */
#define Blt_VectorExists2 \
(tkbltStubsPtr->blt_VectorExists2) /* 9 */
#define Blt_AllocVectorId \
(tkbltStubsPtr->blt_AllocVectorId) /* 10 */
#define Blt_GetVectorById \
(tkbltStubsPtr->blt_GetVectorById) /* 11 */
#define Blt_SetVectorChangedProc \
(tkbltStubsPtr->blt_SetVectorChangedProc) /* 12 */
#define Blt_FreeVectorId \
(tkbltStubsPtr->blt_FreeVectorId) /* 13 */
#define Blt_NameOfVectorId \
(tkbltStubsPtr->blt_NameOfVectorId) /* 14 */
#define Blt_NameOfVector \
(tkbltStubsPtr->blt_NameOfVector) /* 15 */
#define Blt_ExprVector \
(tkbltStubsPtr->blt_ExprVector) /* 16 */
#define Blt_InstallIndexProc \
(tkbltStubsPtr->blt_InstallIndexProc) /* 17 */
#define Blt_VecMin \
(tkbltStubsPtr->blt_VecMin) /* 18 */
#define Blt_VecMax \
(tkbltStubsPtr->blt_VecMax) /* 19 */
#endif /* defined(USE_TKBLT_STUBS) */
/* !END!: Do not edit above this line. */
|
