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

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 _ITCLINTDECLS
6 #define _ITCLINTDECLS
7
8 /* !BEGIN!: Do not edit below this line. */
9
10 #define ITCLINT_STUBS_EPOCH 0
11 #define ITCLINT_STUBS_REVISION 153
12
13 #ifdef __cplusplus
14 extern "C" {
15 #endif
16
17 /*
18 * Exported function declarations:
19 */
20
21 /* 0 */
22 ITCLAPI int Itcl_IsClassNamespace(Tcl_Namespace *namesp);
23 /* 1 */
24 ITCLAPI int Itcl_IsClass(Tcl_Command cmd);
25 /* 2 */
26 ITCLAPI ItclClass * Itcl_FindClass(Tcl_Interp *interp, const char *path,
27 int autoload);
28 /* 3 */
29 ITCLAPI int Itcl_FindObject(Tcl_Interp *interp, const char *name,
30 ItclObject **roPtr);
31 /* 4 */
32 ITCLAPI int Itcl_IsObject(Tcl_Command cmd);
33 /* 5 */
34 ITCLAPI int Itcl_ObjectIsa(ItclObject *contextObj,
35 ItclClass *cdefn);
36 /* 6 */
37 ITCLAPI int Itcl_Protection(Tcl_Interp *interp, int newLevel);
38 /* 7 */
39 ITCLAPI const char * Itcl_ProtectionStr(int pLevel);
40 /* 8 */
41 ITCLAPI int Itcl_CanAccess(ItclMemberFunc *memberPtr,
42 Tcl_Namespace *fromNsPtr);
43 /* 9 */
44 ITCLAPI int Itcl_CanAccessFunc(ItclMemberFunc *mfunc,
45 Tcl_Namespace *fromNsPtr);
46 /* Slot 10 is reserved */
47 /* 11 */
48 ITCLAPI void Itcl_ParseNamespPath(const char *name,
49 Tcl_DString *buffer, const char **head,
50 const char **tail);
51 /* 12 */
52 ITCLAPI int Itcl_DecodeScopedCommand(Tcl_Interp *interp,
53 const char *name, Tcl_Namespace **rNsPtr,
54 char **rCmdPtr);
55 /* 13 */
56 ITCLAPI int Itcl_EvalArgs(Tcl_Interp *interp, Tcl_Size objc,
57 Tcl_Obj *const objv[]);
58 /* 14 */
59 ITCLAPI Tcl_Obj * Itcl_CreateArgs(Tcl_Interp *interp,
60 const char *string, Tcl_Size objc,
61 Tcl_Obj *const objv[]);
62 /* Slot 15 is reserved */
63 /* Slot 16 is reserved */
64 /* 17 */
65 ITCLAPI int Itcl_GetContext(Tcl_Interp *interp,
66 ItclClass **iclsPtrPtr,
67 ItclObject **ioPtrPtr);
68 /* 18 */
69 ITCLAPI void Itcl_InitHierIter(ItclHierIter *iter,
70 ItclClass *iclsPtr);
71 /* 19 */
72 ITCLAPI void Itcl_DeleteHierIter(ItclHierIter *iter);
73 /* 20 */
74 ITCLAPI ItclClass * Itcl_AdvanceHierIter(ItclHierIter *iter);
75 /* 21 */
76 ITCLAPI int Itcl_FindClassesCmd(void *clientData,
77 Tcl_Interp *interp, int objc,
78 Tcl_Obj *const objv[]);
79 /* 22 */
80 ITCLAPI int Itcl_FindObjectsCmd(void *clientData,
81 Tcl_Interp *interp, int objc,
82 Tcl_Obj *const objv[]);
83 /* Slot 23 is reserved */
84 /* 24 */
85 ITCLAPI int Itcl_DelClassCmd(void *clientData,
86 Tcl_Interp *interp, int objc,
87 Tcl_Obj *const objv[]);
88 /* 25 */
89 ITCLAPI int Itcl_DelObjectCmd(void *clientData,
90 Tcl_Interp *interp, int objc,
91 Tcl_Obj *const objv[]);
92 /* 26 */
93 ITCLAPI int Itcl_ScopeCmd(void *clientData, Tcl_Interp *interp,
94 int objc, Tcl_Obj *const objv[]);
95 /* 27 */
96 ITCLAPI int Itcl_CodeCmd(void *clientData, Tcl_Interp *interp,
97 int objc, Tcl_Obj *const objv[]);
98 /* 28 */
99 ITCLAPI int Itcl_StubCreateCmd(void *clientData,
100 Tcl_Interp *interp, int objc,
101 Tcl_Obj *const objv[]);
102 /* 29 */
103 ITCLAPI int Itcl_StubExistsCmd(void *clientData,
104 Tcl_Interp *interp, int objc,
105 Tcl_Obj *const objv[]);
106 /* 30 */
107 ITCLAPI int Itcl_IsStub(Tcl_Command cmd);
108 /* 31 */
109 ITCLAPI int Itcl_CreateClass(Tcl_Interp *interp,
110 const char *path, ItclObjectInfo *info,
111 ItclClass **rPtr);
112 /* 32 */
113 ITCLAPI int Itcl_DeleteClass(Tcl_Interp *interp,
114 ItclClass *iclsPtr);
115 /* 33 */
116 ITCLAPI Tcl_Namespace * Itcl_FindClassNamespace(Tcl_Interp *interp,
117 const char *path);
118 /* 34 */
119 ITCLAPI int Itcl_HandleClass(void *clientData,
120 Tcl_Interp *interp, int objc,
121 Tcl_Obj *const objv[]);
122 /* Slot 35 is reserved */
123 /* Slot 36 is reserved */
124 /* Slot 37 is reserved */
125 /* 38 */
126 ITCLAPI void Itcl_BuildVirtualTables(ItclClass *iclsPtr);
127 /* 39 */
128 ITCLAPI int Itcl_CreateVariable(Tcl_Interp *interp,
129 ItclClass *iclsPtr, Tcl_Obj *name,
130 char *init, char *config,
131 ItclVariable **ivPtr);
132 /* 40 */
133 ITCLAPI void Itcl_DeleteVariable(char *cdata);
134 /* 41 */
135 ITCLAPI const char * Itcl_GetCommonVar(Tcl_Interp *interp,
136 const char *name, ItclClass *contextClass);
137 /* Slot 42 is reserved */
138 /* Slot 43 is reserved */
139 /* 44 */
140 ITCLAPI int Itcl_CreateObject(Tcl_Interp *interp,
141 const char*name, ItclClass *iclsPtr,
142 Tcl_Size objc, Tcl_Obj *const objv[],
143 ItclObject **rioPtr);
144 /* 45 */
145 ITCLAPI int Itcl_DeleteObject(Tcl_Interp *interp,
146 ItclObject *contextObj);
147 /* 46 */
148 ITCLAPI int Itcl_DestructObject(Tcl_Interp *interp,
149 ItclObject *contextObj, int flags);
150 /* Slot 47 is reserved */
151 /* 48 */
152 ITCLAPI const char * Itcl_GetInstanceVar(Tcl_Interp *interp,
153 const char *name, ItclObject *contextIoPtr,
154 ItclClass *contextIclsPtr);
155 /* Slot 49 is reserved */
156 /* 50 */
157 ITCLAPI int Itcl_BodyCmd(void *dummy, Tcl_Interp *interp,
158 int objc, Tcl_Obj *const objv[]);
159 /* 51 */
160 ITCLAPI int Itcl_ConfigBodyCmd(void *dummy, Tcl_Interp *interp,
161 int objc, Tcl_Obj *const objv[]);
162 /* 52 */
163 ITCLAPI int Itcl_CreateMethod(Tcl_Interp *interp,
164 ItclClass *iclsPtr, Tcl_Obj *namePtr,
165 const char *arglist, const char *body);
166 /* 53 */
167 ITCLAPI int Itcl_CreateProc(Tcl_Interp *interp,
168 ItclClass *iclsPtr, Tcl_Obj *namePtr,
169 const char *arglist, const char *body);
170 /* 54 */
171 ITCLAPI int Itcl_CreateMemberFunc(Tcl_Interp *interp,
172 ItclClass *iclsPtr, Tcl_Obj *name,
173 const char *arglist, const char *body,
174 ItclMemberFunc **mfuncPtr);
175 /* 55 */
176 ITCLAPI int Itcl_ChangeMemberFunc(Tcl_Interp *interp,
177 ItclMemberFunc *mfunc, const char *arglist,
178 const char *body);
179 /* 56 */
180 ITCLAPI void Itcl_DeleteMemberFunc(void *cdata);
181 /* 57 */
182 ITCLAPI int Itcl_CreateMemberCode(Tcl_Interp *interp,
183 ItclClass *iclsPtr, const char *arglist,
184 const char *body, ItclMemberCode **mcodePtr);
185 /* 58 */
186 ITCLAPI void Itcl_DeleteMemberCode(void *cdata);
187 /* 59 */
188 ITCLAPI int Itcl_GetMemberCode(Tcl_Interp *interp,
189 ItclMemberFunc *mfunc);
190 /* Slot 60 is reserved */
191 /* 61 */
192 ITCLAPI int Itcl_EvalMemberCode(Tcl_Interp *interp,
193 ItclMemberFunc *mfunc,
194 ItclObject *contextObj, Tcl_Size objc,
195 Tcl_Obj *const objv[]);
196 /* Slot 62 is reserved */
197 /* Slot 63 is reserved */
198 /* Slot 64 is reserved */
199 /* Slot 65 is reserved */
200 /* Slot 66 is reserved */
201 /* 67 */
202 ITCLAPI void Itcl_GetMemberFuncUsage(ItclMemberFunc *mfunc,
203 ItclObject *contextObj, Tcl_Obj *objPtr);
204 /* 68 */
205 ITCLAPI int Itcl_ExecMethod(void *clientData, Tcl_Interp *interp,
206 int objc, Tcl_Obj *const objv[]);
207 /* 69 */
208 ITCLAPI int Itcl_ExecProc(void *clientData, Tcl_Interp *interp,
209 int objc, Tcl_Obj *const objv[]);
210 /* Slot 70 is reserved */
211 /* 71 */
212 ITCLAPI int Itcl_ConstructBase(Tcl_Interp *interp,
213 ItclObject *contextObj,
214 ItclClass *contextClass);
215 /* 72 */
216 ITCLAPI int Itcl_InvokeMethodIfExists(Tcl_Interp *interp,
217 const char *name, ItclClass *contextClass,
218 ItclObject *contextObj, Tcl_Size objc,
219 Tcl_Obj *const objv[]);
220 /* Slot 73 is reserved */
221 /* 74 */
222 ITCLAPI int Itcl_ReportFuncErrors(Tcl_Interp *interp,
223 ItclMemberFunc *mfunc,
224 ItclObject *contextObj, int result);
225 /* 75 */
226 ITCLAPI int Itcl_ParseInit(Tcl_Interp *interp,
227 ItclObjectInfo *info);
228 /* 76 */
229 ITCLAPI int Itcl_ClassCmd(void *clientData, Tcl_Interp *interp,
230 int objc, Tcl_Obj *const objv[]);
231 /* 77 */
232 ITCLAPI int Itcl_ClassInheritCmd(void *clientData,
233 Tcl_Interp *interp, int objc,
234 Tcl_Obj *const objv[]);
235 /* 78 */
236 ITCLAPI int Itcl_ClassProtectionCmd(void *clientData,
237 Tcl_Interp *interp, int objc,
238 Tcl_Obj *const objv[]);
239 /* 79 */
240 ITCLAPI int Itcl_ClassConstructorCmd(void *clientData,
241 Tcl_Interp *interp, int objc,
242 Tcl_Obj *const objv[]);
243 /* 80 */
244 ITCLAPI int Itcl_ClassDestructorCmd(void *clientData,
245 Tcl_Interp *interp, int objc,
246 Tcl_Obj *const objv[]);
247 /* 81 */
248 ITCLAPI int Itcl_ClassMethodCmd(void *clientData,
249 Tcl_Interp *interp, int objc,
250 Tcl_Obj *const objv[]);
251 /* 82 */
252 ITCLAPI int Itcl_ClassProcCmd(void *clientData,
253 Tcl_Interp *interp, int objc,
254 Tcl_Obj *const objv[]);
255 /* 83 */
256 ITCLAPI int Itcl_ClassVariableCmd(void *clientData,
257 Tcl_Interp *interp, int objc,
258 Tcl_Obj *const objv[]);
259 /* 84 */
260 ITCLAPI int Itcl_ClassCommonCmd(void *clientData,
261 Tcl_Interp *interp, int objc,
262 Tcl_Obj *const objv[]);
263 /* 85 */
264 ITCLAPI int Itcl_ParseVarResolver(Tcl_Interp *interp,
265 const char *name, Tcl_Namespace *contextNs,
266 int flags, Tcl_Var *rPtr);
267 /* 86 */
268 ITCLAPI int Itcl_BiInit(Tcl_Interp *interp,
269 ItclObjectInfo *infoPtr);
270 /* 87 */
271 ITCLAPI int Itcl_InstallBiMethods(Tcl_Interp *interp,
272 ItclClass *cdefn);
273 /* 88 */
274 ITCLAPI int Itcl_BiIsaCmd(void *clientData, Tcl_Interp *interp,
275 int objc, Tcl_Obj *const objv[]);
276 /* 89 */
277 ITCLAPI int Itcl_BiConfigureCmd(void *clientData,
278 Tcl_Interp *interp, int objc,
279 Tcl_Obj *const objv[]);
280 /* 90 */
281 ITCLAPI int Itcl_BiCgetCmd(void *clientData, Tcl_Interp *interp,
282 int objc, Tcl_Obj *const objv[]);
283 /* 91 */
284 ITCLAPI int Itcl_BiChainCmd(void *dummy, Tcl_Interp *interp,
285 int objc, Tcl_Obj *const objv[]);
286 /* 92 */
287 ITCLAPI int Itcl_BiInfoClassCmd(void *dummy, Tcl_Interp *interp,
288 int objc, Tcl_Obj *const objv[]);
289 /* 93 */
290 ITCLAPI int Itcl_BiInfoInheritCmd(void *dummy,
291 Tcl_Interp *interp, int objc,
292 Tcl_Obj *const objv[]);
293 /* 94 */
294 ITCLAPI int Itcl_BiInfoHeritageCmd(void *dummy,
295 Tcl_Interp *interp, int objc,
296 Tcl_Obj *const objv[]);
297 /* 95 */
298 ITCLAPI int Itcl_BiInfoFunctionCmd(void *dummy,
299 Tcl_Interp *interp, int objc,
300 Tcl_Obj *const objv[]);
301 /* 96 */
302 ITCLAPI int Itcl_BiInfoVariableCmd(void *dummy,
303 Tcl_Interp *interp, int objc,
304 Tcl_Obj *const objv[]);
305 /* 97 */
306 ITCLAPI int Itcl_BiInfoBodyCmd(void *dummy, Tcl_Interp *interp,
307 int objc, Tcl_Obj *const objv[]);
308 /* 98 */
309 ITCLAPI int Itcl_BiInfoArgsCmd(void *dummy, Tcl_Interp *interp,
310 int objc, Tcl_Obj *const objv[]);
311 /* Slot 99 is reserved */
312 /* 100 */
313 ITCLAPI int Itcl_EnsembleInit(Tcl_Interp *interp);
314 /* 101 */
315 ITCLAPI int Itcl_CreateEnsemble(Tcl_Interp *interp,
316 const char *ensName);
317 /* 102 */
318 ITCLAPI int Itcl_AddEnsemblePart(Tcl_Interp *interp,
319 const char *ensName, const char *partName,
320 const char *usageInfo,
321 Tcl_ObjCmdProc *objProc, void *clientData,
322 Tcl_CmdDeleteProc *deleteProc);
323 /* 103 */
324 ITCLAPI int Itcl_GetEnsemblePart(Tcl_Interp *interp,
325 const char *ensName, const char *partName,
326 Tcl_CmdInfo *infoPtr);
327 /* 104 */
328 ITCLAPI int Itcl_IsEnsemble(Tcl_CmdInfo *infoPtr);
329 /* 105 */
330 ITCLAPI int Itcl_GetEnsembleUsage(Tcl_Interp *interp,
331 const char *ensName, Tcl_Obj *objPtr);
332 /* 106 */
333 ITCLAPI int Itcl_GetEnsembleUsageForObj(Tcl_Interp *interp,
334 Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr);
335 /* 107 */
336 ITCLAPI int Itcl_EnsembleCmd(void *clientData,
337 Tcl_Interp *interp, int objc,
338 Tcl_Obj *const objv[]);
339 /* 108 */
340 ITCLAPI int Itcl_EnsPartCmd(void *clientData, Tcl_Interp *interp,
341 int objc, Tcl_Obj *const objv[]);
342 /* 109 */
343 ITCLAPI int Itcl_EnsembleErrorCmd(void *clientData,
344 Tcl_Interp *interp, Tcl_Size objc,
345 Tcl_Obj *const objv[]);
346 /* Slot 110 is reserved */
347 /* Slot 111 is reserved */
348 /* Slot 112 is reserved */
349 /* Slot 113 is reserved */
350 /* Slot 114 is reserved */
351 /* 115 */
352 ITCLAPI void Itcl_Assert(const char *testExpr,
353 const char *fileName, int lineNum);
354 /* 116 */
355 ITCLAPI int Itcl_IsObjectCmd(void *clientData,
356 Tcl_Interp *interp, int objc,
357 Tcl_Obj *const objv[]);
358 /* 117 */
359 ITCLAPI int Itcl_IsClassCmd(void *clientData, Tcl_Interp *interp,
360 int objc, Tcl_Obj *const objv[]);
361 /* Slot 118 is reserved */
362 /* Slot 119 is reserved */
363 /* Slot 120 is reserved */
364 /* Slot 121 is reserved */
365 /* Slot 122 is reserved */
366 /* Slot 123 is reserved */
367 /* Slot 124 is reserved */
368 /* Slot 125 is reserved */
369 /* Slot 126 is reserved */
370 /* Slot 127 is reserved */
371 /* Slot 128 is reserved */
372 /* Slot 129 is reserved */
373 /* Slot 130 is reserved */
374 /* Slot 131 is reserved */
375 /* Slot 132 is reserved */
376 /* Slot 133 is reserved */
377 /* Slot 134 is reserved */
378 /* Slot 135 is reserved */
379 /* Slot 136 is reserved */
380 /* Slot 137 is reserved */
381 /* Slot 138 is reserved */
382 /* Slot 139 is reserved */
383 /* 140 */
384 ITCLAPI int Itcl_FilterAddCmd(void *clientData,
385 Tcl_Interp *interp, int objc,
386 Tcl_Obj *const objv[]);
387 /* 141 */
388 ITCLAPI int Itcl_FilterDeleteCmd(void *clientData,
389 Tcl_Interp *interp, int objc,
390 Tcl_Obj *const objv[]);
391 /* 142 */
392 ITCLAPI int Itcl_ForwardAddCmd(void *clientData,
393 Tcl_Interp *interp, int objc,
394 Tcl_Obj *const objv[]);
395 /* 143 */
396 ITCLAPI int Itcl_ForwardDeleteCmd(void *clientData,
397 Tcl_Interp *interp, int objc,
398 Tcl_Obj *const objv[]);
399 /* 144 */
400 ITCLAPI int Itcl_MixinAddCmd(void *clientData,
401 Tcl_Interp *interp, int objc,
402 Tcl_Obj *const objv[]);
403 /* 145 */
404 ITCLAPI int Itcl_MixinDeleteCmd(void *clientData,
405 Tcl_Interp *interp, int objc,
406 Tcl_Obj *const objv[]);
407 /* Slot 146 is reserved */
408 /* Slot 147 is reserved */
409 /* Slot 148 is reserved */
410 /* Slot 149 is reserved */
411 /* Slot 150 is reserved */
412 /* 151 */
413 ITCLAPI int Itcl_BiInfoUnknownCmd(void *dummy,
414 Tcl_Interp *interp, int objc,
415 Tcl_Obj *const objv[]);
416 /* 152 */
417 ITCLAPI int Itcl_BiInfoVarsCmd(void *dummy, Tcl_Interp *interp,
418 int objc, Tcl_Obj *const objv[]);
419 /* 153 */
420 ITCLAPI int Itcl_CanAccess2(ItclClass *iclsPtr, int protection,
421 Tcl_Namespace *fromNsPtr);
422 /* Slot 154 is reserved */
423 /* Slot 155 is reserved */
424 /* Slot 156 is reserved */
425 /* Slot 157 is reserved */
426 /* Slot 158 is reserved */
427 /* Slot 159 is reserved */
428 /* 160 */
429 ITCLAPI int Itcl_SetCallFrameResolver(Tcl_Interp *interp,
430 Tcl_Resolve *resolvePtr);
431 /* 161 */
432 ITCLAPI int ItclEnsembleSubCmd(void *clientData,
433 Tcl_Interp *interp, const char *ensembleName,
434 int objc, Tcl_Obj *const *objv,
435 const char *functionName);
436 /* 162 */
437 ITCLAPI Tcl_Namespace * Itcl_GetUplevelNamespace(Tcl_Interp *interp,
438 int level);
439 /* 163 */
440 ITCLAPI void * Itcl_GetCallFrameClientData(Tcl_Interp *interp);
441 /* Slot 164 is reserved */
442 /* 165 */
443 ITCLAPI int Itcl_SetCallFrameNamespace(Tcl_Interp *interp,
444 Tcl_Namespace *nsPtr);
445 /* 166 */
446 ITCLAPI Tcl_Size Itcl_GetCallFrameObjc(Tcl_Interp *interp);
447 /* 167 */
448 ITCLAPI Tcl_Obj *const * Itcl_GetCallFrameObjv(Tcl_Interp *interp);
449 /* 168 */
450 ITCLAPI int Itcl_NWidgetCmd(void *infoPtr, Tcl_Interp *interp,
451 int objc, Tcl_Obj *const objv[]);
452 /* 169 */
453 ITCLAPI int Itcl_AddOptionCmd(void *infoPtr, Tcl_Interp *interp,
454 int objc, Tcl_Obj *const objv[]);
455 /* 170 */
456 ITCLAPI int Itcl_AddComponentCmd(void *infoPtr,
457 Tcl_Interp *interp, int objc,
458 Tcl_Obj *const objv[]);
459 /* 171 */
460 ITCLAPI int Itcl_BiInfoOptionCmd(void *dummy, Tcl_Interp *interp,
461 int objc, Tcl_Obj *const objv[]);
462 /* 172 */
463 ITCLAPI int Itcl_BiInfoComponentCmd(void *dummy,
464 Tcl_Interp *interp, int objc,
465 Tcl_Obj *const objv[]);
466 /* 173 */
467 ITCLAPI int Itcl_RenameCommand(Tcl_Interp *interp,
468 const char *oldName, const char *newName);
469 /* 174 */
470 ITCLAPI int Itcl_PushCallFrame(Tcl_Interp *interp,
471 Tcl_CallFrame *framePtr,
472 Tcl_Namespace *nsPtr, int isProcCallFrame);
473 /* 175 */
474 ITCLAPI void Itcl_PopCallFrame(Tcl_Interp *interp);
475 /* 176 */
476 ITCLAPI Tcl_CallFrame * Itcl_GetUplevelCallFrame(Tcl_Interp *interp,
477 int level);
478 /* 177 */
479 ITCLAPI Tcl_CallFrame * Itcl_ActivateCallFrame(Tcl_Interp *interp,
480 Tcl_CallFrame *framePtr);
481 /* 178 */
482 ITCLAPI const char* ItclSetInstanceVar(Tcl_Interp *interp,
483 const char *name, const char *name2,
484 const char *value, ItclObject *contextIoPtr,
485 ItclClass *contextIclsPtr);
486 /* 179 */
487 ITCLAPI Tcl_Obj * ItclCapitalize(const char *str);
488 /* 180 */
489 ITCLAPI int ItclClassBaseCmd(void *clientData,
490 Tcl_Interp *interp, int flags, int objc,
491 Tcl_Obj *const objv[],
492 ItclClass **iclsPtrPtr);
493 /* 181 */
494 ITCLAPI int ItclCreateComponent(Tcl_Interp *interp,
495 ItclClass *iclsPtr, Tcl_Obj *componentPtr,
496 int type, ItclComponent **icPtrPtr);
497 /* 182 */
498 ITCLAPI void Itcl_SetContext(Tcl_Interp *interp,
499 ItclObject *ioPtr);
500 /* 183 */
501 ITCLAPI void Itcl_UnsetContext(Tcl_Interp *interp);
502 /* 184 */
503 ITCLAPI const char * ItclGetInstanceVar(Tcl_Interp *interp,
504 const char *name, const char *name2,
505 ItclObject *ioPtr, ItclClass *iclsPtr);
506
507 typedef struct ItclIntStubs {
508 int magic;
509 int epoch;
510 int revision;
511 void *hooks;
512
513 int (*itcl_IsClassNamespace) (Tcl_Namespace *namesp); /* 0 */
514 int (*itcl_IsClass) (Tcl_Command cmd); /* 1 */
515 ItclClass * (*itcl_FindClass) (Tcl_Interp *interp, const char *path, int autoload); /* 2 */
516 int (*itcl_FindObject) (Tcl_Interp *interp, const char *name, ItclObject **roPtr); /* 3 */
517 int (*itcl_IsObject) (Tcl_Command cmd); /* 4 */
518 int (*itcl_ObjectIsa) (ItclObject *contextObj, ItclClass *cdefn); /* 5 */
519 int (*itcl_Protection) (Tcl_Interp *interp, int newLevel); /* 6 */
520 const char * (*itcl_ProtectionStr) (int pLevel); /* 7 */
521 int (*itcl_CanAccess) (ItclMemberFunc *memberPtr, Tcl_Namespace *fromNsPtr); /* 8 */
522 int (*itcl_CanAccessFunc) (ItclMemberFunc *mfunc, Tcl_Namespace *fromNsPtr); /* 9 */
523 void (*reserved10)(void);
524 void (*itcl_ParseNamespPath) (const char *name, Tcl_DString *buffer, const char **head, const char **tail); /* 11 */
525 int (*itcl_DecodeScopedCommand) (Tcl_Interp *interp, const char *name, Tcl_Namespace **rNsPtr, char **rCmdPtr); /* 12 */
526 int (*itcl_EvalArgs) (Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 13 */
527 Tcl_Obj * (*itcl_CreateArgs) (Tcl_Interp *interp, const char *string, Tcl_Size objc, Tcl_Obj *const objv[]); /* 14 */
528 void (*reserved15)(void);
529 void (*reserved16)(void);
530 int (*itcl_GetContext) (Tcl_Interp *interp, ItclClass **iclsPtrPtr, ItclObject **ioPtrPtr); /* 17 */
531 void (*itcl_InitHierIter) (ItclHierIter *iter, ItclClass *iclsPtr); /* 18 */
532 void (*itcl_DeleteHierIter) (ItclHierIter *iter); /* 19 */
533 ItclClass * (*itcl_AdvanceHierIter) (ItclHierIter *iter); /* 20 */
534 int (*itcl_FindClassesCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 21 */
535 int (*itcl_FindObjectsCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 22 */
536 void (*reserved23)(void);
537 int (*itcl_DelClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 24 */
538 int (*itcl_DelObjectCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 25 */
539 int (*itcl_ScopeCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 26 */
540 int (*itcl_CodeCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 27 */
541 int (*itcl_StubCreateCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 28 */
542 int (*itcl_StubExistsCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 29 */
543 int (*itcl_IsStub) (Tcl_Command cmd); /* 30 */
544 int (*itcl_CreateClass) (Tcl_Interp *interp, const char *path, ItclObjectInfo *info, ItclClass **rPtr); /* 31 */
545 int (*itcl_DeleteClass) (Tcl_Interp *interp, ItclClass *iclsPtr); /* 32 */
546 Tcl_Namespace * (*itcl_FindClassNamespace) (Tcl_Interp *interp, const char *path); /* 33 */
547 int (*itcl_HandleClass) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 34 */
548 void (*reserved35)(void);
549 void (*reserved36)(void);
550 void (*reserved37)(void);
551 void (*itcl_BuildVirtualTables) (ItclClass *iclsPtr); /* 38 */
552 int (*itcl_CreateVariable) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, char *init, char *config, ItclVariable **ivPtr); /* 39 */
553 void (*itcl_DeleteVariable) (char *cdata); /* 40 */
554 const char * (*itcl_GetCommonVar) (Tcl_Interp *interp, const char *name, ItclClass *contextClass); /* 41 */
555 void (*reserved42)(void);
556 void (*reserved43)(void);
557 int (*itcl_CreateObject) (Tcl_Interp *interp, const char*name, ItclClass *iclsPtr, Tcl_Size objc, Tcl_Obj *const objv[], ItclObject **rioPtr); /* 44 */
558 int (*itcl_DeleteObject) (Tcl_Interp *interp, ItclObject *contextObj); /* 45 */
559 int (*itcl_DestructObject) (Tcl_Interp *interp, ItclObject *contextObj, int flags); /* 46 */
560 void (*reserved47)(void);
561 const char * (*itcl_GetInstanceVar) (Tcl_Interp *interp, const char *name, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 48 */
562 void (*reserved49)(void);
563 int (*itcl_BodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 50 */
564 int (*itcl_ConfigBodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 51 */
565 int (*itcl_CreateMethod) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 52 */
566 int (*itcl_CreateProc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 53 */
567 int (*itcl_CreateMemberFunc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, const char *arglist, const char *body, ItclMemberFunc **mfuncPtr); /* 54 */
568 int (*itcl_ChangeMemberFunc) (Tcl_Interp *interp, ItclMemberFunc *mfunc, const char *arglist, const char *body); /* 55 */
569 void (*itcl_DeleteMemberFunc) (void *cdata); /* 56 */
570 int (*itcl_CreateMemberCode) (Tcl_Interp *interp, ItclClass *iclsPtr, const char *arglist, const char *body, ItclMemberCode **mcodePtr); /* 57 */
571 void (*itcl_DeleteMemberCode) (void *cdata); /* 58 */
572 int (*itcl_GetMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc); /* 59 */
573 void (*reserved60)(void);
574 int (*itcl_EvalMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, Tcl_Size objc, Tcl_Obj *const objv[]); /* 61 */
575 void (*reserved62)(void);
576 void (*reserved63)(void);
577 void (*reserved64)(void);
578 void (*reserved65)(void);
579 void (*reserved66)(void);
580 void (*itcl_GetMemberFuncUsage) (ItclMemberFunc *mfunc, ItclObject *contextObj, Tcl_Obj *objPtr); /* 67 */
581 int (*itcl_ExecMethod) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 68 */
582 int (*itcl_ExecProc) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 69 */
583 void (*reserved70)(void);
584 int (*itcl_ConstructBase) (Tcl_Interp *interp, ItclObject *contextObj, ItclClass *contextClass); /* 71 */
585 int (*itcl_InvokeMethodIfExists) (Tcl_Interp *interp, const char *name, ItclClass *contextClass, ItclObject *contextObj, Tcl_Size objc, Tcl_Obj *const objv[]); /* 72 */
586 void (*reserved73)(void);
587 int (*itcl_ReportFuncErrors) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, int result); /* 74 */
588 int (*itcl_ParseInit) (Tcl_Interp *interp, ItclObjectInfo *info); /* 75 */
589 int (*itcl_ClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 76 */
590 int (*itcl_ClassInheritCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 77 */
591 int (*itcl_ClassProtectionCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 78 */
592 int (*itcl_ClassConstructorCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 79 */
593 int (*itcl_ClassDestructorCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 80 */
594 int (*itcl_ClassMethodCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 81 */
595 int (*itcl_ClassProcCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 82 */
596 int (*itcl_ClassVariableCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 83 */
597 int (*itcl_ClassCommonCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 84 */
598 int (*itcl_ParseVarResolver) (Tcl_Interp *interp, const char *name, Tcl_Namespace *contextNs, int flags, Tcl_Var *rPtr); /* 85 */
599 int (*itcl_BiInit) (Tcl_Interp *interp, ItclObjectInfo *infoPtr); /* 86 */
600 int (*itcl_InstallBiMethods) (Tcl_Interp *interp, ItclClass *cdefn); /* 87 */
601 int (*itcl_BiIsaCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 88 */
602 int (*itcl_BiConfigureCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 89 */
603 int (*itcl_BiCgetCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 90 */
604 int (*itcl_BiChainCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 91 */
605 int (*itcl_BiInfoClassCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 92 */
606 int (*itcl_BiInfoInheritCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 93 */
607 int (*itcl_BiInfoHeritageCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 94 */
608 int (*itcl_BiInfoFunctionCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 95 */
609 int (*itcl_BiInfoVariableCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 96 */
610 int (*itcl_BiInfoBodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 97 */
611 int (*itcl_BiInfoArgsCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 98 */
612 void (*reserved99)(void);
613 int (*itcl_EnsembleInit) (Tcl_Interp *interp); /* 100 */
614 int (*itcl_CreateEnsemble) (Tcl_Interp *interp, const char *ensName); /* 101 */
615 int (*itcl_AddEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, const char *usageInfo, Tcl_ObjCmdProc *objProc, void *clientData, Tcl_CmdDeleteProc *deleteProc); /* 102 */
616 int (*itcl_GetEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, Tcl_CmdInfo *infoPtr); /* 103 */
617 int (*itcl_IsEnsemble) (Tcl_CmdInfo *infoPtr); /* 104 */
618 int (*itcl_GetEnsembleUsage) (Tcl_Interp *interp, const char *ensName, Tcl_Obj *objPtr); /* 105 */
619 int (*itcl_GetEnsembleUsageForObj) (Tcl_Interp *interp, Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr); /* 106 */
620 int (*itcl_EnsembleCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 107 */
621 int (*itcl_EnsPartCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 108 */
622 int (*itcl_EnsembleErrorCmd) (void *clientData, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 109 */
623 void (*reserved110)(void);
624 void (*reserved111)(void);
625 void (*reserved112)(void);
626 void (*reserved113)(void);
627 void (*reserved114)(void);
628 void (*itcl_Assert) (const char *testExpr, const char *fileName, int lineNum); /* 115 */
629 int (*itcl_IsObjectCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 116 */
630 int (*itcl_IsClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 117 */
631 void (*reserved118)(void);
632 void (*reserved119)(void);
633 void (*reserved120)(void);
634 void (*reserved121)(void);
635 void (*reserved122)(void);
636 void (*reserved123)(void);
637 void (*reserved124)(void);
638 void (*reserved125)(void);
639 void (*reserved126)(void);
640 void (*reserved127)(void);
641 void (*reserved128)(void);
642 void (*reserved129)(void);
643 void (*reserved130)(void);
644 void (*reserved131)(void);
645 void (*reserved132)(void);
646 void (*reserved133)(void);
647 void (*reserved134)(void);
648 void (*reserved135)(void);
649 void (*reserved136)(void);
650 void (*reserved137)(void);
651 void (*reserved138)(void);
652 void (*reserved139)(void);
653 int (*itcl_FilterAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 140 */
654 int (*itcl_FilterDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 141 */
655 int (*itcl_ForwardAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 142 */
656 int (*itcl_ForwardDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 143 */
657 int (*itcl_MixinAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 144 */
658 int (*itcl_MixinDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 145 */
659 void (*reserved146)(void);
660 void (*reserved147)(void);
661 void (*reserved148)(void);
662 void (*reserved149)(void);
663 void (*reserved150)(void);
664 int (*itcl_BiInfoUnknownCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 151 */
665 int (*itcl_BiInfoVarsCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 152 */
666 int (*itcl_CanAccess2) (ItclClass *iclsPtr, int protection, Tcl_Namespace *fromNsPtr); /* 153 */
667 void (*reserved154)(void);
668 void (*reserved155)(void);
669 void (*reserved156)(void);
670 void (*reserved157)(void);
671 void (*reserved158)(void);
672 void (*reserved159)(void);
673 int (*itcl_SetCallFrameResolver) (Tcl_Interp *interp, Tcl_Resolve *resolvePtr); /* 160 */
674 int (*itclEnsembleSubCmd) (void *clientData, Tcl_Interp *interp, const char *ensembleName, int objc, Tcl_Obj *const *objv, const char *functionName); /* 161 */
675 Tcl_Namespace * (*itcl_GetUplevelNamespace) (Tcl_Interp *interp, int level); /* 162 */
676 void * (*itcl_GetCallFrameClientData) (Tcl_Interp *interp); /* 163 */
677 void (*reserved164)(void);
678 int (*itcl_SetCallFrameNamespace) (Tcl_Interp *interp, Tcl_Namespace *nsPtr); /* 165 */
679 Tcl_Size (*itcl_GetCallFrameObjc) (Tcl_Interp *interp); /* 166 */
680 Tcl_Obj *const * (*itcl_GetCallFrameObjv) (Tcl_Interp *interp); /* 167 */
681 int (*itcl_NWidgetCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 168 */
682 int (*itcl_AddOptionCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 169 */
683 int (*itcl_AddComponentCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 170 */
684 int (*itcl_BiInfoOptionCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 171 */
685 int (*itcl_BiInfoComponentCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 172 */
686 int (*itcl_RenameCommand) (Tcl_Interp *interp, const char *oldName, const char *newName); /* 173 */
687 int (*itcl_PushCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr, Tcl_Namespace *nsPtr, int isProcCallFrame); /* 174 */
688 void (*itcl_PopCallFrame) (Tcl_Interp *interp); /* 175 */
689 Tcl_CallFrame * (*itcl_GetUplevelCallFrame) (Tcl_Interp *interp, int level); /* 176 */
690 Tcl_CallFrame * (*itcl_ActivateCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr); /* 177 */
691 const char* (*itclSetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, const char *value, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 178 */
692 Tcl_Obj * (*itclCapitalize) (const char *str); /* 179 */
693 int (*itclClassBaseCmd) (void *clientData, Tcl_Interp *interp, int flags, int objc, Tcl_Obj *const objv[], ItclClass **iclsPtrPtr); /* 180 */
694 int (*itclCreateComponent) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *componentPtr, int type, ItclComponent **icPtrPtr); /* 181 */
695 void (*itcl_SetContext) (Tcl_Interp *interp, ItclObject *ioPtr); /* 182 */
696 void (*itcl_UnsetContext) (Tcl_Interp *interp); /* 183 */
697 const char * (*itclGetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, ItclObject *ioPtr, ItclClass *iclsPtr); /* 184 */
698 } ItclIntStubs;
699
700 extern const ItclIntStubs *itclIntStubsPtr;
701
702 #ifdef __cplusplus
703 }
704 #endif
705
706 #if defined(USE_ITCL_STUBS)
707
708 /*
709 * Inline function declarations:
710 */
711
712 #define Itcl_IsClassNamespace \
713 (itclIntStubsPtr->itcl_IsClassNamespace) /* 0 */
714 #define Itcl_IsClass \
715 (itclIntStubsPtr->itcl_IsClass) /* 1 */
716 #define Itcl_FindClass \
717 (itclIntStubsPtr->itcl_FindClass) /* 2 */
718 #define Itcl_FindObject \
719 (itclIntStubsPtr->itcl_FindObject) /* 3 */
720 #define Itcl_IsObject \
721 (itclIntStubsPtr->itcl_IsObject) /* 4 */
722 #define Itcl_ObjectIsa \
723 (itclIntStubsPtr->itcl_ObjectIsa) /* 5 */
724 #define Itcl_Protection \
725 (itclIntStubsPtr->itcl_Protection) /* 6 */
726 #define Itcl_ProtectionStr \
727 (itclIntStubsPtr->itcl_ProtectionStr) /* 7 */
728 #define Itcl_CanAccess \
729 (itclIntStubsPtr->itcl_CanAccess) /* 8 */
730 #define Itcl_CanAccessFunc \
731 (itclIntStubsPtr->itcl_CanAccessFunc) /* 9 */
732 /* Slot 10 is reserved */
733 #define Itcl_ParseNamespPath \
734 (itclIntStubsPtr->itcl_ParseNamespPath) /* 11 */
735 #define Itcl_DecodeScopedCommand \
736 (itclIntStubsPtr->itcl_DecodeScopedCommand) /* 12 */
737 #define Itcl_EvalArgs \
738 (itclIntStubsPtr->itcl_EvalArgs) /* 13 */
739 #define Itcl_CreateArgs \
740 (itclIntStubsPtr->itcl_CreateArgs) /* 14 */
741 /* Slot 15 is reserved */
742 /* Slot 16 is reserved */
743 #define Itcl_GetContext \
744 (itclIntStubsPtr->itcl_GetContext) /* 17 */
745 #define Itcl_InitHierIter \
746 (itclIntStubsPtr->itcl_InitHierIter) /* 18 */
747 #define Itcl_DeleteHierIter \
748 (itclIntStubsPtr->itcl_DeleteHierIter) /* 19 */
749 #define Itcl_AdvanceHierIter \
750 (itclIntStubsPtr->itcl_AdvanceHierIter) /* 20 */
751 #define Itcl_FindClassesCmd \
752 (itclIntStubsPtr->itcl_FindClassesCmd) /* 21 */
753 #define Itcl_FindObjectsCmd \
754 (itclIntStubsPtr->itcl_FindObjectsCmd) /* 22 */
755 /* Slot 23 is reserved */
756 #define Itcl_DelClassCmd \
757 (itclIntStubsPtr->itcl_DelClassCmd) /* 24 */
758 #define Itcl_DelObjectCmd \
759 (itclIntStubsPtr->itcl_DelObjectCmd) /* 25 */
760 #define Itcl_ScopeCmd \
761 (itclIntStubsPtr->itcl_ScopeCmd) /* 26 */
762 #define Itcl_CodeCmd \
763 (itclIntStubsPtr->itcl_CodeCmd) /* 27 */
764 #define Itcl_StubCreateCmd \
765 (itclIntStubsPtr->itcl_StubCreateCmd) /* 28 */
766 #define Itcl_StubExistsCmd \
767 (itclIntStubsPtr->itcl_StubExistsCmd) /* 29 */
768 #define Itcl_IsStub \
769 (itclIntStubsPtr->itcl_IsStub) /* 30 */
770 #define Itcl_CreateClass \
771 (itclIntStubsPtr->itcl_CreateClass) /* 31 */
772 #define Itcl_DeleteClass \
773 (itclIntStubsPtr->itcl_DeleteClass) /* 32 */
774 #define Itcl_FindClassNamespace \
775 (itclIntStubsPtr->itcl_FindClassNamespace) /* 33 */
776 #define Itcl_HandleClass \
777 (itclIntStubsPtr->itcl_HandleClass) /* 34 */
778 /* Slot 35 is reserved */
779 /* Slot 36 is reserved */
780 /* Slot 37 is reserved */
781 #define Itcl_BuildVirtualTables \
782 (itclIntStubsPtr->itcl_BuildVirtualTables) /* 38 */
783 #define Itcl_CreateVariable \
784 (itclIntStubsPtr->itcl_CreateVariable) /* 39 */
785 #define Itcl_DeleteVariable \
786 (itclIntStubsPtr->itcl_DeleteVariable) /* 40 */
787 #define Itcl_GetCommonVar \
788 (itclIntStubsPtr->itcl_GetCommonVar) /* 41 */
789 /* Slot 42 is reserved */
790 /* Slot 43 is reserved */
791 #define Itcl_CreateObject \
792 (itclIntStubsPtr->itcl_CreateObject) /* 44 */
793 #define Itcl_DeleteObject \
794 (itclIntStubsPtr->itcl_DeleteObject) /* 45 */
795 #define Itcl_DestructObject \
796 (itclIntStubsPtr->itcl_DestructObject) /* 46 */
797 /* Slot 47 is reserved */
798 #define Itcl_GetInstanceVar \
799 (itclIntStubsPtr->itcl_GetInstanceVar) /* 48 */
800 /* Slot 49 is reserved */
801 #define Itcl_BodyCmd \
802 (itclIntStubsPtr->itcl_BodyCmd) /* 50 */
803 #define Itcl_ConfigBodyCmd \
804 (itclIntStubsPtr->itcl_ConfigBodyCmd) /* 51 */
805 #define Itcl_CreateMethod \
806 (itclIntStubsPtr->itcl_CreateMethod) /* 52 */
807 #define Itcl_CreateProc \
808 (itclIntStubsPtr->itcl_CreateProc) /* 53 */
809 #define Itcl_CreateMemberFunc \
810 (itclIntStubsPtr->itcl_CreateMemberFunc) /* 54 */
811 #define Itcl_ChangeMemberFunc \
812 (itclIntStubsPtr->itcl_ChangeMemberFunc) /* 55 */
813 #define Itcl_DeleteMemberFunc \
814 (itclIntStubsPtr->itcl_DeleteMemberFunc) /* 56 */
815 #define Itcl_CreateMemberCode \
816 (itclIntStubsPtr->itcl_CreateMemberCode) /* 57 */
817 #define Itcl_DeleteMemberCode \
818 (itclIntStubsPtr->itcl_DeleteMemberCode) /* 58 */
819 #define Itcl_GetMemberCode \
820 (itclIntStubsPtr->itcl_GetMemberCode) /* 59 */
821 /* Slot 60 is reserved */
822 #define Itcl_EvalMemberCode \
823 (itclIntStubsPtr->itcl_EvalMemberCode) /* 61 */
824 /* Slot 62 is reserved */
825 /* Slot 63 is reserved */
826 /* Slot 64 is reserved */
827 /* Slot 65 is reserved */
828 /* Slot 66 is reserved */
829 #define Itcl_GetMemberFuncUsage \
830 (itclIntStubsPtr->itcl_GetMemberFuncUsage) /* 67 */
831 #define Itcl_ExecMethod \
832 (itclIntStubsPtr->itcl_ExecMethod) /* 68 */
833 #define Itcl_ExecProc \
834 (itclIntStubsPtr->itcl_ExecProc) /* 69 */
835 /* Slot 70 is reserved */
836 #define Itcl_ConstructBase \
837 (itclIntStubsPtr->itcl_ConstructBase) /* 71 */
838 #define Itcl_InvokeMethodIfExists \
839 (itclIntStubsPtr->itcl_InvokeMethodIfExists) /* 72 */
840 /* Slot 73 is reserved */
841 #define Itcl_ReportFuncErrors \
842 (itclIntStubsPtr->itcl_ReportFuncErrors) /* 74 */
843 #define Itcl_ParseInit \
844 (itclIntStubsPtr->itcl_ParseInit) /* 75 */
845 #define Itcl_ClassCmd \
846 (itclIntStubsPtr->itcl_ClassCmd) /* 76 */
847 #define Itcl_ClassInheritCmd \
848 (itclIntStubsPtr->itcl_ClassInheritCmd) /* 77 */
849 #define Itcl_ClassProtectionCmd \
850 (itclIntStubsPtr->itcl_ClassProtectionCmd) /* 78 */
851 #define Itcl_ClassConstructorCmd \
852 (itclIntStubsPtr->itcl_ClassConstructorCmd) /* 79 */
853 #define Itcl_ClassDestructorCmd \
854 (itclIntStubsPtr->itcl_ClassDestructorCmd) /* 80 */
855 #define Itcl_ClassMethodCmd \
856 (itclIntStubsPtr->itcl_ClassMethodCmd) /* 81 */
857 #define Itcl_ClassProcCmd \
858 (itclIntStubsPtr->itcl_ClassProcCmd) /* 82 */
859 #define Itcl_ClassVariableCmd \
860 (itclIntStubsPtr->itcl_ClassVariableCmd) /* 83 */
861 #define Itcl_ClassCommonCmd \
862 (itclIntStubsPtr->itcl_ClassCommonCmd) /* 84 */
863 #define Itcl_ParseVarResolver \
864 (itclIntStubsPtr->itcl_ParseVarResolver) /* 85 */
865 #define Itcl_BiInit \
866 (itclIntStubsPtr->itcl_BiInit) /* 86 */
867 #define Itcl_InstallBiMethods \
868 (itclIntStubsPtr->itcl_InstallBiMethods) /* 87 */
869 #define Itcl_BiIsaCmd \
870 (itclIntStubsPtr->itcl_BiIsaCmd) /* 88 */
871 #define Itcl_BiConfigureCmd \
872 (itclIntStubsPtr->itcl_BiConfigureCmd) /* 89 */
873 #define Itcl_BiCgetCmd \
874 (itclIntStubsPtr->itcl_BiCgetCmd) /* 90 */
875 #define Itcl_BiChainCmd \
876 (itclIntStubsPtr->itcl_BiChainCmd) /* 91 */
877 #define Itcl_BiInfoClassCmd \
878 (itclIntStubsPtr->itcl_BiInfoClassCmd) /* 92 */
879 #define Itcl_BiInfoInheritCmd \
880 (itclIntStubsPtr->itcl_BiInfoInheritCmd) /* 93 */
881 #define Itcl_BiInfoHeritageCmd \
882 (itclIntStubsPtr->itcl_BiInfoHeritageCmd) /* 94 */
883 #define Itcl_BiInfoFunctionCmd \
884 (itclIntStubsPtr->itcl_BiInfoFunctionCmd) /* 95 */
885 #define Itcl_BiInfoVariableCmd \
886 (itclIntStubsPtr->itcl_BiInfoVariableCmd) /* 96 */
887 #define Itcl_BiInfoBodyCmd \
888 (itclIntStubsPtr->itcl_BiInfoBodyCmd) /* 97 */
889 #define Itcl_BiInfoArgsCmd \
890 (itclIntStubsPtr->itcl_BiInfoArgsCmd) /* 98 */
891 /* Slot 99 is reserved */
892 #define Itcl_EnsembleInit \
893 (itclIntStubsPtr->itcl_EnsembleInit) /* 100 */
894 #define Itcl_CreateEnsemble \
895 (itclIntStubsPtr->itcl_CreateEnsemble) /* 101 */
896 #define Itcl_AddEnsemblePart \
897 (itclIntStubsPtr->itcl_AddEnsemblePart) /* 102 */
898 #define Itcl_GetEnsemblePart \
899 (itclIntStubsPtr->itcl_GetEnsemblePart) /* 103 */
900 #define Itcl_IsEnsemble \
901 (itclIntStubsPtr->itcl_IsEnsemble) /* 104 */
902 #define Itcl_GetEnsembleUsage \
903 (itclIntStubsPtr->itcl_GetEnsembleUsage) /* 105 */
904 #define Itcl_GetEnsembleUsageForObj \
905 (itclIntStubsPtr->itcl_GetEnsembleUsageForObj) /* 106 */
906 #define Itcl_EnsembleCmd \
907 (itclIntStubsPtr->itcl_EnsembleCmd) /* 107 */
908 #define Itcl_EnsPartCmd \
909 (itclIntStubsPtr->itcl_EnsPartCmd) /* 108 */
910 #define Itcl_EnsembleErrorCmd \
911 (itclIntStubsPtr->itcl_EnsembleErrorCmd) /* 109 */
912 /* Slot 110 is reserved */
913 /* Slot 111 is reserved */
914 /* Slot 112 is reserved */
915 /* Slot 113 is reserved */
916 /* Slot 114 is reserved */
917 #define Itcl_Assert \
918 (itclIntStubsPtr->itcl_Assert) /* 115 */
919 #define Itcl_IsObjectCmd \
920 (itclIntStubsPtr->itcl_IsObjectCmd) /* 116 */
921 #define Itcl_IsClassCmd \
922 (itclIntStubsPtr->itcl_IsClassCmd) /* 117 */
923 /* Slot 118 is reserved */
924 /* Slot 119 is reserved */
925 /* Slot 120 is reserved */
926 /* Slot 121 is reserved */
927 /* Slot 122 is reserved */
928 /* Slot 123 is reserved */
929 /* Slot 124 is reserved */
930 /* Slot 125 is reserved */
931 /* Slot 126 is reserved */
932 /* Slot 127 is reserved */
933 /* Slot 128 is reserved */
934 /* Slot 129 is reserved */
935 /* Slot 130 is reserved */
936 /* Slot 131 is reserved */
937 /* Slot 132 is reserved */
938 /* Slot 133 is reserved */
939 /* Slot 134 is reserved */
940 /* Slot 135 is reserved */
941 /* Slot 136 is reserved */
942 /* Slot 137 is reserved */
943 /* Slot 138 is reserved */
944 /* Slot 139 is reserved */
945 #define Itcl_FilterAddCmd \
946 (itclIntStubsPtr->itcl_FilterAddCmd) /* 140 */
947 #define Itcl_FilterDeleteCmd \
948 (itclIntStubsPtr->itcl_FilterDeleteCmd) /* 141 */
949 #define Itcl_ForwardAddCmd \
950 (itclIntStubsPtr->itcl_ForwardAddCmd) /* 142 */
951 #define Itcl_ForwardDeleteCmd \
952 (itclIntStubsPtr->itcl_ForwardDeleteCmd) /* 143 */
953 #define Itcl_MixinAddCmd \
954 (itclIntStubsPtr->itcl_MixinAddCmd) /* 144 */
955 #define Itcl_MixinDeleteCmd \
956 (itclIntStubsPtr->itcl_MixinDeleteCmd) /* 145 */
957 /* Slot 146 is reserved */
958 /* Slot 147 is reserved */
959 /* Slot 148 is reserved */
960 /* Slot 149 is reserved */
961 /* Slot 150 is reserved */
962 #define Itcl_BiInfoUnknownCmd \
963 (itclIntStubsPtr->itcl_BiInfoUnknownCmd) /* 151 */
964 #define Itcl_BiInfoVarsCmd \
965 (itclIntStubsPtr->itcl_BiInfoVarsCmd) /* 152 */
966 #define Itcl_CanAccess2 \
967 (itclIntStubsPtr->itcl_CanAccess2) /* 153 */
968 /* Slot 154 is reserved */
969 /* Slot 155 is reserved */
970 /* Slot 156 is reserved */
971 /* Slot 157 is reserved */
972 /* Slot 158 is reserved */
973 /* Slot 159 is reserved */
974 #define Itcl_SetCallFrameResolver \
975 (itclIntStubsPtr->itcl_SetCallFrameResolver) /* 160 */
976 #define ItclEnsembleSubCmd \
977 (itclIntStubsPtr->itclEnsembleSubCmd) /* 161 */
978 #define Itcl_GetUplevelNamespace \
979 (itclIntStubsPtr->itcl_GetUplevelNamespace) /* 162 */
980 #define Itcl_GetCallFrameClientData \
981 (itclIntStubsPtr->itcl_GetCallFrameClientData) /* 163 */
982 /* Slot 164 is reserved */
983 #define Itcl_SetCallFrameNamespace \
984 (itclIntStubsPtr->itcl_SetCallFrameNamespace) /* 165 */
985 #define Itcl_GetCallFrameObjc \
986 (itclIntStubsPtr->itcl_GetCallFrameObjc) /* 166 */
987 #define Itcl_GetCallFrameObjv \
988 (itclIntStubsPtr->itcl_GetCallFrameObjv) /* 167 */
989 #define Itcl_NWidgetCmd \
990 (itclIntStubsPtr->itcl_NWidgetCmd) /* 168 */
991 #define Itcl_AddOptionCmd \
992 (itclIntStubsPtr->itcl_AddOptionCmd) /* 169 */
993 #define Itcl_AddComponentCmd \
994 (itclIntStubsPtr->itcl_AddComponentCmd) /* 170 */
995 #define Itcl_BiInfoOptionCmd \
996 (itclIntStubsPtr->itcl_BiInfoOptionCmd) /* 171 */
997 #define Itcl_BiInfoComponentCmd \
998 (itclIntStubsPtr->itcl_BiInfoComponentCmd) /* 172 */
999 #define Itcl_RenameCommand \
1000 (itclIntStubsPtr->itcl_RenameCommand) /* 173 */
1001 #define Itcl_PushCallFrame \
1002 (itclIntStubsPtr->itcl_PushCallFrame) /* 174 */
1003 #define Itcl_PopCallFrame \
1004 (itclIntStubsPtr->itcl_PopCallFrame) /* 175 */
1005 #define Itcl_GetUplevelCallFrame \
1006 (itclIntStubsPtr->itcl_GetUplevelCallFrame) /* 176 */
1007 #define Itcl_ActivateCallFrame \
1008 (itclIntStubsPtr->itcl_ActivateCallFrame) /* 177 */
1009 #define ItclSetInstanceVar \
1010 (itclIntStubsPtr->itclSetInstanceVar) /* 178 */
1011 #define ItclCapitalize \
1012 (itclIntStubsPtr->itclCapitalize) /* 179 */
1013 #define ItclClassBaseCmd \
1014 (itclIntStubsPtr->itclClassBaseCmd) /* 180 */
1015 #define ItclCreateComponent \
1016 (itclIntStubsPtr->itclCreateComponent) /* 181 */
1017 #define Itcl_SetContext \
1018 (itclIntStubsPtr->itcl_SetContext) /* 182 */
1019 #define Itcl_UnsetContext \
1020 (itclIntStubsPtr->itcl_UnsetContext) /* 183 */
1021 #define ItclGetInstanceVar \
1022 (itclIntStubsPtr->itclGetInstanceVar) /* 184 */
1023
1024 #endif /* defined(USE_ITCL_STUBS) */
1025
1026 /* !END!: Do not edit above this line. */
1027
1028 #endif /* _ITCLINTDECLS */