source/include/itclIntDecls.h

0001 /*
0002  * This file is (mostly) automatically generated from itcl.decls.
0003  */
0004
0005 #ifndef _ITCLINTDECLS
0006 #define _ITCLINTDECLS
0007
0008 /* !BEGIN!: Do not edit below this line. */
0009
0010 #define ITCLINT_STUBS_EPOCH 0
0011 #define ITCLINT_STUBS_REVISION 157
0012
0013 #if (TCL_MAJOR_VERSION < 9) && defined(TCL_MINOR_VERSION) && (TCL_MINOR_VERSION < 7)
0014 # define Tcl_ObjCmdProc2 Tcl_ObjCmdProc
0015 #endif
0016
0017 #ifdef __cplusplus
0018 extern "C" {
0019 #endif
0020
0021 /*
0022  * Exported function declarations:
0023  */
0024
0025 /* 0 */
0026 ITCLAPI int     Itcl_IsClassNamespace(Tcl_Namespace *namesp);
0027 /* 1 */
0028 ITCLAPI int     Itcl_IsClass(Tcl_Command cmd);
0029 /* 2 */
0030 ITCLAPI ItclClass * Itcl_FindClass(Tcl_Interp *interp, const char *path,
0031                 int autoload);
0032 /* 3 */
0033 ITCLAPI int     Itcl_FindObject(Tcl_Interp *interp, const char *name,
0034                 ItclObject **roPtr);
0035 /* 4 */
0036 ITCLAPI int     Itcl_IsObject(Tcl_Command cmd);
0037 /* 5 */
0038 ITCLAPI int     Itcl_ObjectIsa(ItclObject *contextObj,
0039                 ItclClass *cdefn);
0040 /* 6 */
0041 ITCLAPI int     Itcl_Protection(Tcl_Interp *interp, int newLevel);
0042 /* 7 */
0043 ITCLAPI const char *    Itcl_ProtectionStr(int pLevel);
0044 /* 8 */
0045 ITCLAPI int     Itcl_CanAccess(ItclMemberFunc *memberPtr,
0046                 Tcl_Namespace *fromNsPtr);
0047 /* 9 */
0048 ITCLAPI int     Itcl_CanAccessFunc(ItclMemberFunc *mfunc,
0049                 Tcl_Namespace *fromNsPtr);
0050 /* Slot 10 is reserved */
0051 /* 11 */
0052 ITCLAPI void        Itcl_ParseNamespPath(const char *name,
0053                 Tcl_DString *buffer, const char **head,
0054                 const char **tail);
0055 /* 12 */
0056 ITCLAPI int     Itcl_DecodeScopedCommand(Tcl_Interp *interp,
0057                 const char *name, Tcl_Namespace **rNsPtr,
0058                 char **rCmdPtr);
0059 /* 13 */
0060 ITCLAPI int     Itcl_EvalArgs(Tcl_Interp *interp, Tcl_Size objc,
0061                 Tcl_Obj *const objv[]);
0062 /* 14 */
0063 ITCLAPI Tcl_Obj *   Itcl_CreateArgs(Tcl_Interp *interp,
0064                 const char *string, Tcl_Size objc,
0065                 Tcl_Obj *const objv[]);
0066 /* Slot 15 is reserved */
0067 /* Slot 16 is reserved */
0068 /* 17 */
0069 ITCLAPI int     Itcl_GetContext(Tcl_Interp *interp,
0070                 ItclClass **iclsPtrPtr,
0071                 ItclObject **ioPtrPtr);
0072 /* 18 */
0073 ITCLAPI void        Itcl_InitHierIter(ItclHierIter *iter,
0074                 ItclClass *iclsPtr);
0075 /* 19 */
0076 ITCLAPI void        Itcl_DeleteHierIter(ItclHierIter *iter);
0077 /* 20 */
0078 ITCLAPI ItclClass * Itcl_AdvanceHierIter(ItclHierIter *iter);
0079 /* 21 */
0080 ITCLAPI int     Itcl_FindClassesCmd(void *clientData,
0081                 Tcl_Interp *interp, int objc,
0082                 Tcl_Obj *const objv[]);
0083 /* 22 */
0084 ITCLAPI int     Itcl_FindObjectsCmd(void *clientData,
0085                 Tcl_Interp *interp, int objc,
0086                 Tcl_Obj *const objv[]);
0087 /* Slot 23 is reserved */
0088 /* 24 */
0089 ITCLAPI int     Itcl_DelClassCmd(void *clientData,
0090                 Tcl_Interp *interp, int objc,
0091                 Tcl_Obj *const objv[]);
0092 /* 25 */
0093 ITCLAPI int     Itcl_DelObjectCmd(void *clientData,
0094                 Tcl_Interp *interp, int objc,
0095                 Tcl_Obj *const objv[]);
0096 /* 26 */
0097 ITCLAPI int     Itcl_ScopeCmd(void *clientData, Tcl_Interp *interp,
0098                 int objc, Tcl_Obj *const objv[]);
0099 /* 27 */
0100 ITCLAPI int     Itcl_CodeCmd(void *clientData, Tcl_Interp *interp,
0101                 int objc, Tcl_Obj *const objv[]);
0102 /* 28 */
0103 ITCLAPI int     Itcl_StubCreateCmd(void *clientData,
0104                 Tcl_Interp *interp, int objc,
0105                 Tcl_Obj *const objv[]);
0106 /* 29 */
0107 ITCLAPI int     Itcl_StubExistsCmd(void *clientData,
0108                 Tcl_Interp *interp, int objc,
0109                 Tcl_Obj *const objv[]);
0110 /* 30 */
0111 ITCLAPI int     Itcl_IsStub(Tcl_Command cmd);
0112 /* 31 */
0113 ITCLAPI int     Itcl_CreateClass(Tcl_Interp *interp,
0114                 const char *path, ItclObjectInfo *info,
0115                 ItclClass **rPtr);
0116 /* 32 */
0117 ITCLAPI int     Itcl_DeleteClass(Tcl_Interp *interp,
0118                 ItclClass *iclsPtr);
0119 /* 33 */
0120 ITCLAPI Tcl_Namespace *  Itcl_FindClassNamespace(Tcl_Interp *interp,
0121                 const char *path);
0122 /* 34 */
0123 ITCLAPI int     Itcl_HandleClass(void *clientData,
0124                 Tcl_Interp *interp, int objc,
0125                 Tcl_Obj *const objv[]);
0126 /* Slot 35 is reserved */
0127 /* Slot 36 is reserved */
0128 /* Slot 37 is reserved */
0129 /* 38 */
0130 ITCLAPI void        Itcl_BuildVirtualTables(ItclClass *iclsPtr);
0131 /* 39 */
0132 ITCLAPI int     Itcl_CreateVariable(Tcl_Interp *interp,
0133                 ItclClass *iclsPtr, Tcl_Obj *name,
0134                 char *init, char *config,
0135                 ItclVariable **ivPtr);
0136 /* 40 */
0137 ITCLAPI void        Itcl_DeleteVariable(char *cdata);
0138 /* 41 */
0139 ITCLAPI const char *    Itcl_GetCommonVar(Tcl_Interp *interp,
0140                 const char *name, ItclClass *contextClass);
0141 /* Slot 42 is reserved */
0142 /* Slot 43 is reserved */
0143 /* 44 */
0144 ITCLAPI int     Itcl_CreateObject(Tcl_Interp *interp,
0145                 const char*name, ItclClass *iclsPtr,
0146                 Tcl_Size objc, Tcl_Obj *const objv[],
0147                 ItclObject **rioPtr);
0148 /* 45 */
0149 ITCLAPI int     Itcl_DeleteObject(Tcl_Interp *interp,
0150                 ItclObject *contextObj);
0151 /* 46 */
0152 ITCLAPI int     Itcl_DestructObject(Tcl_Interp *interp,
0153                 ItclObject *contextObj, int flags);
0154 /* Slot 47 is reserved */
0155 /* 48 */
0156 ITCLAPI const char *    Itcl_GetInstanceVar(Tcl_Interp *interp,
0157                 const char *name, ItclObject *contextIoPtr,
0158                 ItclClass *contextIclsPtr);
0159 /* Slot 49 is reserved */
0160 /* 50 */
0161 ITCLAPI int     Itcl_BodyCmd(void *dummy, Tcl_Interp *interp,
0162                 int objc, Tcl_Obj *const objv[]);
0163 /* 51 */
0164 ITCLAPI int     Itcl_ConfigBodyCmd(void *dummy, Tcl_Interp *interp,
0165                 int objc, Tcl_Obj *const objv[]);
0166 /* 52 */
0167 ITCLAPI int     Itcl_CreateMethod(Tcl_Interp *interp,
0168                 ItclClass *iclsPtr, Tcl_Obj *namePtr,
0169                 const char *arglist, const char *body);
0170 /* 53 */
0171 ITCLAPI int     Itcl_CreateProc(Tcl_Interp *interp,
0172                 ItclClass *iclsPtr, Tcl_Obj *namePtr,
0173                 const char *arglist, const char *body);
0174 /* 54 */
0175 ITCLAPI int     Itcl_CreateMemberFunc(Tcl_Interp *interp,
0176                 ItclClass *iclsPtr, Tcl_Obj *name,
0177                 const char *arglist, const char *body,
0178                 ItclMemberFunc **mfuncPtr);
0179 /* 55 */
0180 ITCLAPI int     Itcl_ChangeMemberFunc(Tcl_Interp *interp,
0181                 ItclMemberFunc *mfunc, const char *arglist,
0182                 const char *body);
0183 /* 56 */
0184 ITCLAPI void        Itcl_DeleteMemberFunc(void *cdata);
0185 /* 57 */
0186 ITCLAPI int     Itcl_CreateMemberCode(Tcl_Interp *interp,
0187                 ItclClass *iclsPtr, const char *arglist,
0188                 const char *body, ItclMemberCode **mcodePtr);
0189 /* 58 */
0190 ITCLAPI void        Itcl_DeleteMemberCode(void *cdata);
0191 /* 59 */
0192 ITCLAPI int     Itcl_GetMemberCode(Tcl_Interp *interp,
0193                 ItclMemberFunc *mfunc);
0194 /* Slot 60 is reserved */
0195 /* 61 */
0196 ITCLAPI int     Itcl_EvalMemberCode(Tcl_Interp *interp,
0197                 ItclMemberFunc *mfunc,
0198                 ItclObject *contextObj, Tcl_Size objc,
0199                 Tcl_Obj *const objv[]);
0200 /* 62 */
0201 ITCLAPI int     Itcl_ExecMethod2(void *clientData,
0202                 Tcl_Interp *interp, Tcl_Size objc,
0203                 Tcl_Obj *const objv[]);
0204 /* 63 */
0205 ITCLAPI int     Itcl_ExecProc2(void *clientData, Tcl_Interp *interp,
0206                 Tcl_Size objc, Tcl_Obj *const objv[]);
0207 /* Slot 64 is reserved */
0208 /* Slot 65 is reserved */
0209 /* Slot 66 is reserved */
0210 /* 67 */
0211 ITCLAPI void        Itcl_GetMemberFuncUsage(ItclMemberFunc *mfunc,
0212                 ItclObject *contextObj, Tcl_Obj *objPtr);
0213 /* 68 */
0214 ITCLAPI int     Itcl_ExecMethod(void *clientData, Tcl_Interp *interp,
0215                 int objc, Tcl_Obj *const objv[]);
0216 /* 69 */
0217 ITCLAPI int     Itcl_ExecProc(void *clientData, Tcl_Interp *interp,
0218                 int objc, Tcl_Obj *const objv[]);
0219 /* Slot 70 is reserved */
0220 /* 71 */
0221 ITCLAPI int     Itcl_ConstructBase(Tcl_Interp *interp,
0222                 ItclObject *contextObj,
0223                 ItclClass *contextClass);
0224 /* 72 */
0225 ITCLAPI int     Itcl_InvokeMethodIfExists(Tcl_Interp *interp,
0226                 const char *name, ItclClass *contextClass,
0227                 ItclObject *contextObj, Tcl_Size objc,
0228                 Tcl_Obj *const objv[]);
0229 /* Slot 73 is reserved */
0230 /* 74 */
0231 ITCLAPI int     Itcl_ReportFuncErrors(Tcl_Interp *interp,
0232                 ItclMemberFunc *mfunc,
0233                 ItclObject *contextObj, int result);
0234 /* 75 */
0235 ITCLAPI int     Itcl_ParseInit(Tcl_Interp *interp,
0236                 ItclObjectInfo *info);
0237 /* 76 */
0238 ITCLAPI int     Itcl_ClassCmd(void *clientData, Tcl_Interp *interp,
0239                 int objc, Tcl_Obj *const objv[]);
0240 /* 77 */
0241 ITCLAPI int     Itcl_ClassInheritCmd(void *clientData,
0242                 Tcl_Interp *interp, int objc,
0243                 Tcl_Obj *const objv[]);
0244 /* 78 */
0245 ITCLAPI int     Itcl_ClassProtectionCmd(void *clientData,
0246                 Tcl_Interp *interp, int objc,
0247                 Tcl_Obj *const objv[]);
0248 /* 79 */
0249 ITCLAPI int     Itcl_ClassConstructorCmd(void *clientData,
0250                 Tcl_Interp *interp, int objc,
0251                 Tcl_Obj *const objv[]);
0252 /* 80 */
0253 ITCLAPI int     Itcl_ClassDestructorCmd(void *clientData,
0254                 Tcl_Interp *interp, int objc,
0255                 Tcl_Obj *const objv[]);
0256 /* 81 */
0257 ITCLAPI int     Itcl_ClassMethodCmd(void *clientData,
0258                 Tcl_Interp *interp, int objc,
0259                 Tcl_Obj *const objv[]);
0260 /* 82 */
0261 ITCLAPI int     Itcl_ClassProcCmd(void *clientData,
0262                 Tcl_Interp *interp, int objc,
0263                 Tcl_Obj *const objv[]);
0264 /* 83 */
0265 ITCLAPI int     Itcl_ClassVariableCmd(void *clientData,
0266                 Tcl_Interp *interp, int objc,
0267                 Tcl_Obj *const objv[]);
0268 /* 84 */
0269 ITCLAPI int     Itcl_ClassCommonCmd(void *clientData,
0270                 Tcl_Interp *interp, int objc,
0271                 Tcl_Obj *const objv[]);
0272 /* 85 */
0273 ITCLAPI int     Itcl_ParseVarResolver(Tcl_Interp *interp,
0274                 const char *name, Tcl_Namespace *contextNs,
0275                 int flags, Tcl_Var *rPtr);
0276 /* 86 */
0277 ITCLAPI int     Itcl_BiInit(Tcl_Interp *interp,
0278                 ItclObjectInfo *infoPtr);
0279 /* 87 */
0280 ITCLAPI int     Itcl_InstallBiMethods(Tcl_Interp *interp,
0281                 ItclClass *cdefn);
0282 /* 88 */
0283 ITCLAPI int     Itcl_BiIsaCmd(void *clientData, Tcl_Interp *interp,
0284                 int objc, Tcl_Obj *const objv[]);
0285 /* 89 */
0286 ITCLAPI int     Itcl_BiConfigureCmd(void *clientData,
0287                 Tcl_Interp *interp, int objc,
0288                 Tcl_Obj *const objv[]);
0289 /* 90 */
0290 ITCLAPI int     Itcl_BiCgetCmd(void *clientData, Tcl_Interp *interp,
0291                 int objc, Tcl_Obj *const objv[]);
0292 /* 91 */
0293 ITCLAPI int     Itcl_BiChainCmd(void *dummy, Tcl_Interp *interp,
0294                 int objc, Tcl_Obj *const objv[]);
0295 /* 92 */
0296 ITCLAPI int     Itcl_BiInfoClassCmd(void *dummy, Tcl_Interp *interp,
0297                 int objc, Tcl_Obj *const objv[]);
0298 /* 93 */
0299 ITCLAPI int     Itcl_BiInfoInheritCmd(void *dummy,
0300                 Tcl_Interp *interp, int objc,
0301                 Tcl_Obj *const objv[]);
0302 /* 94 */
0303 ITCLAPI int     Itcl_BiInfoHeritageCmd(void *dummy,
0304                 Tcl_Interp *interp, int objc,
0305                 Tcl_Obj *const objv[]);
0306 /* 95 */
0307 ITCLAPI int     Itcl_BiInfoFunctionCmd(void *dummy,
0308                 Tcl_Interp *interp, int objc,
0309                 Tcl_Obj *const objv[]);
0310 /* 96 */
0311 ITCLAPI int     Itcl_BiInfoVariableCmd(void *dummy,
0312                 Tcl_Interp *interp, int objc,
0313                 Tcl_Obj *const objv[]);
0314 /* 97 */
0315 ITCLAPI int     Itcl_BiInfoBodyCmd(void *dummy, Tcl_Interp *interp,
0316                 int objc, Tcl_Obj *const objv[]);
0317 /* 98 */
0318 ITCLAPI int     Itcl_BiInfoArgsCmd(void *dummy, Tcl_Interp *interp,
0319                 int objc, Tcl_Obj *const objv[]);
0320 /* Slot 99 is reserved */
0321 /* 100 */
0322 ITCLAPI int     Itcl_EnsembleInit(Tcl_Interp *interp);
0323 /* 101 */
0324 ITCLAPI int     Itcl_CreateEnsemble(Tcl_Interp *interp,
0325                 const char *ensName);
0326 /* 102 */
0327 ITCLAPI int     Itcl_AddEnsemblePart(Tcl_Interp *interp,
0328                 const char *ensName, const char *partName,
0329                 const char *usageInfo,
0330                 Tcl_ObjCmdProc *objProc, void *clientData,
0331                 Tcl_CmdDeleteProc *deleteProc);
0332 /* 103 */
0333 ITCLAPI int     Itcl_GetEnsemblePart(Tcl_Interp *interp,
0334                 const char *ensName, const char *partName,
0335                 Tcl_CmdInfo *infoPtr);
0336 /* 104 */
0337 ITCLAPI int     Itcl_IsEnsemble(Tcl_CmdInfo *infoPtr);
0338 /* 105 */
0339 ITCLAPI int     Itcl_GetEnsembleUsage(Tcl_Interp *interp,
0340                 const char *ensName, Tcl_Obj *objPtr);
0341 /* 106 */
0342 ITCLAPI int     Itcl_GetEnsembleUsageForObj(Tcl_Interp *interp,
0343                 Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr);
0344 /* 107 */
0345 ITCLAPI int     Itcl_EnsembleCmd(void *clientData,
0346                 Tcl_Interp *interp, int objc,
0347                 Tcl_Obj *const objv[]);
0348 /* 108 */
0349 ITCLAPI int     Itcl_EnsPartCmd(void *clientData, Tcl_Interp *interp,
0350                 int objc, Tcl_Obj *const objv[]);
0351 /* 109 */
0352 ITCLAPI int     Itcl_EnsembleErrorCmd(void *clientData,
0353                 Tcl_Interp *interp, Tcl_Size objc,
0354                 Tcl_Obj *const objv[]);
0355 /* Slot 110 is reserved */
0356 /* Slot 111 is reserved */
0357 /* Slot 112 is reserved */
0358 /* Slot 113 is reserved */
0359 /* Slot 114 is reserved */
0360 /* 115 */
0361 ITCLAPI void        Itcl_Assert(const char *testExpr,
0362                 const char *fileName, int lineNum);
0363 /* 116 */
0364 ITCLAPI int     Itcl_IsObjectCmd(void *clientData,
0365                 Tcl_Interp *interp, int objc,
0366                 Tcl_Obj *const objv[]);
0367 /* 117 */
0368 ITCLAPI int     Itcl_IsClassCmd(void *clientData, Tcl_Interp *interp,
0369                 int objc, Tcl_Obj *const objv[]);
0370 /* 118 */
0371 ITCLAPI int     Itcl_AddEnsemblePart2(Tcl_Interp *interp,
0372                 const char *ensName, const char *partName,
0373                 const char *usageInfo,
0374                 Tcl_ObjCmdProc2 *objProc, void *clientData,
0375                 Tcl_CmdDeleteProc *deleteProc);
0376 /* Slot 119 is reserved */
0377 /* Slot 120 is reserved */
0378 /* Slot 121 is reserved */
0379 /* Slot 122 is reserved */
0380 /* Slot 123 is reserved */
0381 /* Slot 124 is reserved */
0382 /* Slot 125 is reserved */
0383 /* Slot 126 is reserved */
0384 /* Slot 127 is reserved */
0385 /* Slot 128 is reserved */
0386 /* Slot 129 is reserved */
0387 /* Slot 130 is reserved */
0388 /* Slot 131 is reserved */
0389 /* Slot 132 is reserved */
0390 /* Slot 133 is reserved */
0391 /* Slot 134 is reserved */
0392 /* Slot 135 is reserved */
0393 /* Slot 136 is reserved */
0394 /* Slot 137 is reserved */
0395 /* Slot 138 is reserved */
0396 /* Slot 139 is reserved */
0397 /* 140 */
0398 ITCLAPI int     Itcl_FilterAddCmd(void *clientData,
0399                 Tcl_Interp *interp, int objc,
0400                 Tcl_Obj *const objv[]);
0401 /* 141 */
0402 ITCLAPI int     Itcl_FilterDeleteCmd(void *clientData,
0403                 Tcl_Interp *interp, int objc,
0404                 Tcl_Obj *const objv[]);
0405 /* 142 */
0406 ITCLAPI int     Itcl_ForwardAddCmd(void *clientData,
0407                 Tcl_Interp *interp, int objc,
0408                 Tcl_Obj *const objv[]);
0409 /* 143 */
0410 ITCLAPI int     Itcl_ForwardDeleteCmd(void *clientData,
0411                 Tcl_Interp *interp, int objc,
0412                 Tcl_Obj *const objv[]);
0413 /* 144 */
0414 ITCLAPI int     Itcl_MixinAddCmd(void *clientData,
0415                 Tcl_Interp *interp, int objc,
0416                 Tcl_Obj *const objv[]);
0417 /* 145 */
0418 ITCLAPI int     Itcl_MixinDeleteCmd(void *clientData,
0419                 Tcl_Interp *interp, int objc,
0420                 Tcl_Obj *const objv[]);
0421 /* Slot 146 is reserved */
0422 /* Slot 147 is reserved */
0423 /* Slot 148 is reserved */
0424 /* Slot 149 is reserved */
0425 /* Slot 150 is reserved */
0426 /* 151 */
0427 ITCLAPI int     Itcl_BiInfoUnknownCmd(void *dummy,
0428                 Tcl_Interp *interp, int objc,
0429                 Tcl_Obj *const objv[]);
0430 /* 152 */
0431 ITCLAPI int     Itcl_BiInfoVarsCmd(void *dummy, Tcl_Interp *interp,
0432                 int objc, Tcl_Obj *const objv[]);
0433 /* 153 */
0434 ITCLAPI int     Itcl_CanAccess2(ItclClass *iclsPtr, int protection,
0435                 Tcl_Namespace *fromNsPtr);
0436 /* Slot 154 is reserved */
0437 /* Slot 155 is reserved */
0438 /* Slot 156 is reserved */
0439 /* Slot 157 is reserved */
0440 /* Slot 158 is reserved */
0441 /* Slot 159 is reserved */
0442 /* 160 */
0443 ITCLAPI int     Itcl_SetCallFrameResolver(Tcl_Interp *interp,
0444                 Tcl_Resolve *resolvePtr);
0445 /* 161 */
0446 ITCLAPI int     ItclEnsembleSubCmd(void *clientData,
0447                 Tcl_Interp *interp, const char *ensembleName,
0448                 int objc, Tcl_Obj *const *objv,
0449                 const char *functionName);
0450 /* 162 */
0451 ITCLAPI Tcl_Namespace *  Itcl_GetUplevelNamespace(Tcl_Interp *interp,
0452                 int level);
0453 /* 163 */
0454 ITCLAPI void *      Itcl_GetCallFrameClientData(Tcl_Interp *interp);
0455 /* Slot 164 is reserved */
0456 /* 165 */
0457 ITCLAPI int     Itcl_SetCallFrameNamespace(Tcl_Interp *interp,
0458                 Tcl_Namespace *nsPtr);
0459 /* 166 */
0460 ITCLAPI Tcl_Size    Itcl_GetCallFrameObjc(Tcl_Interp *interp);
0461 /* 167 */
0462 ITCLAPI Tcl_Obj *const * Itcl_GetCallFrameObjv(Tcl_Interp *interp);
0463 /* 168 */
0464 ITCLAPI int     Itcl_NWidgetCmd(void *infoPtr, Tcl_Interp *interp,
0465                 int objc, Tcl_Obj *const objv[]);
0466 /* 169 */
0467 ITCLAPI int     Itcl_AddOptionCmd(void *infoPtr, Tcl_Interp *interp,
0468                 int objc, Tcl_Obj *const objv[]);
0469 /* 170 */
0470 ITCLAPI int     Itcl_AddComponentCmd(void *infoPtr,
0471                 Tcl_Interp *interp, int objc,
0472                 Tcl_Obj *const objv[]);
0473 /* 171 */
0474 ITCLAPI int     Itcl_BiInfoOptionCmd(void *dummy, Tcl_Interp *interp,
0475                 int objc, Tcl_Obj *const objv[]);
0476 /* 172 */
0477 ITCLAPI int     Itcl_BiInfoComponentCmd(void *dummy,
0478                 Tcl_Interp *interp, int objc,
0479                 Tcl_Obj *const objv[]);
0480 /* 173 */
0481 ITCLAPI int     Itcl_RenameCommand(Tcl_Interp *interp,
0482                 const char *oldName, const char *newName);
0483 /* 174 */
0484 ITCLAPI int     Itcl_PushCallFrame(Tcl_Interp *interp,
0485                 Tcl_CallFrame *framePtr,
0486                 Tcl_Namespace *nsPtr, int isProcCallFrame);
0487 /* 175 */
0488 ITCLAPI void        Itcl_PopCallFrame(Tcl_Interp *interp);
0489 /* 176 */
0490 ITCLAPI Tcl_CallFrame *  Itcl_GetUplevelCallFrame(Tcl_Interp *interp,
0491                 int level);
0492 /* 177 */
0493 ITCLAPI Tcl_CallFrame *  Itcl_ActivateCallFrame(Tcl_Interp *interp,
0494                 Tcl_CallFrame *framePtr);
0495 /* 178 */
0496 ITCLAPI const char* ItclSetInstanceVar(Tcl_Interp *interp,
0497                 const char *name, const char *name2,
0498                 const char *value, ItclObject *contextIoPtr,
0499                 ItclClass *contextIclsPtr);
0500 /* 179 */
0501 ITCLAPI Tcl_Obj *   ItclCapitalize(const char *str);
0502 /* 180 */
0503 ITCLAPI int     ItclClassBaseCmd(void *clientData,
0504                 Tcl_Interp *interp, int flags, int objc,
0505                 Tcl_Obj *const objv[],
0506                 ItclClass **iclsPtrPtr);
0507 /* 181 */
0508 ITCLAPI int     ItclCreateComponent(Tcl_Interp *interp,
0509                 ItclClass *iclsPtr, Tcl_Obj *componentPtr,
0510                 int type, ItclComponent **icPtrPtr);
0511 /* 182 */
0512 ITCLAPI void        Itcl_SetContext(Tcl_Interp *interp,
0513                 ItclObject *ioPtr);
0514 /* 183 */
0515 ITCLAPI void        Itcl_UnsetContext(Tcl_Interp *interp);
0516 /* 184 */
0517 ITCLAPI const char *    ItclGetInstanceVar(Tcl_Interp *interp,
0518                 const char *name, const char *name2,
0519                 ItclObject *ioPtr, ItclClass *iclsPtr);
0520
0521 typedef struct ItclIntStubs {
0522     int magic;
0523     int epoch;
0524     int revision;
0525     void *hooks;
0526
0527     int (*itcl_IsClassNamespace) (Tcl_Namespace *namesp); /* 0 */
0528     int (*itcl_IsClass) (Tcl_Command cmd); /* 1 */
0529     ItclClass * (*itcl_FindClass) (Tcl_Interp *interp, const char *path, int autoload); /* 2 */
0530     int (*itcl_FindObject) (Tcl_Interp *interp, const char *name, ItclObject **roPtr); /* 3 */
0531     int (*itcl_IsObject) (Tcl_Command cmd); /* 4 */
0532     int (*itcl_ObjectIsa) (ItclObject *contextObj, ItclClass *cdefn); /* 5 */
0533     int (*itcl_Protection) (Tcl_Interp *interp, int newLevel); /* 6 */
0534     const char * (*itcl_ProtectionStr) (int pLevel); /* 7 */
0535     int (*itcl_CanAccess) (ItclMemberFunc *memberPtr, Tcl_Namespace *fromNsPtr); /* 8 */
0536     int (*itcl_CanAccessFunc) (ItclMemberFunc *mfunc, Tcl_Namespace *fromNsPtr); /* 9 */
0537     void (*reserved10)(void);
0538     void (*itcl_ParseNamespPath) (const char *name, Tcl_DString *buffer, const char **head, const char **tail); /* 11 */
0539     int (*itcl_DecodeScopedCommand) (Tcl_Interp *interp, const char *name, Tcl_Namespace **rNsPtr, char **rCmdPtr); /* 12 */
0540     int (*itcl_EvalArgs) (Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 13 */
0541     Tcl_Obj * (*itcl_CreateArgs) (Tcl_Interp *interp, const char *string, Tcl_Size objc, Tcl_Obj *const objv[]); /* 14 */
0542     void (*reserved15)(void);
0543     void (*reserved16)(void);
0544     int (*itcl_GetContext) (Tcl_Interp *interp, ItclClass **iclsPtrPtr, ItclObject **ioPtrPtr); /* 17 */
0545     void (*itcl_InitHierIter) (ItclHierIter *iter, ItclClass *iclsPtr); /* 18 */
0546     void (*itcl_DeleteHierIter) (ItclHierIter *iter); /* 19 */
0547     ItclClass * (*itcl_AdvanceHierIter) (ItclHierIter *iter); /* 20 */
0548     int (*itcl_FindClassesCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 21 */
0549     int (*itcl_FindObjectsCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 22 */
0550     void (*reserved23)(void);
0551     int (*itcl_DelClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 24 */
0552     int (*itcl_DelObjectCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 25 */
0553     int (*itcl_ScopeCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 26 */
0554     int (*itcl_CodeCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 27 */
0555     int (*itcl_StubCreateCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 28 */
0556     int (*itcl_StubExistsCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 29 */
0557     int (*itcl_IsStub) (Tcl_Command cmd); /* 30 */
0558     int (*itcl_CreateClass) (Tcl_Interp *interp, const char *path, ItclObjectInfo *info, ItclClass **rPtr); /* 31 */
0559     int (*itcl_DeleteClass) (Tcl_Interp *interp, ItclClass *iclsPtr); /* 32 */
0560     Tcl_Namespace * (*itcl_FindClassNamespace) (Tcl_Interp *interp, const char *path); /* 33 */
0561     int (*itcl_HandleClass) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 34 */
0562     void (*reserved35)(void);
0563     void (*reserved36)(void);
0564     void (*reserved37)(void);
0565     void (*itcl_BuildVirtualTables) (ItclClass *iclsPtr); /* 38 */
0566     int (*itcl_CreateVariable) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, char *init, char *config, ItclVariable **ivPtr); /* 39 */
0567     void (*itcl_DeleteVariable) (char *cdata); /* 40 */
0568     const char * (*itcl_GetCommonVar) (Tcl_Interp *interp, const char *name, ItclClass *contextClass); /* 41 */
0569     void (*reserved42)(void);
0570     void (*reserved43)(void);
0571     int (*itcl_CreateObject) (Tcl_Interp *interp, const char*name, ItclClass *iclsPtr, Tcl_Size objc, Tcl_Obj *const objv[], ItclObject **rioPtr); /* 44 */
0572     int (*itcl_DeleteObject) (Tcl_Interp *interp, ItclObject *contextObj); /* 45 */
0573     int (*itcl_DestructObject) (Tcl_Interp *interp, ItclObject *contextObj, int flags); /* 46 */
0574     void (*reserved47)(void);
0575     const char * (*itcl_GetInstanceVar) (Tcl_Interp *interp, const char *name, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 48 */
0576     void (*reserved49)(void);
0577     int (*itcl_BodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 50 */
0578     int (*itcl_ConfigBodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 51 */
0579     int (*itcl_CreateMethod) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 52 */
0580     int (*itcl_CreateProc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *namePtr, const char *arglist, const char *body); /* 53 */
0581     int (*itcl_CreateMemberFunc) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *name, const char *arglist, const char *body, ItclMemberFunc **mfuncPtr); /* 54 */
0582     int (*itcl_ChangeMemberFunc) (Tcl_Interp *interp, ItclMemberFunc *mfunc, const char *arglist, const char *body); /* 55 */
0583     void (*itcl_DeleteMemberFunc) (void *cdata); /* 56 */
0584     int (*itcl_CreateMemberCode) (Tcl_Interp *interp, ItclClass *iclsPtr, const char *arglist, const char *body, ItclMemberCode **mcodePtr); /* 57 */
0585     void (*itcl_DeleteMemberCode) (void *cdata); /* 58 */
0586     int (*itcl_GetMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc); /* 59 */
0587     void (*reserved60)(void);
0588     int (*itcl_EvalMemberCode) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, Tcl_Size objc, Tcl_Obj *const objv[]); /* 61 */
0589     int (*itcl_ExecMethod2) (void *clientData, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 62 */
0590     int (*itcl_ExecProc2) (void *clientData, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 63 */
0591     void (*reserved64)(void);
0592     void (*reserved65)(void);
0593     void (*reserved66)(void);
0594     void (*itcl_GetMemberFuncUsage) (ItclMemberFunc *mfunc, ItclObject *contextObj, Tcl_Obj *objPtr); /* 67 */
0595     int (*itcl_ExecMethod) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 68 */
0596     int (*itcl_ExecProc) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 69 */
0597     void (*reserved70)(void);
0598     int (*itcl_ConstructBase) (Tcl_Interp *interp, ItclObject *contextObj, ItclClass *contextClass); /* 71 */
0599     int (*itcl_InvokeMethodIfExists) (Tcl_Interp *interp, const char *name, ItclClass *contextClass, ItclObject *contextObj, Tcl_Size objc, Tcl_Obj *const objv[]); /* 72 */
0600     void (*reserved73)(void);
0601     int (*itcl_ReportFuncErrors) (Tcl_Interp *interp, ItclMemberFunc *mfunc, ItclObject *contextObj, int result); /* 74 */
0602     int (*itcl_ParseInit) (Tcl_Interp *interp, ItclObjectInfo *info); /* 75 */
0603     int (*itcl_ClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 76 */
0604     int (*itcl_ClassInheritCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 77 */
0605     int (*itcl_ClassProtectionCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 78 */
0606     int (*itcl_ClassConstructorCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 79 */
0607     int (*itcl_ClassDestructorCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 80 */
0608     int (*itcl_ClassMethodCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 81 */
0609     int (*itcl_ClassProcCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 82 */
0610     int (*itcl_ClassVariableCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 83 */
0611     int (*itcl_ClassCommonCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 84 */
0612     int (*itcl_ParseVarResolver) (Tcl_Interp *interp, const char *name, Tcl_Namespace *contextNs, int flags, Tcl_Var *rPtr); /* 85 */
0613     int (*itcl_BiInit) (Tcl_Interp *interp, ItclObjectInfo *infoPtr); /* 86 */
0614     int (*itcl_InstallBiMethods) (Tcl_Interp *interp, ItclClass *cdefn); /* 87 */
0615     int (*itcl_BiIsaCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 88 */
0616     int (*itcl_BiConfigureCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 89 */
0617     int (*itcl_BiCgetCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 90 */
0618     int (*itcl_BiChainCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 91 */
0619     int (*itcl_BiInfoClassCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 92 */
0620     int (*itcl_BiInfoInheritCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 93 */
0621     int (*itcl_BiInfoHeritageCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 94 */
0622     int (*itcl_BiInfoFunctionCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 95 */
0623     int (*itcl_BiInfoVariableCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 96 */
0624     int (*itcl_BiInfoBodyCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 97 */
0625     int (*itcl_BiInfoArgsCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 98 */
0626     void (*reserved99)(void);
0627     int (*itcl_EnsembleInit) (Tcl_Interp *interp); /* 100 */
0628     int (*itcl_CreateEnsemble) (Tcl_Interp *interp, const char *ensName); /* 101 */
0629     int (*itcl_AddEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, const char *usageInfo, Tcl_ObjCmdProc *objProc, void *clientData, Tcl_CmdDeleteProc *deleteProc); /* 102 */
0630     int (*itcl_GetEnsemblePart) (Tcl_Interp *interp, const char *ensName, const char *partName, Tcl_CmdInfo *infoPtr); /* 103 */
0631     int (*itcl_IsEnsemble) (Tcl_CmdInfo *infoPtr); /* 104 */
0632     int (*itcl_GetEnsembleUsage) (Tcl_Interp *interp, const char *ensName, Tcl_Obj *objPtr); /* 105 */
0633     int (*itcl_GetEnsembleUsageForObj) (Tcl_Interp *interp, Tcl_Obj *ensObjPtr, Tcl_Obj *objPtr); /* 106 */
0634     int (*itcl_EnsembleCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 107 */
0635     int (*itcl_EnsPartCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 108 */
0636     int (*itcl_EnsembleErrorCmd) (void *clientData, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *const objv[]); /* 109 */
0637     void (*reserved110)(void);
0638     void (*reserved111)(void);
0639     void (*reserved112)(void);
0640     void (*reserved113)(void);
0641     void (*reserved114)(void);
0642     void (*itcl_Assert) (const char *testExpr, const char *fileName, int lineNum); /* 115 */
0643     int (*itcl_IsObjectCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 116 */
0644     int (*itcl_IsClassCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 117 */
0645     int (*itcl_AddEnsemblePart2) (Tcl_Interp *interp, const char *ensName, const char *partName, const char *usageInfo, Tcl_ObjCmdProc2 *objProc, void *clientData, Tcl_CmdDeleteProc *deleteProc); /* 118 */
0646     void (*reserved119)(void);
0647     void (*reserved120)(void);
0648     void (*reserved121)(void);
0649     void (*reserved122)(void);
0650     void (*reserved123)(void);
0651     void (*reserved124)(void);
0652     void (*reserved125)(void);
0653     void (*reserved126)(void);
0654     void (*reserved127)(void);
0655     void (*reserved128)(void);
0656     void (*reserved129)(void);
0657     void (*reserved130)(void);
0658     void (*reserved131)(void);
0659     void (*reserved132)(void);
0660     void (*reserved133)(void);
0661     void (*reserved134)(void);
0662     void (*reserved135)(void);
0663     void (*reserved136)(void);
0664     void (*reserved137)(void);
0665     void (*reserved138)(void);
0666     void (*reserved139)(void);
0667     int (*itcl_FilterAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 140 */
0668     int (*itcl_FilterDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 141 */
0669     int (*itcl_ForwardAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 142 */
0670     int (*itcl_ForwardDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 143 */
0671     int (*itcl_MixinAddCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 144 */
0672     int (*itcl_MixinDeleteCmd) (void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 145 */
0673     void (*reserved146)(void);
0674     void (*reserved147)(void);
0675     void (*reserved148)(void);
0676     void (*reserved149)(void);
0677     void (*reserved150)(void);
0678     int (*itcl_BiInfoUnknownCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 151 */
0679     int (*itcl_BiInfoVarsCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 152 */
0680     int (*itcl_CanAccess2) (ItclClass *iclsPtr, int protection, Tcl_Namespace *fromNsPtr); /* 153 */
0681     void (*reserved154)(void);
0682     void (*reserved155)(void);
0683     void (*reserved156)(void);
0684     void (*reserved157)(void);
0685     void (*reserved158)(void);
0686     void (*reserved159)(void);
0687     int (*itcl_SetCallFrameResolver) (Tcl_Interp *interp, Tcl_Resolve *resolvePtr); /* 160 */
0688     int (*itclEnsembleSubCmd) (void *clientData, Tcl_Interp *interp, const char *ensembleName, int objc, Tcl_Obj *const *objv, const char *functionName); /* 161 */
0689     Tcl_Namespace * (*itcl_GetUplevelNamespace) (Tcl_Interp *interp, int level); /* 162 */
0690     void * (*itcl_GetCallFrameClientData) (Tcl_Interp *interp); /* 163 */
0691     void (*reserved164)(void);
0692     int (*itcl_SetCallFrameNamespace) (Tcl_Interp *interp, Tcl_Namespace *nsPtr); /* 165 */
0693     Tcl_Size (*itcl_GetCallFrameObjc) (Tcl_Interp *interp); /* 166 */
0694     Tcl_Obj *const * (*itcl_GetCallFrameObjv) (Tcl_Interp *interp); /* 167 */
0695     int (*itcl_NWidgetCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 168 */
0696     int (*itcl_AddOptionCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 169 */
0697     int (*itcl_AddComponentCmd) (void *infoPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 170 */
0698     int (*itcl_BiInfoOptionCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 171 */
0699     int (*itcl_BiInfoComponentCmd) (void *dummy, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); /* 172 */
0700     int (*itcl_RenameCommand) (Tcl_Interp *interp, const char *oldName, const char *newName); /* 173 */
0701     int (*itcl_PushCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr, Tcl_Namespace *nsPtr, int isProcCallFrame); /* 174 */
0702     void (*itcl_PopCallFrame) (Tcl_Interp *interp); /* 175 */
0703     Tcl_CallFrame * (*itcl_GetUplevelCallFrame) (Tcl_Interp *interp, int level); /* 176 */
0704     Tcl_CallFrame * (*itcl_ActivateCallFrame) (Tcl_Interp *interp, Tcl_CallFrame *framePtr); /* 177 */
0705     const char* (*itclSetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, const char *value, ItclObject *contextIoPtr, ItclClass *contextIclsPtr); /* 178 */
0706     Tcl_Obj * (*itclCapitalize) (const char *str); /* 179 */
0707     int (*itclClassBaseCmd) (void *clientData, Tcl_Interp *interp, int flags, int objc, Tcl_Obj *const objv[], ItclClass **iclsPtrPtr); /* 180 */
0708     int (*itclCreateComponent) (Tcl_Interp *interp, ItclClass *iclsPtr, Tcl_Obj *componentPtr, int type, ItclComponent **icPtrPtr); /* 181 */
0709     void (*itcl_SetContext) (Tcl_Interp *interp, ItclObject *ioPtr); /* 182 */
0710     void (*itcl_UnsetContext) (Tcl_Interp *interp); /* 183 */
0711     const char * (*itclGetInstanceVar) (Tcl_Interp *interp, const char *name, const char *name2, ItclObject *ioPtr, ItclClass *iclsPtr); /* 184 */
0712 } ItclIntStubs;
0713
0714 extern const ItclIntStubs *itclIntStubsPtr;
0715
0716 #ifdef __cplusplus
0717 }
0718 #endif
0719
0720 #if defined(USE_ITCL_STUBS)
0721
0722 /*
0723  * Inline function declarations:
0724  */
0725
0726 #define Itcl_IsClassNamespace \
0727     (itclIntStubsPtr->itcl_IsClassNamespace) /* 0 */
0728 #define Itcl_IsClass \
0729     (itclIntStubsPtr->itcl_IsClass) /* 1 */
0730 #define Itcl_FindClass \
0731     (itclIntStubsPtr->itcl_FindClass) /* 2 */
0732 #define Itcl_FindObject \
0733     (itclIntStubsPtr->itcl_FindObject) /* 3 */
0734 #define Itcl_IsObject \
0735     (itclIntStubsPtr->itcl_IsObject) /* 4 */
0736 #define Itcl_ObjectIsa \
0737     (itclIntStubsPtr->itcl_ObjectIsa) /* 5 */
0738 #define Itcl_Protection \
0739     (itclIntStubsPtr->itcl_Protection) /* 6 */
0740 #define Itcl_ProtectionStr \
0741     (itclIntStubsPtr->itcl_ProtectionStr) /* 7 */
0742 #define Itcl_CanAccess \
0743     (itclIntStubsPtr->itcl_CanAccess) /* 8 */
0744 #define Itcl_CanAccessFunc \
0745     (itclIntStubsPtr->itcl_CanAccessFunc) /* 9 */
0746 /* Slot 10 is reserved */
0747 #define Itcl_ParseNamespPath \
0748     (itclIntStubsPtr->itcl_ParseNamespPath) /* 11 */
0749 #define Itcl_DecodeScopedCommand \
0750     (itclIntStubsPtr->itcl_DecodeScopedCommand) /* 12 */
0751 #define Itcl_EvalArgs \
0752     (itclIntStubsPtr->itcl_EvalArgs) /* 13 */
0753 #define Itcl_CreateArgs \
0754     (itclIntStubsPtr->itcl_CreateArgs) /* 14 */
0755 /* Slot 15 is reserved */
0756 /* Slot 16 is reserved */
0757 #define Itcl_GetContext \
0758     (itclIntStubsPtr->itcl_GetContext) /* 17 */
0759 #define Itcl_InitHierIter \
0760     (itclIntStubsPtr->itcl_InitHierIter) /* 18 */
0761 #define Itcl_DeleteHierIter \
0762     (itclIntStubsPtr->itcl_DeleteHierIter) /* 19 */
0763 #define Itcl_AdvanceHierIter \
0764     (itclIntStubsPtr->itcl_AdvanceHierIter) /* 20 */
0765 #define Itcl_FindClassesCmd \
0766     (itclIntStubsPtr->itcl_FindClassesCmd) /* 21 */
0767 #define Itcl_FindObjectsCmd \
0768     (itclIntStubsPtr->itcl_FindObjectsCmd) /* 22 */
0769 /* Slot 23 is reserved */
0770 #define Itcl_DelClassCmd \
0771     (itclIntStubsPtr->itcl_DelClassCmd) /* 24 */
0772 #define Itcl_DelObjectCmd \
0773     (itclIntStubsPtr->itcl_DelObjectCmd) /* 25 */
0774 #define Itcl_ScopeCmd \
0775     (itclIntStubsPtr->itcl_ScopeCmd) /* 26 */
0776 #define Itcl_CodeCmd \
0777     (itclIntStubsPtr->itcl_CodeCmd) /* 27 */
0778 #define Itcl_StubCreateCmd \
0779     (itclIntStubsPtr->itcl_StubCreateCmd) /* 28 */
0780 #define Itcl_StubExistsCmd \
0781     (itclIntStubsPtr->itcl_StubExistsCmd) /* 29 */
0782 #define Itcl_IsStub \
0783     (itclIntStubsPtr->itcl_IsStub) /* 30 */
0784 #define Itcl_CreateClass \
0785     (itclIntStubsPtr->itcl_CreateClass) /* 31 */
0786 #define Itcl_DeleteClass \
0787     (itclIntStubsPtr->itcl_DeleteClass) /* 32 */
0788 #define Itcl_FindClassNamespace \
0789     (itclIntStubsPtr->itcl_FindClassNamespace) /* 33 */
0790 #define Itcl_HandleClass \
0791     (itclIntStubsPtr->itcl_HandleClass) /* 34 */
0792 /* Slot 35 is reserved */
0793 /* Slot 36 is reserved */
0794 /* Slot 37 is reserved */
0795 #define Itcl_BuildVirtualTables \
0796     (itclIntStubsPtr->itcl_BuildVirtualTables) /* 38 */
0797 #define Itcl_CreateVariable \
0798     (itclIntStubsPtr->itcl_CreateVariable) /* 39 */
0799 #define Itcl_DeleteVariable \
0800     (itclIntStubsPtr->itcl_DeleteVariable) /* 40 */
0801 #define Itcl_GetCommonVar \
0802     (itclIntStubsPtr->itcl_GetCommonVar) /* 41 */
0803 /* Slot 42 is reserved */
0804 /* Slot 43 is reserved */
0805 #define Itcl_CreateObject \
0806     (itclIntStubsPtr->itcl_CreateObject) /* 44 */
0807 #define Itcl_DeleteObject \
0808     (itclIntStubsPtr->itcl_DeleteObject) /* 45 */
0809 #define Itcl_DestructObject \
0810     (itclIntStubsPtr->itcl_DestructObject) /* 46 */
0811 /* Slot 47 is reserved */
0812 #define Itcl_GetInstanceVar \
0813     (itclIntStubsPtr->itcl_GetInstanceVar) /* 48 */
0814 /* Slot 49 is reserved */
0815 #define Itcl_BodyCmd \
0816     (itclIntStubsPtr->itcl_BodyCmd) /* 50 */
0817 #define Itcl_ConfigBodyCmd \
0818     (itclIntStubsPtr->itcl_ConfigBodyCmd) /* 51 */
0819 #define Itcl_CreateMethod \
0820     (itclIntStubsPtr->itcl_CreateMethod) /* 52 */
0821 #define Itcl_CreateProc \
0822     (itclIntStubsPtr->itcl_CreateProc) /* 53 */
0823 #define Itcl_CreateMemberFunc \
0824     (itclIntStubsPtr->itcl_CreateMemberFunc) /* 54 */
0825 #define Itcl_ChangeMemberFunc \
0826     (itclIntStubsPtr->itcl_ChangeMemberFunc) /* 55 */
0827 #define Itcl_DeleteMemberFunc \
0828     (itclIntStubsPtr->itcl_DeleteMemberFunc) /* 56 */
0829 #define Itcl_CreateMemberCode \
0830     (itclIntStubsPtr->itcl_CreateMemberCode) /* 57 */
0831 #define Itcl_DeleteMemberCode \
0832     (itclIntStubsPtr->itcl_DeleteMemberCode) /* 58 */
0833 #define Itcl_GetMemberCode \
0834     (itclIntStubsPtr->itcl_GetMemberCode) /* 59 */
0835 /* Slot 60 is reserved */
0836 #define Itcl_EvalMemberCode \
0837     (itclIntStubsPtr->itcl_EvalMemberCode) /* 61 */
0838 #define Itcl_ExecMethod2 \
0839     (itclIntStubsPtr->itcl_ExecMethod2) /* 62 */
0840 #define Itcl_ExecProc2 \
0841     (itclIntStubsPtr->itcl_ExecProc2) /* 63 */
0842 /* Slot 64 is reserved */
0843 /* Slot 65 is reserved */
0844 /* Slot 66 is reserved */
0845 #define Itcl_GetMemberFuncUsage \
0846     (itclIntStubsPtr->itcl_GetMemberFuncUsage) /* 67 */
0847 #define Itcl_ExecMethod \
0848     (itclIntStubsPtr->itcl_ExecMethod) /* 68 */
0849 #define Itcl_ExecProc \
0850     (itclIntStubsPtr->itcl_ExecProc) /* 69 */
0851 /* Slot 70 is reserved */
0852 #define Itcl_ConstructBase \
0853     (itclIntStubsPtr->itcl_ConstructBase) /* 71 */
0854 #define Itcl_InvokeMethodIfExists \
0855     (itclIntStubsPtr->itcl_InvokeMethodIfExists) /* 72 */
0856 /* Slot 73 is reserved */
0857 #define Itcl_ReportFuncErrors \
0858     (itclIntStubsPtr->itcl_ReportFuncErrors) /* 74 */
0859 #define Itcl_ParseInit \
0860     (itclIntStubsPtr->itcl_ParseInit) /* 75 */
0861 #define Itcl_ClassCmd \
0862     (itclIntStubsPtr->itcl_ClassCmd) /* 76 */
0863 #define Itcl_ClassInheritCmd \
0864     (itclIntStubsPtr->itcl_ClassInheritCmd) /* 77 */
0865 #define Itcl_ClassProtectionCmd \
0866     (itclIntStubsPtr->itcl_ClassProtectionCmd) /* 78 */
0867 #define Itcl_ClassConstructorCmd \
0868     (itclIntStubsPtr->itcl_ClassConstructorCmd) /* 79 */
0869 #define Itcl_ClassDestructorCmd \
0870     (itclIntStubsPtr->itcl_ClassDestructorCmd) /* 80 */
0871 #define Itcl_ClassMethodCmd \
0872     (itclIntStubsPtr->itcl_ClassMethodCmd) /* 81 */
0873 #define Itcl_ClassProcCmd \
0874     (itclIntStubsPtr->itcl_ClassProcCmd) /* 82 */
0875 #define Itcl_ClassVariableCmd \
0876     (itclIntStubsPtr->itcl_ClassVariableCmd) /* 83 */
0877 #define Itcl_ClassCommonCmd \
0878     (itclIntStubsPtr->itcl_ClassCommonCmd) /* 84 */
0879 #define Itcl_ParseVarResolver \
0880     (itclIntStubsPtr->itcl_ParseVarResolver) /* 85 */
0881 #define Itcl_BiInit \
0882     (itclIntStubsPtr->itcl_BiInit) /* 86 */
0883 #define Itcl_InstallBiMethods \
0884     (itclIntStubsPtr->itcl_InstallBiMethods) /* 87 */
0885 #define Itcl_BiIsaCmd \
0886     (itclIntStubsPtr->itcl_BiIsaCmd) /* 88 */
0887 #define Itcl_BiConfigureCmd \
0888     (itclIntStubsPtr->itcl_BiConfigureCmd) /* 89 */
0889 #define Itcl_BiCgetCmd \
0890     (itclIntStubsPtr->itcl_BiCgetCmd) /* 90 */
0891 #define Itcl_BiChainCmd \
0892     (itclIntStubsPtr->itcl_BiChainCmd) /* 91 */
0893 #define Itcl_BiInfoClassCmd \
0894     (itclIntStubsPtr->itcl_BiInfoClassCmd) /* 92 */
0895 #define Itcl_BiInfoInheritCmd \
0896     (itclIntStubsPtr->itcl_BiInfoInheritCmd) /* 93 */
0897 #define Itcl_BiInfoHeritageCmd \
0898     (itclIntStubsPtr->itcl_BiInfoHeritageCmd) /* 94 */
0899 #define Itcl_BiInfoFunctionCmd \
0900     (itclIntStubsPtr->itcl_BiInfoFunctionCmd) /* 95 */
0901 #define Itcl_BiInfoVariableCmd \
0902     (itclIntStubsPtr->itcl_BiInfoVariableCmd) /* 96 */
0903 #define Itcl_BiInfoBodyCmd \
0904     (itclIntStubsPtr->itcl_BiInfoBodyCmd) /* 97 */
0905 #define Itcl_BiInfoArgsCmd \
0906     (itclIntStubsPtr->itcl_BiInfoArgsCmd) /* 98 */
0907 /* Slot 99 is reserved */
0908 #define Itcl_EnsembleInit \
0909     (itclIntStubsPtr->itcl_EnsembleInit) /* 100 */
0910 #define Itcl_CreateEnsemble \
0911     (itclIntStubsPtr->itcl_CreateEnsemble) /* 101 */
0912 #define Itcl_AddEnsemblePart \
0913     (itclIntStubsPtr->itcl_AddEnsemblePart) /* 102 */
0914 #define Itcl_GetEnsemblePart \
0915     (itclIntStubsPtr->itcl_GetEnsemblePart) /* 103 */
0916 #define Itcl_IsEnsemble \
0917     (itclIntStubsPtr->itcl_IsEnsemble) /* 104 */
0918 #define Itcl_GetEnsembleUsage \
0919     (itclIntStubsPtr->itcl_GetEnsembleUsage) /* 105 */
0920 #define Itcl_GetEnsembleUsageForObj \
0921     (itclIntStubsPtr->itcl_GetEnsembleUsageForObj) /* 106 */
0922 #define Itcl_EnsembleCmd \
0923     (itclIntStubsPtr->itcl_EnsembleCmd) /* 107 */
0924 #define Itcl_EnsPartCmd \
0925     (itclIntStubsPtr->itcl_EnsPartCmd) /* 108 */
0926 #define Itcl_EnsembleErrorCmd \
0927     (itclIntStubsPtr->itcl_EnsembleErrorCmd) /* 109 */
0928 /* Slot 110 is reserved */
0929 /* Slot 111 is reserved */
0930 /* Slot 112 is reserved */
0931 /* Slot 113 is reserved */
0932 /* Slot 114 is reserved */
0933 #define Itcl_Assert \
0934     (itclIntStubsPtr->itcl_Assert) /* 115 */
0935 #define Itcl_IsObjectCmd \
0936     (itclIntStubsPtr->itcl_IsObjectCmd) /* 116 */
0937 #define Itcl_IsClassCmd \
0938     (itclIntStubsPtr->itcl_IsClassCmd) /* 117 */
0939 #define Itcl_AddEnsemblePart2 \
0940     (itclIntStubsPtr->itcl_AddEnsemblePart2) /* 118 */
0941 /* Slot 119 is reserved */
0942 /* Slot 120 is reserved */
0943 /* Slot 121 is reserved */
0944 /* Slot 122 is reserved */
0945 /* Slot 123 is reserved */
0946 /* Slot 124 is reserved */
0947 /* Slot 125 is reserved */
0948 /* Slot 126 is reserved */
0949 /* Slot 127 is reserved */
0950 /* Slot 128 is reserved */
0951 /* Slot 129 is reserved */
0952 /* Slot 130 is reserved */
0953 /* Slot 131 is reserved */
0954 /* Slot 132 is reserved */
0955 /* Slot 133 is reserved */
0956 /* Slot 134 is reserved */
0957 /* Slot 135 is reserved */
0958 /* Slot 136 is reserved */
0959 /* Slot 137 is reserved */
0960 /* Slot 138 is reserved */
0961 /* Slot 139 is reserved */
0962 #define Itcl_FilterAddCmd \
0963     (itclIntStubsPtr->itcl_FilterAddCmd) /* 140 */
0964 #define Itcl_FilterDeleteCmd \
0965     (itclIntStubsPtr->itcl_FilterDeleteCmd) /* 141 */
0966 #define Itcl_ForwardAddCmd \
0967     (itclIntStubsPtr->itcl_ForwardAddCmd) /* 142 */
0968 #define Itcl_ForwardDeleteCmd \
0969     (itclIntStubsPtr->itcl_ForwardDeleteCmd) /* 143 */
0970 #define Itcl_MixinAddCmd \
0971     (itclIntStubsPtr->itcl_MixinAddCmd) /* 144 */
0972 #define Itcl_MixinDeleteCmd \
0973     (itclIntStubsPtr->itcl_MixinDeleteCmd) /* 145 */
0974 /* Slot 146 is reserved */
0975 /* Slot 147 is reserved */
0976 /* Slot 148 is reserved */
0977 /* Slot 149 is reserved */
0978 /* Slot 150 is reserved */
0979 #define Itcl_BiInfoUnknownCmd \
0980     (itclIntStubsPtr->itcl_BiInfoUnknownCmd) /* 151 */
0981 #define Itcl_BiInfoVarsCmd \
0982     (itclIntStubsPtr->itcl_BiInfoVarsCmd) /* 152 */
0983 #define Itcl_CanAccess2 \
0984     (itclIntStubsPtr->itcl_CanAccess2) /* 153 */
0985 /* Slot 154 is reserved */
0986 /* Slot 155 is reserved */
0987 /* Slot 156 is reserved */
0988 /* Slot 157 is reserved */
0989 /* Slot 158 is reserved */
0990 /* Slot 159 is reserved */
0991 #define Itcl_SetCallFrameResolver \
0992     (itclIntStubsPtr->itcl_SetCallFrameResolver) /* 160 */
0993 #define ItclEnsembleSubCmd \
0994     (itclIntStubsPtr->itclEnsembleSubCmd) /* 161 */
0995 #define Itcl_GetUplevelNamespace \
0996     (itclIntStubsPtr->itcl_GetUplevelNamespace) /* 162 */
0997 #define Itcl_GetCallFrameClientData \
0998     (itclIntStubsPtr->itcl_GetCallFrameClientData) /* 163 */
0999 /* Slot 164 is reserved */
1000 #define Itcl_SetCallFrameNamespace \
1001     (itclIntStubsPtr->itcl_SetCallFrameNamespace) /* 165 */
1002 #define Itcl_GetCallFrameObjc \
1003     (itclIntStubsPtr->itcl_GetCallFrameObjc) /* 166 */
1004 #define Itcl_GetCallFrameObjv \
1005     (itclIntStubsPtr->itcl_GetCallFrameObjv) /* 167 */
1006 #define Itcl_NWidgetCmd \
1007     (itclIntStubsPtr->itcl_NWidgetCmd) /* 168 */
1008 #define Itcl_AddOptionCmd \
1009     (itclIntStubsPtr->itcl_AddOptionCmd) /* 169 */
1010 #define Itcl_AddComponentCmd \
1011     (itclIntStubsPtr->itcl_AddComponentCmd) /* 170 */
1012 #define Itcl_BiInfoOptionCmd \
1013     (itclIntStubsPtr->itcl_BiInfoOptionCmd) /* 171 */
1014 #define Itcl_BiInfoComponentCmd \
1015     (itclIntStubsPtr->itcl_BiInfoComponentCmd) /* 172 */
1016 #define Itcl_RenameCommand \
1017     (itclIntStubsPtr->itcl_RenameCommand) /* 173 */
1018 #define Itcl_PushCallFrame \
1019     (itclIntStubsPtr->itcl_PushCallFrame) /* 174 */
1020 #define Itcl_PopCallFrame \
1021     (itclIntStubsPtr->itcl_PopCallFrame) /* 175 */
1022 #define Itcl_GetUplevelCallFrame \
1023     (itclIntStubsPtr->itcl_GetUplevelCallFrame) /* 176 */
1024 #define Itcl_ActivateCallFrame \
1025     (itclIntStubsPtr->itcl_ActivateCallFrame) /* 177 */
1026 #define ItclSetInstanceVar \
1027     (itclIntStubsPtr->itclSetInstanceVar) /* 178 */
1028 #define ItclCapitalize \
1029     (itclIntStubsPtr->itclCapitalize) /* 179 */
1030 #define ItclClassBaseCmd \
1031     (itclIntStubsPtr->itclClassBaseCmd) /* 180 */
1032 #define ItclCreateComponent \
1033     (itclIntStubsPtr->itclCreateComponent) /* 181 */
1034 #define Itcl_SetContext \
1035     (itclIntStubsPtr->itcl_SetContext) /* 182 */
1036 #define Itcl_UnsetContext \
1037     (itclIntStubsPtr->itcl_UnsetContext) /* 183 */
1038 #define ItclGetInstanceVar \
1039     (itclIntStubsPtr->itclGetInstanceVar) /* 184 */
1040
1041 #endif /* defined(USE_ITCL_STUBS) */
1042
1043 /* !END!: Do not edit above this line. */
1044
1045 #if (TCL_MAJOR_VERSION < 9)
1046 # if defined(TCL_MINOR_VERSION) && (TCL_MINOR_VERSION < 7)
1047 #   undef Tcl_ObjCmdProc2
1048 # endif
1049 # undef Itcl_AddEnsemblePart2
1050 # define Itcl_AddEnsemblePart2 Itcl_AddEnsemblePart
1051 # undef Itcl_ExecMethod2
1052 # define Itcl_ExecMethod2 Itcl_ExecMethod
1053 # undef Itcl_ExecProc2
1054 # define Itcl_ExecProc2 Itcl_ExecProc
1055 #endif
1056
1057 #endif /* _ITCLINTDECLS */