Mercurial > repos > rliterman > csp2

comparison CSP2/CSP2_env/env-d9b9114564458d9d-741b3de822f2aaca6c6caa4325c4afce/include/itclDecls.h @ 69:33d812a61356

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit 2e9511a184a1ca667c7be0c6321a36dc4e3d116d
author jpayne
date Tue, 18 Mar 2025 17:55:14 -0400
parents
children
comparison
equal deleted inserted replaced
67:0e9998148a16 69:33d812a61356
1 /*
2 * This file is (mostly) automatically generated from itcl.decls.
3 */
4
5 #ifndef _ITCLDECLS
6 #define _ITCLDECLS
7
8 #if defined(USE_ITCL_STUBS)
9
10 ITCLAPI const char *Itcl_InitStubs(
11 Tcl_Interp *, const char *version, int exact);
12 #else
13
14 #define Itcl_InitStubs(interp, version, exact) Tcl_PkgRequireEx(interp,"itcl",version,exact,NULL)
15
16 #endif
17
18
19 /* !BEGIN!: Do not edit below this line. */
20
21 #define ITCL_STUBS_EPOCH 0
22 #define ITCL_STUBS_REVISION 153
23
24 #ifdef __cplusplus
25 extern "C" {
26 #endif
27
28 /*
29 * Exported function declarations:
30 */
31
32 /* Slot 0 is reserved */
33 /* Slot 1 is reserved */
34 /* 2 */
35 ITCLAPI int Itcl_RegisterC(Tcl_Interp *interp, const char *name,
36 Tcl_CmdProc *proc, void *clientData,
37 Tcl_CmdDeleteProc *deleteProc);
38 /* 3 */
39 ITCLAPI int Itcl_RegisterObjC(Tcl_Interp *interp,
40 const char *name, Tcl_ObjCmdProc *proc,
41 void *clientData,
42 Tcl_CmdDeleteProc *deleteProc);
43 /* 4 */
44 ITCLAPI int Itcl_FindC(Tcl_Interp *interp, const char *name,
45 Tcl_CmdProc **argProcPtr,
46 Tcl_ObjCmdProc **objProcPtr, void **cDataPtr);
47 /* 5 */
48 ITCLAPI void Itcl_InitStack(Itcl_Stack *stack);
49 /* 6 */
50 ITCLAPI void Itcl_DeleteStack(Itcl_Stack *stack);
51 /* 7 */
52 ITCLAPI void Itcl_PushStack(void *cdata, Itcl_Stack *stack);
53 /* 8 */
54 ITCLAPI void * Itcl_PopStack(Itcl_Stack *stack);
55 /* 9 */
56 ITCLAPI void * Itcl_PeekStack(Itcl_Stack *stack);
57 /* 10 */
58 ITCLAPI void * Itcl_GetStackValue(Itcl_Stack *stack, int pos);
59 /* 11 */
60 ITCLAPI void Itcl_InitList(Itcl_List *listPtr);
61 /* 12 */
62 ITCLAPI void Itcl_DeleteList(Itcl_List *listPtr);
63 /* 13 */
64 ITCLAPI Itcl_ListElem * Itcl_CreateListElem(Itcl_List *listPtr);
65 /* 14 */
66 ITCLAPI Itcl_ListElem * Itcl_DeleteListElem(Itcl_ListElem *elemPtr);
67 /* 15 */
68 ITCLAPI Itcl_ListElem * Itcl_InsertList(Itcl_List *listPtr, void *val);
69 /* 16 */
70 ITCLAPI Itcl_ListElem * Itcl_InsertListElem(Itcl_ListElem *pos, void *val);
71 /* 17 */
72 ITCLAPI Itcl_ListElem * Itcl_AppendList(Itcl_List *listPtr, void *val);
73 /* 18 */
74 ITCLAPI Itcl_ListElem * Itcl_AppendListElem(Itcl_ListElem *pos, void *val);
75 /* 19 */
76 ITCLAPI void Itcl_SetListValue(Itcl_ListElem *elemPtr, void *val);
77 /* 20 */
78 ITCLAPI void Itcl_EventuallyFree(void *cdata, Tcl_FreeProc *fproc);
79 /* 21 */
80 ITCLAPI void Itcl_PreserveData(void *cdata);
81 /* 22 */
82 ITCLAPI void Itcl_ReleaseData(void *cdata);
83 /* 23 */
84 ITCLAPI Itcl_InterpState Itcl_SaveInterpState(Tcl_Interp *interp, int status);
85 /* 24 */
86 ITCLAPI int Itcl_RestoreInterpState(Tcl_Interp *interp,
87 Itcl_InterpState state);
88 /* 25 */
89 ITCLAPI void Itcl_DiscardInterpState(Itcl_InterpState state);
90 /* 26 */
91 ITCLAPI void * Itcl_Alloc(size_t size);
92 /* 27 */
93 ITCLAPI void Itcl_Free(void *ptr);
94 /* 28 */
95 ITCLAPI void * ItclGetStackValue(Itcl_Stack *stack, size_t pos);
96
97 typedef struct {
98 const struct ItclIntStubs *itclIntStubs;
99 } ItclStubHooks;
100
101 typedef struct ItclStubs {
102 int magic;
103 int epoch;
104 int revision;
105 const ItclStubHooks *hooks;
106
107 void (*reserved0)(void);
108 void (*reserved1)(void);
109 int (*itcl_RegisterC) (Tcl_Interp *interp, const char *name, Tcl_CmdProc *proc, void *clientData, Tcl_CmdDeleteProc *deleteProc); /* 2 */
110 int (*itcl_RegisterObjC) (Tcl_Interp *interp, const char *name, Tcl_ObjCmdProc *proc, void *clientData, Tcl_CmdDeleteProc *deleteProc); /* 3 */
111 int (*itcl_FindC) (Tcl_Interp *interp, const char *name, Tcl_CmdProc **argProcPtr, Tcl_ObjCmdProc **objProcPtr, void **cDataPtr); /* 4 */
112 void (*itcl_InitStack) (Itcl_Stack *stack); /* 5 */
113 void (*itcl_DeleteStack) (Itcl_Stack *stack); /* 6 */
114 void (*itcl_PushStack) (void *cdata, Itcl_Stack *stack); /* 7 */
115 void * (*itcl_PopStack) (Itcl_Stack *stack); /* 8 */
116 void * (*itcl_PeekStack) (Itcl_Stack *stack); /* 9 */
117 void * (*itcl_GetStackValue) (Itcl_Stack *stack, int pos); /* 10 */
118 void (*itcl_InitList) (Itcl_List *listPtr); /* 11 */
119 void (*itcl_DeleteList) (Itcl_List *listPtr); /* 12 */
120 Itcl_ListElem * (*itcl_CreateListElem) (Itcl_List *listPtr); /* 13 */
121 Itcl_ListElem * (*itcl_DeleteListElem) (Itcl_ListElem *elemPtr); /* 14 */
122 Itcl_ListElem * (*itcl_InsertList) (Itcl_List *listPtr, void *val); /* 15 */
123 Itcl_ListElem * (*itcl_InsertListElem) (Itcl_ListElem *pos, void *val); /* 16 */
124 Itcl_ListElem * (*itcl_AppendList) (Itcl_List *listPtr, void *val); /* 17 */
125 Itcl_ListElem * (*itcl_AppendListElem) (Itcl_ListElem *pos, void *val); /* 18 */
126 void (*itcl_SetListValue) (Itcl_ListElem *elemPtr, void *val); /* 19 */
127 void (*itcl_EventuallyFree) (void *cdata, Tcl_FreeProc *fproc); /* 20 */
128 void (*itcl_PreserveData) (void *cdata); /* 21 */
129 void (*itcl_ReleaseData) (void *cdata); /* 22 */
130 Itcl_InterpState (*itcl_SaveInterpState) (Tcl_Interp *interp, int status); /* 23 */
131 int (*itcl_RestoreInterpState) (Tcl_Interp *interp, Itcl_InterpState state); /* 24 */
132 void (*itcl_DiscardInterpState) (Itcl_InterpState state); /* 25 */
133 void * (*itcl_Alloc) (size_t size); /* 26 */
134 void (*itcl_Free) (void *ptr); /* 27 */
135 void * (*itclGetStackValue) (Itcl_Stack *stack, size_t pos); /* 28 */
136 } ItclStubs;
137
138 extern const ItclStubs *itclStubsPtr;
139
140 #ifdef __cplusplus
141 }
142 #endif
143
144 #if defined(USE_ITCL_STUBS)
145
146 /*
147 * Inline function declarations:
148 */
149
150 /* Slot 0 is reserved */
151 /* Slot 1 is reserved */
152 #define Itcl_RegisterC \
153 (itclStubsPtr->itcl_RegisterC) /* 2 */
154 #define Itcl_RegisterObjC \
155 (itclStubsPtr->itcl_RegisterObjC) /* 3 */
156 #define Itcl_FindC \
157 (itclStubsPtr->itcl_FindC) /* 4 */
158 #define Itcl_InitStack \
159 (itclStubsPtr->itcl_InitStack) /* 5 */
160 #define Itcl_DeleteStack \
161 (itclStubsPtr->itcl_DeleteStack) /* 6 */
162 #define Itcl_PushStack \
163 (itclStubsPtr->itcl_PushStack) /* 7 */
164 #define Itcl_PopStack \
165 (itclStubsPtr->itcl_PopStack) /* 8 */
166 #define Itcl_PeekStack \
167 (itclStubsPtr->itcl_PeekStack) /* 9 */
168 #define Itcl_GetStackValue \
169 (itclStubsPtr->itcl_GetStackValue) /* 10 */
170 #define Itcl_InitList \
171 (itclStubsPtr->itcl_InitList) /* 11 */
172 #define Itcl_DeleteList \
173 (itclStubsPtr->itcl_DeleteList) /* 12 */
174 #define Itcl_CreateListElem \
175 (itclStubsPtr->itcl_CreateListElem) /* 13 */
176 #define Itcl_DeleteListElem \
177 (itclStubsPtr->itcl_DeleteListElem) /* 14 */
178 #define Itcl_InsertList \
179 (itclStubsPtr->itcl_InsertList) /* 15 */
180 #define Itcl_InsertListElem \
181 (itclStubsPtr->itcl_InsertListElem) /* 16 */
182 #define Itcl_AppendList \
183 (itclStubsPtr->itcl_AppendList) /* 17 */
184 #define Itcl_AppendListElem \
185 (itclStubsPtr->itcl_AppendListElem) /* 18 */
186 #define Itcl_SetListValue \
187 (itclStubsPtr->itcl_SetListValue) /* 19 */
188 #define Itcl_EventuallyFree \
189 (itclStubsPtr->itcl_EventuallyFree) /* 20 */
190 #define Itcl_PreserveData \
191 (itclStubsPtr->itcl_PreserveData) /* 21 */
192 #define Itcl_ReleaseData \
193 (itclStubsPtr->itcl_ReleaseData) /* 22 */
194 #define Itcl_SaveInterpState \
195 (itclStubsPtr->itcl_SaveInterpState) /* 23 */
196 #define Itcl_RestoreInterpState \
197 (itclStubsPtr->itcl_RestoreInterpState) /* 24 */
198 #define Itcl_DiscardInterpState \
199 (itclStubsPtr->itcl_DiscardInterpState) /* 25 */
200 #define Itcl_Alloc \
201 (itclStubsPtr->itcl_Alloc) /* 26 */
202 #define Itcl_Free \
203 (itclStubsPtr->itcl_Free) /* 27 */
204 #define ItclGetStackValue \
205 (itclStubsPtr->itclGetStackValue) /* 28 */
206
207 #endif /* defined(USE_ITCL_STUBS) */
208
209 /* !END!: Do not edit above this line. */
210
211 #if TCL_MAJOR_VERSION > 8
212 # undef Itcl_GetStackValue
213 # define Itcl_GetStackValue ItclGetStackValue
214 #endif
215
216 #endif /* _ITCLDECLS */