sl@0: /* sl@0: * tclIntDecls.h -- sl@0: * sl@0: * This file contains the declarations for all unsupported sl@0: * functions that are exported by the Tcl library. These sl@0: * interfaces are not guaranteed to remain the same between sl@0: * versions. Use at your own risk. sl@0: * sl@0: * Copyright (c) 1998-1999 by Scriptics Corporation. sl@0: * sl@0: * See the file "license.terms" for information on usage and redistribution sl@0: * of this file, and for a DISCLAIMER OF ALL WARRANTIES. sl@0: * sl@0: * RCS: @(#) $Id: tclIntDecls.h,v 1.49.2.9 2007/04/21 19:52:14 kennykb Exp $ sl@0: */ sl@0: sl@0: #ifndef _TCLINTDECLS sl@0: #define _TCLINTDECLS sl@0: sl@0: /* sl@0: * WARNING: This file is automatically generated by the tools/genStubs.tcl sl@0: * script. Any modifications to the function declarations below should be made sl@0: * in the generic/tclInt.decls script. sl@0: */ sl@0: sl@0: /* !BEGIN!: Do not edit below this line. */ sl@0: sl@0: /* sl@0: * Exported function declarations: sl@0: */ sl@0: sl@0: /* Slot 0 is reserved */ sl@0: /* 1 */ sl@0: EXTERN int TclAccessDeleteProc _ANSI_ARGS_(( sl@0: TclAccessProc_ * proc)); sl@0: /* 2 */ sl@0: EXTERN int TclAccessInsertProc _ANSI_ARGS_(( sl@0: TclAccessProc_ * proc)); sl@0: /* 3 */ sl@0: EXTERN void TclAllocateFreeObjects _ANSI_ARGS_((void)); sl@0: /* Slot 4 is reserved */ sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: /* 5 */ sl@0: EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int numPids, Tcl_Pid * pidPtr, sl@0: Tcl_Channel errorChan)); sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: /* 5 */ sl@0: EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int numPids, Tcl_Pid * pidPtr, sl@0: Tcl_Channel errorChan)); sl@0: #endif /* __WIN32__ */ sl@0: /* 6 */ sl@0: EXTERN void TclCleanupCommand _ANSI_ARGS_((Command * cmdPtr)); sl@0: /* 7 */ sl@0: EXTERN int TclCopyAndCollapse _ANSI_ARGS_((int count, sl@0: CONST char * src, char * dst)); sl@0: /* 8 */ sl@0: EXTERN int TclCopyChannel _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Channel inChan, Tcl_Channel outChan, sl@0: int toRead, Tcl_Obj * cmdPtr)); sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: /* 9 */ sl@0: EXTERN int TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int argc, CONST char ** argv, sl@0: Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, sl@0: TclFile * outPipePtr, TclFile * errFilePtr)); sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: /* 9 */ sl@0: EXTERN int TclCreatePipeline _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int argc, CONST char ** argv, sl@0: Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, sl@0: TclFile * outPipePtr, TclFile * errFilePtr)); sl@0: #endif /* __WIN32__ */ sl@0: /* 10 */ sl@0: EXTERN int TclCreateProc _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Namespace * nsPtr, CONST char * procName, sl@0: Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, sl@0: Proc ** procPtrPtr)); sl@0: /* 11 */ sl@0: EXTERN void TclDeleteCompiledLocalVars _ANSI_ARGS_(( sl@0: Interp * iPtr, CallFrame * framePtr)); sl@0: /* 12 */ sl@0: EXTERN void TclDeleteVars _ANSI_ARGS_((Interp * iPtr, sl@0: Tcl_HashTable * tablePtr)); sl@0: /* 13 */ sl@0: EXTERN int TclDoGlob _ANSI_ARGS_((Tcl_Interp * interp, sl@0: char * separators, Tcl_DString * headPtr, sl@0: char * tail, Tcl_GlobTypeData * types)); sl@0: /* 14 */ sl@0: EXTERN void TclDumpMemoryInfo _ANSI_ARGS_((FILE * outFile)); sl@0: /* Slot 15 is reserved */ sl@0: /* 16 */ sl@0: EXTERN void TclExprFloatError _ANSI_ARGS_((Tcl_Interp * interp, sl@0: double value)); sl@0: /* Slot 17 is reserved */ sl@0: /* Slot 18 is reserved */ sl@0: /* Slot 19 is reserved */ sl@0: /* Slot 20 is reserved */ sl@0: /* Slot 21 is reserved */ sl@0: /* 22 */ sl@0: EXTERN int TclFindElement _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * listStr, int listLength, sl@0: CONST char ** elementPtr, sl@0: CONST char ** nextPtr, int * sizePtr, sl@0: int * bracePtr)); sl@0: /* 23 */ sl@0: EXTERN Proc * TclFindProc _ANSI_ARGS_((Interp * iPtr, sl@0: CONST char * procName)); sl@0: /* 24 */ sl@0: EXTERN int TclFormatInt _ANSI_ARGS_((char * buffer, long n)); sl@0: /* 25 */ sl@0: EXTERN void TclFreePackageInfo _ANSI_ARGS_((Interp * iPtr)); sl@0: /* Slot 26 is reserved */ sl@0: /* 27 */ sl@0: EXTERN int TclGetDate _ANSI_ARGS_((char * p, Tcl_WideInt now, sl@0: long zone, Tcl_WideInt * timePtr)); sl@0: /* 28 */ sl@0: EXTERN Tcl_Channel TclpGetDefaultStdChannel _ANSI_ARGS_((int type)); sl@0: /* Slot 29 is reserved */ sl@0: /* Slot 30 is reserved */ sl@0: /* 31 */ sl@0: EXTERN char * TclGetExtension _ANSI_ARGS_((char * name)); sl@0: /* 32 */ sl@0: EXTERN int TclGetFrame _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * str, CallFrame ** framePtrPtr)); sl@0: /* 33 */ sl@0: EXTERN TclCmdProcType TclGetInterpProc _ANSI_ARGS_((void)); sl@0: /* 34 */ sl@0: EXTERN int TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Obj * objPtr, int endValue, sl@0: int * indexPtr)); sl@0: /* Slot 35 is reserved */ sl@0: /* 36 */ sl@0: EXTERN int TclGetLong _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * str, long * longPtr)); sl@0: /* 37 */ sl@0: EXTERN int TclGetLoadedPackages _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, char * targetName)); sl@0: /* 38 */ sl@0: EXTERN int TclGetNamespaceForQualName _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * qualName, sl@0: Namespace * cxtNsPtr, int flags, sl@0: Namespace ** nsPtrPtr, sl@0: Namespace ** altNsPtrPtr, sl@0: Namespace ** actualCxtPtrPtr, sl@0: CONST char ** simpleNamePtr)); sl@0: /* 39 */ sl@0: EXTERN TclObjCmdProcType TclGetObjInterpProc _ANSI_ARGS_((void)); sl@0: /* 40 */ sl@0: EXTERN int TclGetOpenMode _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * str, int * seekFlagPtr)); sl@0: /* 41 */ sl@0: EXTERN Tcl_Command TclGetOriginalCommand _ANSI_ARGS_(( sl@0: Tcl_Command command)); sl@0: /* 42 */ sl@0: EXTERN char * TclpGetUserHome _ANSI_ARGS_((CONST char * name, sl@0: Tcl_DString * bufferPtr)); sl@0: /* 43 */ sl@0: EXTERN int TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int argc, CONST84 char ** argv, int flags)); sl@0: /* 44 */ sl@0: EXTERN int TclGuessPackageName _ANSI_ARGS_(( sl@0: CONST char * fileName, Tcl_DString * bufPtr)); sl@0: /* 45 */ sl@0: EXTERN int TclHideUnsafeCommands _ANSI_ARGS_(( sl@0: Tcl_Interp * interp)); sl@0: /* 46 */ sl@0: EXTERN int TclInExit _ANSI_ARGS_((void)); sl@0: /* Slot 47 is reserved */ sl@0: /* Slot 48 is reserved */ sl@0: /* 49 */ sl@0: EXTERN Tcl_Obj * TclIncrVar2 _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, sl@0: long incrAmount, int part1NotParsed)); sl@0: /* 50 */ sl@0: EXTERN void TclInitCompiledLocals _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CallFrame * framePtr, sl@0: Namespace * nsPtr)); sl@0: /* 51 */ sl@0: EXTERN int TclInterpInit _ANSI_ARGS_((Tcl_Interp * interp)); sl@0: /* 52 */ sl@0: EXTERN int TclInvoke _ANSI_ARGS_((Tcl_Interp * interp, int argc, sl@0: CONST84 char ** argv, int flags)); sl@0: /* 53 */ sl@0: EXTERN int TclInvokeObjectCommand _ANSI_ARGS_(( sl@0: ClientData clientData, Tcl_Interp * interp, sl@0: int argc, CONST84 char ** argv)); sl@0: /* 54 */ sl@0: EXTERN int TclInvokeStringCommand _ANSI_ARGS_(( sl@0: ClientData clientData, Tcl_Interp * interp, sl@0: int objc, Tcl_Obj *CONST objv[])); sl@0: /* 55 */ sl@0: EXTERN Proc * TclIsProc _ANSI_ARGS_((Command * cmdPtr)); sl@0: /* Slot 56 is reserved */ sl@0: /* Slot 57 is reserved */ sl@0: /* 58 */ sl@0: EXTERN Var * TclLookupVar _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * part1, CONST char * part2, sl@0: int flags, CONST char * msg, int createPart1, sl@0: int createPart2, Var ** arrayPtrPtr)); sl@0: /* Slot 59 is reserved */ sl@0: /* 60 */ sl@0: EXTERN int TclNeedSpace _ANSI_ARGS_((CONST char * start, sl@0: CONST char * end)); sl@0: /* 61 */ sl@0: EXTERN Tcl_Obj * TclNewProcBodyObj _ANSI_ARGS_((Proc * procPtr)); sl@0: /* 62 */ sl@0: EXTERN int TclObjCommandComplete _ANSI_ARGS_((Tcl_Obj * cmdPtr)); sl@0: /* 63 */ sl@0: EXTERN int TclObjInterpProc _ANSI_ARGS_((ClientData clientData, sl@0: Tcl_Interp * interp, int objc, sl@0: Tcl_Obj *CONST objv[])); sl@0: /* 64 */ sl@0: EXTERN int TclObjInvoke _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int objc, Tcl_Obj *CONST objv[], int flags)); sl@0: /* 65 */ sl@0: EXTERN int TclObjInvokeGlobal _ANSI_ARGS_((Tcl_Interp * interp, sl@0: int objc, Tcl_Obj *CONST objv[], int flags)); sl@0: /* 66 */ sl@0: EXTERN int TclOpenFileChannelDeleteProc _ANSI_ARGS_(( sl@0: TclOpenFileChannelProc_ * proc)); sl@0: /* 67 */ sl@0: EXTERN int TclOpenFileChannelInsertProc _ANSI_ARGS_(( sl@0: TclOpenFileChannelProc_ * proc)); sl@0: /* Slot 68 is reserved */ sl@0: /* 69 */ sl@0: EXTERN char * TclpAlloc _ANSI_ARGS_((unsigned int size)); sl@0: /* Slot 70 is reserved */ sl@0: /* Slot 71 is reserved */ sl@0: /* Slot 72 is reserved */ sl@0: /* Slot 73 is reserved */ sl@0: /* 74 */ sl@0: EXTERN void TclpFree _ANSI_ARGS_((char * ptr)); sl@0: /* 75 */ sl@0: EXTERN unsigned long TclpGetClicks _ANSI_ARGS_((void)); sl@0: /* 76 */ sl@0: EXTERN unsigned long TclpGetSeconds _ANSI_ARGS_((void)); sl@0: /* 77 */ sl@0: EXTERN void TclpGetTime _ANSI_ARGS_((Tcl_Time * time)); sl@0: /* 78 */ sl@0: EXTERN int TclpGetTimeZone _ANSI_ARGS_((Tcl_WideInt time)); sl@0: /* Slot 79 is reserved */ sl@0: /* Slot 80 is reserved */ sl@0: /* 81 */ sl@0: EXTERN char * TclpRealloc _ANSI_ARGS_((char * ptr, sl@0: unsigned int size)); sl@0: /* Slot 82 is reserved */ sl@0: /* Slot 83 is reserved */ sl@0: /* Slot 84 is reserved */ sl@0: /* Slot 85 is reserved */ sl@0: /* Slot 86 is reserved */ sl@0: /* Slot 87 is reserved */ sl@0: /* 88 */ sl@0: EXTERN char * TclPrecTraceProc _ANSI_ARGS_((ClientData clientData, sl@0: Tcl_Interp * interp, CONST char * name1, sl@0: CONST char * name2, int flags)); sl@0: /* 89 */ sl@0: EXTERN int TclPreventAliasLoop _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Interp * cmdInterp, Tcl_Command cmd)); sl@0: /* Slot 90 is reserved */ sl@0: /* 91 */ sl@0: EXTERN void TclProcCleanupProc _ANSI_ARGS_((Proc * procPtr)); sl@0: /* 92 */ sl@0: EXTERN int TclProcCompileProc _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Proc * procPtr, Tcl_Obj * bodyPtr, sl@0: Namespace * nsPtr, CONST char * description, sl@0: CONST char * procName)); sl@0: /* 93 */ sl@0: EXTERN void TclProcDeleteProc _ANSI_ARGS_((ClientData clientData)); sl@0: /* 94 */ sl@0: EXTERN int TclProcInterpProc _ANSI_ARGS_((ClientData clientData, sl@0: Tcl_Interp * interp, int argc, sl@0: CONST84 char ** argv)); sl@0: /* Slot 95 is reserved */ sl@0: /* 96 */ sl@0: EXTERN int TclRenameCommand _ANSI_ARGS_((Tcl_Interp * interp, sl@0: char * oldName, char * newName)); sl@0: /* 97 */ sl@0: EXTERN void TclResetShadowedCmdRefs _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Command * newCmdPtr)); sl@0: /* 98 */ sl@0: EXTERN int TclServiceIdle _ANSI_ARGS_((void)); sl@0: /* Slot 99 is reserved */ sl@0: /* Slot 100 is reserved */ sl@0: /* 101 */ sl@0: EXTERN char * TclSetPreInitScript _ANSI_ARGS_((char * string)); sl@0: /* 102 */ sl@0: EXTERN void TclSetupEnv _ANSI_ARGS_((Tcl_Interp * interp)); sl@0: /* 103 */ sl@0: EXTERN int TclSockGetPort _ANSI_ARGS_((Tcl_Interp * interp, sl@0: char * str, char * proto, int * portPtr)); sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: /* 104 */ sl@0: EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock, sl@0: int size)); sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: /* 104 */ sl@0: EXTERN int TclSockMinimumBuffers _ANSI_ARGS_((int sock, sl@0: int size)); sl@0: #endif /* __WIN32__ */ sl@0: /* Slot 105 is reserved */ sl@0: /* 106 */ sl@0: EXTERN int TclStatDeleteProc _ANSI_ARGS_((TclStatProc_ * proc)); sl@0: /* 107 */ sl@0: EXTERN int TclStatInsertProc _ANSI_ARGS_((TclStatProc_ * proc)); sl@0: /* 108 */ sl@0: EXTERN void TclTeardownNamespace _ANSI_ARGS_((Namespace * nsPtr)); sl@0: /* 109 */ sl@0: EXTERN int TclUpdateReturnInfo _ANSI_ARGS_((Interp * iPtr)); sl@0: /* Slot 110 is reserved */ sl@0: /* 111 */ sl@0: EXTERN void Tcl_AddInterpResolvers _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * name, sl@0: Tcl_ResolveCmdProc * cmdProc, sl@0: Tcl_ResolveVarProc * varProc, sl@0: Tcl_ResolveCompiledVarProc * compiledVarProc)); sl@0: /* 112 */ sl@0: EXTERN int Tcl_AppendExportList _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Namespace * nsPtr, sl@0: Tcl_Obj * objPtr)); sl@0: /* 113 */ sl@0: EXTERN Tcl_Namespace * Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * name, ClientData clientData, sl@0: Tcl_NamespaceDeleteProc * deleteProc)); sl@0: /* 114 */ sl@0: EXTERN void Tcl_DeleteNamespace _ANSI_ARGS_(( sl@0: Tcl_Namespace * nsPtr)); sl@0: /* 115 */ sl@0: EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Namespace * nsPtr, CONST char * pattern, sl@0: int resetListFirst)); sl@0: /* 116 */ sl@0: EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * name, sl@0: Tcl_Namespace * contextNsPtr, int flags)); sl@0: /* 117 */ sl@0: EXTERN Tcl_Namespace * Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * name, sl@0: Tcl_Namespace * contextNsPtr, int flags)); sl@0: /* 118 */ sl@0: EXTERN int Tcl_GetInterpResolvers _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * name, sl@0: Tcl_ResolverInfo * resInfo)); sl@0: /* 119 */ sl@0: EXTERN int Tcl_GetNamespaceResolvers _ANSI_ARGS_(( sl@0: Tcl_Namespace * namespacePtr, sl@0: Tcl_ResolverInfo * resInfo)); sl@0: /* 120 */ sl@0: EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * name, sl@0: Tcl_Namespace * contextNsPtr, int flags)); sl@0: /* 121 */ sl@0: EXTERN int Tcl_ForgetImport _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Namespace * nsPtr, CONST char * pattern)); sl@0: /* 122 */ sl@0: EXTERN Tcl_Command Tcl_GetCommandFromObj _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Obj * objPtr)); sl@0: /* 123 */ sl@0: EXTERN void Tcl_GetCommandFullName _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Command command, sl@0: Tcl_Obj * objPtr)); sl@0: /* 124 */ sl@0: EXTERN Tcl_Namespace * Tcl_GetCurrentNamespace _ANSI_ARGS_(( sl@0: Tcl_Interp * interp)); sl@0: /* 125 */ sl@0: EXTERN Tcl_Namespace * Tcl_GetGlobalNamespace _ANSI_ARGS_(( sl@0: Tcl_Interp * interp)); sl@0: /* 126 */ sl@0: EXTERN void Tcl_GetVariableFullName _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Var variable, sl@0: Tcl_Obj * objPtr)); sl@0: /* 127 */ sl@0: EXTERN int Tcl_Import _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Namespace * nsPtr, CONST char * pattern, sl@0: int allowOverwrite)); sl@0: /* 128 */ sl@0: EXTERN void Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp* interp)); sl@0: /* 129 */ sl@0: EXTERN int Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp* interp, sl@0: Tcl_CallFrame * framePtr, sl@0: Tcl_Namespace * nsPtr, int isProcCallFrame)); sl@0: /* 130 */ sl@0: EXTERN int Tcl_RemoveInterpResolvers _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * name)); sl@0: /* 131 */ sl@0: EXTERN void Tcl_SetNamespaceResolvers _ANSI_ARGS_(( sl@0: Tcl_Namespace * namespacePtr, sl@0: Tcl_ResolveCmdProc * cmdProc, sl@0: Tcl_ResolveVarProc * varProc, sl@0: Tcl_ResolveCompiledVarProc * compiledVarProc)); sl@0: /* 132 */ sl@0: EXTERN int TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp)); sl@0: /* 133 */ sl@0: EXTERN struct tm * TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT)); sl@0: /* 134 */ sl@0: EXTERN size_t TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize, sl@0: CONST char * format, CONST struct tm * t, sl@0: int useGMT)); sl@0: /* 135 */ sl@0: EXTERN int TclpCheckStackSpace _ANSI_ARGS_((void)); sl@0: /* Slot 136 is reserved */ sl@0: /* Slot 137 is reserved */ sl@0: /* 138 */ sl@0: EXTERN CONST84_RETURN char * TclGetEnv _ANSI_ARGS_((CONST char * name, sl@0: Tcl_DString * valuePtr)); sl@0: /* Slot 139 is reserved */ sl@0: /* 140 */ sl@0: EXTERN int TclLooksLikeInt _ANSI_ARGS_((CONST char * bytes, sl@0: int length)); sl@0: /* 141 */ sl@0: EXTERN CONST84_RETURN char * TclpGetCwd _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_DString * cwdPtr)); sl@0: /* 142 */ sl@0: EXTERN int TclSetByteCodeFromAny _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Obj * objPtr, sl@0: CompileHookProc * hookProc, sl@0: ClientData clientData)); sl@0: /* 143 */ sl@0: EXTERN int TclAddLiteralObj _ANSI_ARGS_(( sl@0: struct CompileEnv * envPtr, Tcl_Obj * objPtr, sl@0: LiteralEntry ** litPtrPtr)); sl@0: /* 144 */ sl@0: EXTERN void TclHideLiteral _ANSI_ARGS_((Tcl_Interp * interp, sl@0: struct CompileEnv * envPtr, int index)); sl@0: /* 145 */ sl@0: EXTERN struct AuxDataType * TclGetAuxDataType _ANSI_ARGS_((char * typeName)); sl@0: /* 146 */ sl@0: EXTERN TclHandle TclHandleCreate _ANSI_ARGS_((VOID * ptr)); sl@0: /* 147 */ sl@0: EXTERN void TclHandleFree _ANSI_ARGS_((TclHandle handle)); sl@0: /* 148 */ sl@0: EXTERN TclHandle TclHandlePreserve _ANSI_ARGS_((TclHandle handle)); sl@0: /* 149 */ sl@0: EXTERN void TclHandleRelease _ANSI_ARGS_((TclHandle handle)); sl@0: /* 150 */ sl@0: EXTERN int TclRegAbout _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_RegExp re)); sl@0: /* 151 */ sl@0: EXTERN void TclRegExpRangeUniChar _ANSI_ARGS_((Tcl_RegExp re, sl@0: int index, int * startPtr, int * endPtr)); sl@0: /* 152 */ sl@0: EXTERN void TclSetLibraryPath _ANSI_ARGS_((Tcl_Obj * pathPtr)); sl@0: /* 153 */ sl@0: EXTERN Tcl_Obj * TclGetLibraryPath _ANSI_ARGS_((void)); sl@0: /* Slot 154 is reserved */ sl@0: /* Slot 155 is reserved */ sl@0: /* 156 */ sl@0: EXTERN void TclRegError _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * msg, int status)); sl@0: /* 157 */ sl@0: EXTERN Var * TclVarTraceExists _ANSI_ARGS_((Tcl_Interp * interp, sl@0: CONST char * varName)); sl@0: /* 158 */ sl@0: EXTERN void TclSetStartupScriptFileName _ANSI_ARGS_(( sl@0: CONST char * filename)); sl@0: /* 159 */ sl@0: EXTERN CONST84_RETURN char * TclGetStartupScriptFileName _ANSI_ARGS_((void)); sl@0: /* Slot 160 is reserved */ sl@0: /* 161 */ sl@0: EXTERN int TclChannelTransform _ANSI_ARGS_((Tcl_Interp * interp, sl@0: Tcl_Channel chan, Tcl_Obj * cmdObjPtr)); sl@0: /* 162 */ sl@0: EXTERN void TclChannelEventScriptInvoker _ANSI_ARGS_(( sl@0: ClientData clientData, int flags)); sl@0: /* 163 */ sl@0: EXTERN void * TclGetInstructionTable _ANSI_ARGS_((void)); sl@0: /* 164 */ sl@0: EXTERN void TclExpandCodeArray _ANSI_ARGS_((void * envPtr)); sl@0: /* 165 */ sl@0: EXTERN void TclpSetInitialEncodings _ANSI_ARGS_((void)); sl@0: /* 166 */ sl@0: EXTERN int TclListObjSetElement _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, Tcl_Obj * listPtr, sl@0: int index, Tcl_Obj * valuePtr)); sl@0: /* 167 */ sl@0: EXTERN void TclSetStartupScriptPath _ANSI_ARGS_(( sl@0: Tcl_Obj * pathPtr)); sl@0: /* 168 */ sl@0: EXTERN Tcl_Obj * TclGetStartupScriptPath _ANSI_ARGS_((void)); sl@0: /* 169 */ sl@0: EXTERN int TclpUtfNcmp2 _ANSI_ARGS_((CONST char * s1, sl@0: CONST char * s2, unsigned long n)); sl@0: /* 170 */ sl@0: EXTERN int TclCheckInterpTraces _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * command, sl@0: int numChars, Command * cmdPtr, int result, sl@0: int traceFlags, int objc, sl@0: Tcl_Obj *CONST objv[])); sl@0: /* 171 */ sl@0: EXTERN int TclCheckExecutionTraces _ANSI_ARGS_(( sl@0: Tcl_Interp * interp, CONST char * command, sl@0: int numChars, Command * cmdPtr, int result, sl@0: int traceFlags, int objc, sl@0: Tcl_Obj *CONST objv[])); sl@0: /* 172 */ sl@0: EXTERN int TclInThreadExit _ANSI_ARGS_((void)); sl@0: /* 173 */ sl@0: EXTERN int TclUniCharMatch _ANSI_ARGS_(( sl@0: CONST Tcl_UniChar * string, int strLen, sl@0: CONST Tcl_UniChar * pattern, int ptnLen, sl@0: int nocase)); sl@0: /* Slot 174 is reserved */ sl@0: /* Slot 175 is reserved */ sl@0: /* Slot 176 is reserved */ sl@0: /* Slot 177 is reserved */ sl@0: /* Slot 178 is reserved */ sl@0: /* Slot 179 is reserved */ sl@0: /* Slot 180 is reserved */ sl@0: /* Slot 181 is reserved */ sl@0: /* 182 */ sl@0: EXTERN struct tm * TclpLocaltime _ANSI_ARGS_((TclpTime_t_CONST clock)); sl@0: /* 183 */ sl@0: EXTERN struct tm * TclpGmtime _ANSI_ARGS_((TclpTime_t_CONST clock)); sl@0: /* Slot 184 is reserved */ sl@0: /* Slot 185 is reserved */ sl@0: /* Slot 186 is reserved */ sl@0: /* Slot 187 is reserved */ sl@0: /* Slot 188 is reserved */ sl@0: /* Slot 189 is reserved */ sl@0: /* Slot 190 is reserved */ sl@0: /* Slot 191 is reserved */ sl@0: /* Slot 192 is reserved */ sl@0: /* Slot 193 is reserved */ sl@0: /* Slot 194 is reserved */ sl@0: /* Slot 195 is reserved */ sl@0: /* Slot 196 is reserved */ sl@0: /* Slot 197 is reserved */ sl@0: /* Slot 198 is reserved */ sl@0: /* 199 */ sl@0: EXTERN int TclMatchIsTrivial _ANSI_ARGS_((CONST char * pattern)); sl@0: sl@0: typedef struct TclIntStubs { sl@0: int magic; sl@0: struct TclIntStubHooks *hooks; sl@0: sl@0: void *reserved0; sl@0: int (*tclAccessDeleteProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 1 */ sl@0: int (*tclAccessInsertProc) _ANSI_ARGS_((TclAccessProc_ * proc)); /* 2 */ sl@0: void (*tclAllocateFreeObjects) _ANSI_ARGS_((void)); /* 3 */ sl@0: void *reserved4; sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */ sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: int (*tclCleanupChildren) _ANSI_ARGS_((Tcl_Interp * interp, int numPids, Tcl_Pid * pidPtr, Tcl_Channel errorChan)); /* 5 */ sl@0: #endif /* __WIN32__ */ sl@0: #ifdef MAC_TCL sl@0: void *reserved5; sl@0: #endif /* MAC_TCL */ sl@0: void (*tclCleanupCommand) _ANSI_ARGS_((Command * cmdPtr)); /* 6 */ sl@0: int (*tclCopyAndCollapse) _ANSI_ARGS_((int count, CONST char * src, char * dst)); /* 7 */ sl@0: int (*tclCopyChannel) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel inChan, Tcl_Channel outChan, int toRead, Tcl_Obj * cmdPtr)); /* 8 */ sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */ sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: int (*tclCreatePipeline) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST char ** argv, Tcl_Pid ** pidArrayPtr, TclFile * inPipePtr, TclFile * outPipePtr, TclFile * errFilePtr)); /* 9 */ sl@0: #endif /* __WIN32__ */ sl@0: #ifdef MAC_TCL sl@0: void *reserved9; sl@0: #endif /* MAC_TCL */ sl@0: int (*tclCreateProc) _ANSI_ARGS_((Tcl_Interp * interp, Namespace * nsPtr, CONST char * procName, Tcl_Obj * argsPtr, Tcl_Obj * bodyPtr, Proc ** procPtrPtr)); /* 10 */ sl@0: void (*tclDeleteCompiledLocalVars) _ANSI_ARGS_((Interp * iPtr, CallFrame * framePtr)); /* 11 */ sl@0: void (*tclDeleteVars) _ANSI_ARGS_((Interp * iPtr, Tcl_HashTable * tablePtr)); /* 12 */ sl@0: int (*tclDoGlob) _ANSI_ARGS_((Tcl_Interp * interp, char * separators, Tcl_DString * headPtr, char * tail, Tcl_GlobTypeData * types)); /* 13 */ sl@0: void (*tclDumpMemoryInfo) _ANSI_ARGS_((FILE * outFile)); /* 14 */ sl@0: void *reserved15; sl@0: void (*tclExprFloatError) _ANSI_ARGS_((Tcl_Interp * interp, double value)); /* 16 */ sl@0: void *reserved17; sl@0: void *reserved18; sl@0: void *reserved19; sl@0: void *reserved20; sl@0: void *reserved21; sl@0: int (*tclFindElement) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int listLength, CONST char ** elementPtr, CONST char ** nextPtr, int * sizePtr, int * bracePtr)); /* 22 */ sl@0: Proc * (*tclFindProc) _ANSI_ARGS_((Interp * iPtr, CONST char * procName)); /* 23 */ sl@0: int (*tclFormatInt) _ANSI_ARGS_((char * buffer, long n)); /* 24 */ sl@0: void (*tclFreePackageInfo) _ANSI_ARGS_((Interp * iPtr)); /* 25 */ sl@0: void *reserved26; sl@0: int (*tclGetDate) _ANSI_ARGS_((char * p, Tcl_WideInt now, long zone, Tcl_WideInt * timePtr)); /* 27 */ sl@0: Tcl_Channel (*tclpGetDefaultStdChannel) _ANSI_ARGS_((int type)); /* 28 */ sl@0: void *reserved29; sl@0: void *reserved30; sl@0: char * (*tclGetExtension) _ANSI_ARGS_((char * name)); /* 31 */ sl@0: int (*tclGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, CallFrame ** framePtrPtr)); /* 32 */ sl@0: TclCmdProcType (*tclGetInterpProc) _ANSI_ARGS_((void)); /* 33 */ sl@0: int (*tclGetIntForIndex) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, int endValue, int * indexPtr)); /* 34 */ sl@0: void *reserved35; sl@0: int (*tclGetLong) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, long * longPtr)); /* 36 */ sl@0: int (*tclGetLoadedPackages) _ANSI_ARGS_((Tcl_Interp * interp, char * targetName)); /* 37 */ sl@0: int (*tclGetNamespaceForQualName) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * qualName, Namespace * cxtNsPtr, int flags, Namespace ** nsPtrPtr, Namespace ** altNsPtrPtr, Namespace ** actualCxtPtrPtr, CONST char ** simpleNamePtr)); /* 38 */ sl@0: TclObjCmdProcType (*tclGetObjInterpProc) _ANSI_ARGS_((void)); /* 39 */ sl@0: int (*tclGetOpenMode) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * str, int * seekFlagPtr)); /* 40 */ sl@0: Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 41 */ sl@0: char * (*tclpGetUserHome) _ANSI_ARGS_((CONST char * name, Tcl_DString * bufferPtr)); /* 42 */ sl@0: int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 43 */ sl@0: int (*tclGuessPackageName) _ANSI_ARGS_((CONST char * fileName, Tcl_DString * bufPtr)); /* 44 */ sl@0: int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 45 */ sl@0: int (*tclInExit) _ANSI_ARGS_((void)); /* 46 */ sl@0: void *reserved47; sl@0: void *reserved48; sl@0: Tcl_Obj * (*tclIncrVar2) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * part1Ptr, Tcl_Obj * part2Ptr, long incrAmount, int part1NotParsed)); /* 49 */ sl@0: void (*tclInitCompiledLocals) _ANSI_ARGS_((Tcl_Interp * interp, CallFrame * framePtr, Namespace * nsPtr)); /* 50 */ sl@0: int (*tclInterpInit) _ANSI_ARGS_((Tcl_Interp * interp)); /* 51 */ sl@0: int (*tclInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, CONST84 char ** argv, int flags)); /* 52 */ sl@0: int (*tclInvokeObjectCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 53 */ sl@0: int (*tclInvokeStringCommand) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 54 */ sl@0: Proc * (*tclIsProc) _ANSI_ARGS_((Command * cmdPtr)); /* 55 */ sl@0: void *reserved56; sl@0: void *reserved57; sl@0: Var * (*tclLookupVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * part1, CONST char * part2, int flags, CONST char * msg, int createPart1, int createPart2, Var ** arrayPtrPtr)); /* 58 */ sl@0: void *reserved59; sl@0: int (*tclNeedSpace) _ANSI_ARGS_((CONST char * start, CONST char * end)); /* 60 */ sl@0: Tcl_Obj * (*tclNewProcBodyObj) _ANSI_ARGS_((Proc * procPtr)); /* 61 */ sl@0: int (*tclObjCommandComplete) _ANSI_ARGS_((Tcl_Obj * cmdPtr)); /* 62 */ sl@0: int (*tclObjInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[])); /* 63 */ sl@0: int (*tclObjInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 64 */ sl@0: int (*tclObjInvokeGlobal) _ANSI_ARGS_((Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], int flags)); /* 65 */ sl@0: int (*tclOpenFileChannelDeleteProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 66 */ sl@0: int (*tclOpenFileChannelInsertProc) _ANSI_ARGS_((TclOpenFileChannelProc_ * proc)); /* 67 */ sl@0: void *reserved68; sl@0: char * (*tclpAlloc) _ANSI_ARGS_((unsigned int size)); /* 69 */ sl@0: void *reserved70; sl@0: void *reserved71; sl@0: void *reserved72; sl@0: void *reserved73; sl@0: void (*tclpFree) _ANSI_ARGS_((char * ptr)); /* 74 */ sl@0: unsigned long (*tclpGetClicks) _ANSI_ARGS_((void)); /* 75 */ sl@0: unsigned long (*tclpGetSeconds) _ANSI_ARGS_((void)); /* 76 */ sl@0: void (*tclpGetTime) _ANSI_ARGS_((Tcl_Time * time)); /* 77 */ sl@0: int (*tclpGetTimeZone) _ANSI_ARGS_((Tcl_WideInt time)); /* 78 */ sl@0: void *reserved79; sl@0: void *reserved80; sl@0: char * (*tclpRealloc) _ANSI_ARGS_((char * ptr, unsigned int size)); /* 81 */ sl@0: void *reserved82; sl@0: void *reserved83; sl@0: void *reserved84; sl@0: void *reserved85; sl@0: void *reserved86; sl@0: void *reserved87; sl@0: char * (*tclPrecTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, CONST char * name1, CONST char * name2, int flags)); /* 88 */ sl@0: int (*tclPreventAliasLoop) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Interp * cmdInterp, Tcl_Command cmd)); /* 89 */ sl@0: void *reserved90; sl@0: void (*tclProcCleanupProc) _ANSI_ARGS_((Proc * procPtr)); /* 91 */ sl@0: int (*tclProcCompileProc) _ANSI_ARGS_((Tcl_Interp * interp, Proc * procPtr, Tcl_Obj * bodyPtr, Namespace * nsPtr, CONST char * description, CONST char * procName)); /* 92 */ sl@0: void (*tclProcDeleteProc) _ANSI_ARGS_((ClientData clientData)); /* 93 */ sl@0: int (*tclProcInterpProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp * interp, int argc, CONST84 char ** argv)); /* 94 */ sl@0: void *reserved95; sl@0: int (*tclRenameCommand) _ANSI_ARGS_((Tcl_Interp * interp, char * oldName, char * newName)); /* 96 */ sl@0: void (*tclResetShadowedCmdRefs) _ANSI_ARGS_((Tcl_Interp * interp, Command * newCmdPtr)); /* 97 */ sl@0: int (*tclServiceIdle) _ANSI_ARGS_((void)); /* 98 */ sl@0: void *reserved99; sl@0: void *reserved100; sl@0: char * (*tclSetPreInitScript) _ANSI_ARGS_((char * string)); /* 101 */ sl@0: void (*tclSetupEnv) _ANSI_ARGS_((Tcl_Interp * interp)); /* 102 */ sl@0: int (*tclSockGetPort) _ANSI_ARGS_((Tcl_Interp * interp, char * str, char * proto, int * portPtr)); /* 103 */ sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */ sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: int (*tclSockMinimumBuffers) _ANSI_ARGS_((int sock, int size)); /* 104 */ sl@0: #endif /* __WIN32__ */ sl@0: #ifdef MAC_TCL sl@0: void *reserved104; sl@0: #endif /* MAC_TCL */ sl@0: void *reserved105; sl@0: int (*tclStatDeleteProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 106 */ sl@0: int (*tclStatInsertProc) _ANSI_ARGS_((TclStatProc_ * proc)); /* 107 */ sl@0: void (*tclTeardownNamespace) _ANSI_ARGS_((Namespace * nsPtr)); /* 108 */ sl@0: int (*tclUpdateReturnInfo) _ANSI_ARGS_((Interp * iPtr)); /* 109 */ sl@0: void *reserved110; sl@0: void (*tcl_AddInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 111 */ sl@0: int (*tcl_AppendExportList) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr)); /* 112 */ sl@0: Tcl_Namespace * (*tcl_CreateNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc)); /* 113 */ sl@0: void (*tcl_DeleteNamespace) _ANSI_ARGS_((Tcl_Namespace * nsPtr)); /* 114 */ sl@0: int (*tcl_Export) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int resetListFirst)); /* 115 */ sl@0: Tcl_Command (*tcl_FindCommand) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 116 */ sl@0: Tcl_Namespace * (*tcl_FindNamespace) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 117 */ sl@0: int (*tcl_GetInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_ResolverInfo * resInfo)); /* 118 */ sl@0: int (*tcl_GetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolverInfo * resInfo)); /* 119 */ sl@0: Tcl_Var (*tcl_FindNamespaceVar) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name, Tcl_Namespace * contextNsPtr, int flags)); /* 120 */ sl@0: int (*tcl_ForgetImport) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern)); /* 121 */ sl@0: Tcl_Command (*tcl_GetCommandFromObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 122 */ sl@0: void (*tcl_GetCommandFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Command command, Tcl_Obj * objPtr)); /* 123 */ sl@0: Tcl_Namespace * (*tcl_GetCurrentNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 124 */ sl@0: Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 125 */ sl@0: void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 126 */ sl@0: int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, CONST char * pattern, int allowOverwrite)); /* 127 */ sl@0: void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 128 */ sl@0: int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */ sl@0: int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 130 */ sl@0: void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */ sl@0: int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 132 */ sl@0: struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 133 */ sl@0: size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, CONST char * format, CONST struct tm * t, int useGMT)); /* 134 */ sl@0: int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 135 */ sl@0: void *reserved136; sl@0: void *reserved137; sl@0: CONST84_RETURN char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 138 */ sl@0: void *reserved139; sl@0: int (*tclLooksLikeInt) _ANSI_ARGS_((CONST char * bytes, int length)); /* 140 */ sl@0: CONST84_RETURN char * (*tclpGetCwd) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_DString * cwdPtr)); /* 141 */ sl@0: int (*tclSetByteCodeFromAny) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CompileHookProc * hookProc, ClientData clientData)); /* 142 */ sl@0: int (*tclAddLiteralObj) _ANSI_ARGS_((struct CompileEnv * envPtr, Tcl_Obj * objPtr, LiteralEntry ** litPtrPtr)); /* 143 */ sl@0: void (*tclHideLiteral) _ANSI_ARGS_((Tcl_Interp * interp, struct CompileEnv * envPtr, int index)); /* 144 */ sl@0: struct AuxDataType * (*tclGetAuxDataType) _ANSI_ARGS_((char * typeName)); /* 145 */ sl@0: TclHandle (*tclHandleCreate) _ANSI_ARGS_((VOID * ptr)); /* 146 */ sl@0: void (*tclHandleFree) _ANSI_ARGS_((TclHandle handle)); /* 147 */ sl@0: TclHandle (*tclHandlePreserve) _ANSI_ARGS_((TclHandle handle)); /* 148 */ sl@0: void (*tclHandleRelease) _ANSI_ARGS_((TclHandle handle)); /* 149 */ sl@0: int (*tclRegAbout) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp re)); /* 150 */ sl@0: void (*tclRegExpRangeUniChar) _ANSI_ARGS_((Tcl_RegExp re, int index, int * startPtr, int * endPtr)); /* 151 */ sl@0: void (*tclSetLibraryPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 152 */ sl@0: Tcl_Obj * (*tclGetLibraryPath) _ANSI_ARGS_((void)); /* 153 */ sl@0: void *reserved154; sl@0: void *reserved155; sl@0: void (*tclRegError) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * msg, int status)); /* 156 */ sl@0: Var * (*tclVarTraceExists) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * varName)); /* 157 */ sl@0: void (*tclSetStartupScriptFileName) _ANSI_ARGS_((CONST char * filename)); /* 158 */ sl@0: CONST84_RETURN char * (*tclGetStartupScriptFileName) _ANSI_ARGS_((void)); /* 159 */ sl@0: void *reserved160; sl@0: int (*tclChannelTransform) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Channel chan, Tcl_Obj * cmdObjPtr)); /* 161 */ sl@0: void (*tclChannelEventScriptInvoker) _ANSI_ARGS_((ClientData clientData, int flags)); /* 162 */ sl@0: void * (*tclGetInstructionTable) _ANSI_ARGS_((void)); /* 163 */ sl@0: void (*tclExpandCodeArray) _ANSI_ARGS_((void * envPtr)); /* 164 */ sl@0: void (*tclpSetInitialEncodings) _ANSI_ARGS_((void)); /* 165 */ sl@0: int (*tclListObjSetElement) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * listPtr, int index, Tcl_Obj * valuePtr)); /* 166 */ sl@0: void (*tclSetStartupScriptPath) _ANSI_ARGS_((Tcl_Obj * pathPtr)); /* 167 */ sl@0: Tcl_Obj * (*tclGetStartupScriptPath) _ANSI_ARGS_((void)); /* 168 */ sl@0: int (*tclpUtfNcmp2) _ANSI_ARGS_((CONST char * s1, CONST char * s2, unsigned long n)); /* 169 */ sl@0: int (*tclCheckInterpTraces) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj *CONST objv[])); /* 170 */ sl@0: int (*tclCheckExecutionTraces) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * command, int numChars, Command * cmdPtr, int result, int traceFlags, int objc, Tcl_Obj *CONST objv[])); /* 171 */ sl@0: int (*tclInThreadExit) _ANSI_ARGS_((void)); /* 172 */ sl@0: int (*tclUniCharMatch) _ANSI_ARGS_((CONST Tcl_UniChar * string, int strLen, CONST Tcl_UniChar * pattern, int ptnLen, int nocase)); /* 173 */ sl@0: void *reserved174; sl@0: void *reserved175; sl@0: void *reserved176; sl@0: void *reserved177; sl@0: void *reserved178; sl@0: void *reserved179; sl@0: void *reserved180; sl@0: void *reserved181; sl@0: struct tm * (*tclpLocaltime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 182 */ sl@0: struct tm * (*tclpGmtime) _ANSI_ARGS_((TclpTime_t_CONST clock)); /* 183 */ sl@0: void *reserved184; sl@0: void *reserved185; sl@0: void *reserved186; sl@0: void *reserved187; sl@0: void *reserved188; sl@0: void *reserved189; sl@0: void *reserved190; sl@0: void *reserved191; sl@0: void *reserved192; sl@0: void *reserved193; sl@0: void *reserved194; sl@0: void *reserved195; sl@0: void *reserved196; sl@0: void *reserved197; sl@0: void *reserved198; sl@0: int (*tclMatchIsTrivial) _ANSI_ARGS_((CONST char * pattern)); /* 199 */ sl@0: } TclIntStubs; sl@0: sl@0: #ifdef __cplusplus sl@0: extern "C" { sl@0: #endif sl@0: extern TclIntStubs *tclIntStubsPtr; sl@0: #ifdef __cplusplus sl@0: } sl@0: #endif sl@0: sl@0: #if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) sl@0: sl@0: /* sl@0: * Inline function declarations: sl@0: */ sl@0: sl@0: /* Slot 0 is reserved */ sl@0: #ifndef TclAccessDeleteProc sl@0: #define TclAccessDeleteProc \ sl@0: (tclIntStubsPtr->tclAccessDeleteProc) /* 1 */ sl@0: #endif sl@0: #ifndef TclAccessInsertProc sl@0: #define TclAccessInsertProc \ sl@0: (tclIntStubsPtr->tclAccessInsertProc) /* 2 */ sl@0: #endif sl@0: #ifndef TclAllocateFreeObjects sl@0: #define TclAllocateFreeObjects \ sl@0: (tclIntStubsPtr->tclAllocateFreeObjects) /* 3 */ sl@0: #endif sl@0: /* Slot 4 is reserved */ sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: #ifndef TclCleanupChildren sl@0: #define TclCleanupChildren \ sl@0: (tclIntStubsPtr->tclCleanupChildren) /* 5 */ sl@0: #endif sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: #ifndef TclCleanupChildren sl@0: #define TclCleanupChildren \ sl@0: (tclIntStubsPtr->tclCleanupChildren) /* 5 */ sl@0: #endif sl@0: #endif /* __WIN32__ */ sl@0: #ifndef TclCleanupCommand sl@0: #define TclCleanupCommand \ sl@0: (tclIntStubsPtr->tclCleanupCommand) /* 6 */ sl@0: #endif sl@0: #ifndef TclCopyAndCollapse sl@0: #define TclCopyAndCollapse \ sl@0: (tclIntStubsPtr->tclCopyAndCollapse) /* 7 */ sl@0: #endif sl@0: #ifndef TclCopyChannel sl@0: #define TclCopyChannel \ sl@0: (tclIntStubsPtr->tclCopyChannel) /* 8 */ sl@0: #endif sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: #ifndef TclCreatePipeline sl@0: #define TclCreatePipeline \ sl@0: (tclIntStubsPtr->tclCreatePipeline) /* 9 */ sl@0: #endif sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: #ifndef TclCreatePipeline sl@0: #define TclCreatePipeline \ sl@0: (tclIntStubsPtr->tclCreatePipeline) /* 9 */ sl@0: #endif sl@0: #endif /* __WIN32__ */ sl@0: #ifndef TclCreateProc sl@0: #define TclCreateProc \ sl@0: (tclIntStubsPtr->tclCreateProc) /* 10 */ sl@0: #endif sl@0: #ifndef TclDeleteCompiledLocalVars sl@0: #define TclDeleteCompiledLocalVars \ sl@0: (tclIntStubsPtr->tclDeleteCompiledLocalVars) /* 11 */ sl@0: #endif sl@0: #ifndef TclDeleteVars sl@0: #define TclDeleteVars \ sl@0: (tclIntStubsPtr->tclDeleteVars) /* 12 */ sl@0: #endif sl@0: #ifndef TclDoGlob sl@0: #define TclDoGlob \ sl@0: (tclIntStubsPtr->tclDoGlob) /* 13 */ sl@0: #endif sl@0: #ifndef TclDumpMemoryInfo sl@0: #define TclDumpMemoryInfo \ sl@0: (tclIntStubsPtr->tclDumpMemoryInfo) /* 14 */ sl@0: #endif sl@0: /* Slot 15 is reserved */ sl@0: #ifndef TclExprFloatError sl@0: #define TclExprFloatError \ sl@0: (tclIntStubsPtr->tclExprFloatError) /* 16 */ sl@0: #endif sl@0: /* Slot 17 is reserved */ sl@0: /* Slot 18 is reserved */ sl@0: /* Slot 19 is reserved */ sl@0: /* Slot 20 is reserved */ sl@0: /* Slot 21 is reserved */ sl@0: #ifndef TclFindElement sl@0: #define TclFindElement \ sl@0: (tclIntStubsPtr->tclFindElement) /* 22 */ sl@0: #endif sl@0: #ifndef TclFindProc sl@0: #define TclFindProc \ sl@0: (tclIntStubsPtr->tclFindProc) /* 23 */ sl@0: #endif sl@0: #ifndef TclFormatInt sl@0: #define TclFormatInt \ sl@0: (tclIntStubsPtr->tclFormatInt) /* 24 */ sl@0: #endif sl@0: #ifndef TclFreePackageInfo sl@0: #define TclFreePackageInfo \ sl@0: (tclIntStubsPtr->tclFreePackageInfo) /* 25 */ sl@0: #endif sl@0: /* Slot 26 is reserved */ sl@0: #ifndef TclGetDate sl@0: #define TclGetDate \ sl@0: (tclIntStubsPtr->tclGetDate) /* 27 */ sl@0: #endif sl@0: #ifndef TclpGetDefaultStdChannel sl@0: #define TclpGetDefaultStdChannel \ sl@0: (tclIntStubsPtr->tclpGetDefaultStdChannel) /* 28 */ sl@0: #endif sl@0: /* Slot 29 is reserved */ sl@0: /* Slot 30 is reserved */ sl@0: #ifndef TclGetExtension sl@0: #define TclGetExtension \ sl@0: (tclIntStubsPtr->tclGetExtension) /* 31 */ sl@0: #endif sl@0: #ifndef TclGetFrame sl@0: #define TclGetFrame \ sl@0: (tclIntStubsPtr->tclGetFrame) /* 32 */ sl@0: #endif sl@0: #ifndef TclGetInterpProc sl@0: #define TclGetInterpProc \ sl@0: (tclIntStubsPtr->tclGetInterpProc) /* 33 */ sl@0: #endif sl@0: #ifndef TclGetIntForIndex sl@0: #define TclGetIntForIndex \ sl@0: (tclIntStubsPtr->tclGetIntForIndex) /* 34 */ sl@0: #endif sl@0: /* Slot 35 is reserved */ sl@0: #ifndef TclGetLong sl@0: #define TclGetLong \ sl@0: (tclIntStubsPtr->tclGetLong) /* 36 */ sl@0: #endif sl@0: #ifndef TclGetLoadedPackages sl@0: #define TclGetLoadedPackages \ sl@0: (tclIntStubsPtr->tclGetLoadedPackages) /* 37 */ sl@0: #endif sl@0: #ifndef TclGetNamespaceForQualName sl@0: #define TclGetNamespaceForQualName \ sl@0: (tclIntStubsPtr->tclGetNamespaceForQualName) /* 38 */ sl@0: #endif sl@0: #ifndef TclGetObjInterpProc sl@0: #define TclGetObjInterpProc \ sl@0: (tclIntStubsPtr->tclGetObjInterpProc) /* 39 */ sl@0: #endif sl@0: #ifndef TclGetOpenMode sl@0: #define TclGetOpenMode \ sl@0: (tclIntStubsPtr->tclGetOpenMode) /* 40 */ sl@0: #endif sl@0: #ifndef TclGetOriginalCommand sl@0: #define TclGetOriginalCommand \ sl@0: (tclIntStubsPtr->tclGetOriginalCommand) /* 41 */ sl@0: #endif sl@0: #ifndef TclpGetUserHome sl@0: #define TclpGetUserHome \ sl@0: (tclIntStubsPtr->tclpGetUserHome) /* 42 */ sl@0: #endif sl@0: #ifndef TclGlobalInvoke sl@0: #define TclGlobalInvoke \ sl@0: (tclIntStubsPtr->tclGlobalInvoke) /* 43 */ sl@0: #endif sl@0: #ifndef TclGuessPackageName sl@0: #define TclGuessPackageName \ sl@0: (tclIntStubsPtr->tclGuessPackageName) /* 44 */ sl@0: #endif sl@0: #ifndef TclHideUnsafeCommands sl@0: #define TclHideUnsafeCommands \ sl@0: (tclIntStubsPtr->tclHideUnsafeCommands) /* 45 */ sl@0: #endif sl@0: #ifndef TclInExit sl@0: #define TclInExit \ sl@0: (tclIntStubsPtr->tclInExit) /* 46 */ sl@0: #endif sl@0: /* Slot 47 is reserved */ sl@0: /* Slot 48 is reserved */ sl@0: #ifndef TclIncrVar2 sl@0: #define TclIncrVar2 \ sl@0: (tclIntStubsPtr->tclIncrVar2) /* 49 */ sl@0: #endif sl@0: #ifndef TclInitCompiledLocals sl@0: #define TclInitCompiledLocals \ sl@0: (tclIntStubsPtr->tclInitCompiledLocals) /* 50 */ sl@0: #endif sl@0: #ifndef TclInterpInit sl@0: #define TclInterpInit \ sl@0: (tclIntStubsPtr->tclInterpInit) /* 51 */ sl@0: #endif sl@0: #ifndef TclInvoke sl@0: #define TclInvoke \ sl@0: (tclIntStubsPtr->tclInvoke) /* 52 */ sl@0: #endif sl@0: #ifndef TclInvokeObjectCommand sl@0: #define TclInvokeObjectCommand \ sl@0: (tclIntStubsPtr->tclInvokeObjectCommand) /* 53 */ sl@0: #endif sl@0: #ifndef TclInvokeStringCommand sl@0: #define TclInvokeStringCommand \ sl@0: (tclIntStubsPtr->tclInvokeStringCommand) /* 54 */ sl@0: #endif sl@0: #ifndef TclIsProc sl@0: #define TclIsProc \ sl@0: (tclIntStubsPtr->tclIsProc) /* 55 */ sl@0: #endif sl@0: /* Slot 56 is reserved */ sl@0: /* Slot 57 is reserved */ sl@0: #ifndef TclLookupVar sl@0: #define TclLookupVar \ sl@0: (tclIntStubsPtr->tclLookupVar) /* 58 */ sl@0: #endif sl@0: /* Slot 59 is reserved */ sl@0: #ifndef TclNeedSpace sl@0: #define TclNeedSpace \ sl@0: (tclIntStubsPtr->tclNeedSpace) /* 60 */ sl@0: #endif sl@0: #ifndef TclNewProcBodyObj sl@0: #define TclNewProcBodyObj \ sl@0: (tclIntStubsPtr->tclNewProcBodyObj) /* 61 */ sl@0: #endif sl@0: #ifndef TclObjCommandComplete sl@0: #define TclObjCommandComplete \ sl@0: (tclIntStubsPtr->tclObjCommandComplete) /* 62 */ sl@0: #endif sl@0: #ifndef TclObjInterpProc sl@0: #define TclObjInterpProc \ sl@0: (tclIntStubsPtr->tclObjInterpProc) /* 63 */ sl@0: #endif sl@0: #ifndef TclObjInvoke sl@0: #define TclObjInvoke \ sl@0: (tclIntStubsPtr->tclObjInvoke) /* 64 */ sl@0: #endif sl@0: #ifndef TclObjInvokeGlobal sl@0: #define TclObjInvokeGlobal \ sl@0: (tclIntStubsPtr->tclObjInvokeGlobal) /* 65 */ sl@0: #endif sl@0: #ifndef TclOpenFileChannelDeleteProc sl@0: #define TclOpenFileChannelDeleteProc \ sl@0: (tclIntStubsPtr->tclOpenFileChannelDeleteProc) /* 66 */ sl@0: #endif sl@0: #ifndef TclOpenFileChannelInsertProc sl@0: #define TclOpenFileChannelInsertProc \ sl@0: (tclIntStubsPtr->tclOpenFileChannelInsertProc) /* 67 */ sl@0: #endif sl@0: /* Slot 68 is reserved */ sl@0: #ifndef TclpAlloc sl@0: #define TclpAlloc \ sl@0: (tclIntStubsPtr->tclpAlloc) /* 69 */ sl@0: #endif sl@0: /* Slot 70 is reserved */ sl@0: /* Slot 71 is reserved */ sl@0: /* Slot 72 is reserved */ sl@0: /* Slot 73 is reserved */ sl@0: #ifndef TclpFree sl@0: #define TclpFree \ sl@0: (tclIntStubsPtr->tclpFree) /* 74 */ sl@0: #endif sl@0: #ifndef TclpGetClicks sl@0: #define TclpGetClicks \ sl@0: (tclIntStubsPtr->tclpGetClicks) /* 75 */ sl@0: #endif sl@0: #ifndef TclpGetSeconds sl@0: #define TclpGetSeconds \ sl@0: (tclIntStubsPtr->tclpGetSeconds) /* 76 */ sl@0: #endif sl@0: #ifndef TclpGetTime sl@0: #define TclpGetTime \ sl@0: (tclIntStubsPtr->tclpGetTime) /* 77 */ sl@0: #endif sl@0: #ifndef TclpGetTimeZone sl@0: #define TclpGetTimeZone \ sl@0: (tclIntStubsPtr->tclpGetTimeZone) /* 78 */ sl@0: #endif sl@0: /* Slot 79 is reserved */ sl@0: /* Slot 80 is reserved */ sl@0: #ifndef TclpRealloc sl@0: #define TclpRealloc \ sl@0: (tclIntStubsPtr->tclpRealloc) /* 81 */ sl@0: #endif sl@0: /* Slot 82 is reserved */ sl@0: /* Slot 83 is reserved */ sl@0: /* Slot 84 is reserved */ sl@0: /* Slot 85 is reserved */ sl@0: /* Slot 86 is reserved */ sl@0: /* Slot 87 is reserved */ sl@0: #ifndef TclPrecTraceProc sl@0: #define TclPrecTraceProc \ sl@0: (tclIntStubsPtr->tclPrecTraceProc) /* 88 */ sl@0: #endif sl@0: #ifndef TclPreventAliasLoop sl@0: #define TclPreventAliasLoop \ sl@0: (tclIntStubsPtr->tclPreventAliasLoop) /* 89 */ sl@0: #endif sl@0: /* Slot 90 is reserved */ sl@0: #ifndef TclProcCleanupProc sl@0: #define TclProcCleanupProc \ sl@0: (tclIntStubsPtr->tclProcCleanupProc) /* 91 */ sl@0: #endif sl@0: #ifndef TclProcCompileProc sl@0: #define TclProcCompileProc \ sl@0: (tclIntStubsPtr->tclProcCompileProc) /* 92 */ sl@0: #endif sl@0: #ifndef TclProcDeleteProc sl@0: #define TclProcDeleteProc \ sl@0: (tclIntStubsPtr->tclProcDeleteProc) /* 93 */ sl@0: #endif sl@0: #ifndef TclProcInterpProc sl@0: #define TclProcInterpProc \ sl@0: (tclIntStubsPtr->tclProcInterpProc) /* 94 */ sl@0: #endif sl@0: /* Slot 95 is reserved */ sl@0: #ifndef TclRenameCommand sl@0: #define TclRenameCommand \ sl@0: (tclIntStubsPtr->tclRenameCommand) /* 96 */ sl@0: #endif sl@0: #ifndef TclResetShadowedCmdRefs sl@0: #define TclResetShadowedCmdRefs \ sl@0: (tclIntStubsPtr->tclResetShadowedCmdRefs) /* 97 */ sl@0: #endif sl@0: #ifndef TclServiceIdle sl@0: #define TclServiceIdle \ sl@0: (tclIntStubsPtr->tclServiceIdle) /* 98 */ sl@0: #endif sl@0: /* Slot 99 is reserved */ sl@0: /* Slot 100 is reserved */ sl@0: #ifndef TclSetPreInitScript sl@0: #define TclSetPreInitScript \ sl@0: (tclIntStubsPtr->tclSetPreInitScript) /* 101 */ sl@0: #endif sl@0: #ifndef TclSetupEnv sl@0: #define TclSetupEnv \ sl@0: (tclIntStubsPtr->tclSetupEnv) /* 102 */ sl@0: #endif sl@0: #ifndef TclSockGetPort sl@0: #define TclSockGetPort \ sl@0: (tclIntStubsPtr->tclSockGetPort) /* 103 */ sl@0: #endif sl@0: #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ sl@0: #ifndef TclSockMinimumBuffers sl@0: #define TclSockMinimumBuffers \ sl@0: (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */ sl@0: #endif sl@0: #endif /* UNIX */ sl@0: #ifdef __WIN32__ sl@0: #ifndef TclSockMinimumBuffers sl@0: #define TclSockMinimumBuffers \ sl@0: (tclIntStubsPtr->tclSockMinimumBuffers) /* 104 */ sl@0: #endif sl@0: #endif /* __WIN32__ */ sl@0: /* Slot 105 is reserved */ sl@0: #ifndef TclStatDeleteProc sl@0: #define TclStatDeleteProc \ sl@0: (tclIntStubsPtr->tclStatDeleteProc) /* 106 */ sl@0: #endif sl@0: #ifndef TclStatInsertProc sl@0: #define TclStatInsertProc \ sl@0: (tclIntStubsPtr->tclStatInsertProc) /* 107 */ sl@0: #endif sl@0: #ifndef TclTeardownNamespace sl@0: #define TclTeardownNamespace \ sl@0: (tclIntStubsPtr->tclTeardownNamespace) /* 108 */ sl@0: #endif sl@0: #ifndef TclUpdateReturnInfo sl@0: #define TclUpdateReturnInfo \ sl@0: (tclIntStubsPtr->tclUpdateReturnInfo) /* 109 */ sl@0: #endif sl@0: /* Slot 110 is reserved */ sl@0: #ifndef Tcl_AddInterpResolvers sl@0: #define Tcl_AddInterpResolvers \ sl@0: (tclIntStubsPtr->tcl_AddInterpResolvers) /* 111 */ sl@0: #endif sl@0: #ifndef Tcl_AppendExportList sl@0: #define Tcl_AppendExportList \ sl@0: (tclIntStubsPtr->tcl_AppendExportList) /* 112 */ sl@0: #endif sl@0: #ifndef Tcl_CreateNamespace sl@0: #define Tcl_CreateNamespace \ sl@0: (tclIntStubsPtr->tcl_CreateNamespace) /* 113 */ sl@0: #endif sl@0: #ifndef Tcl_DeleteNamespace sl@0: #define Tcl_DeleteNamespace \ sl@0: (tclIntStubsPtr->tcl_DeleteNamespace) /* 114 */ sl@0: #endif sl@0: #ifndef Tcl_Export sl@0: #define Tcl_Export \ sl@0: (tclIntStubsPtr->tcl_Export) /* 115 */ sl@0: #endif sl@0: #ifndef Tcl_FindCommand sl@0: #define Tcl_FindCommand \ sl@0: (tclIntStubsPtr->tcl_FindCommand) /* 116 */ sl@0: #endif sl@0: #ifndef Tcl_FindNamespace sl@0: #define Tcl_FindNamespace \ sl@0: (tclIntStubsPtr->tcl_FindNamespace) /* 117 */ sl@0: #endif sl@0: #ifndef Tcl_GetInterpResolvers sl@0: #define Tcl_GetInterpResolvers \ sl@0: (tclIntStubsPtr->tcl_GetInterpResolvers) /* 118 */ sl@0: #endif sl@0: #ifndef Tcl_GetNamespaceResolvers sl@0: #define Tcl_GetNamespaceResolvers \ sl@0: (tclIntStubsPtr->tcl_GetNamespaceResolvers) /* 119 */ sl@0: #endif sl@0: #ifndef Tcl_FindNamespaceVar sl@0: #define Tcl_FindNamespaceVar \ sl@0: (tclIntStubsPtr->tcl_FindNamespaceVar) /* 120 */ sl@0: #endif sl@0: #ifndef Tcl_ForgetImport sl@0: #define Tcl_ForgetImport \ sl@0: (tclIntStubsPtr->tcl_ForgetImport) /* 121 */ sl@0: #endif sl@0: #ifndef Tcl_GetCommandFromObj sl@0: #define Tcl_GetCommandFromObj \ sl@0: (tclIntStubsPtr->tcl_GetCommandFromObj) /* 122 */ sl@0: #endif sl@0: #ifndef Tcl_GetCommandFullName sl@0: #define Tcl_GetCommandFullName \ sl@0: (tclIntStubsPtr->tcl_GetCommandFullName) /* 123 */ sl@0: #endif sl@0: #ifndef Tcl_GetCurrentNamespace sl@0: #define Tcl_GetCurrentNamespace \ sl@0: (tclIntStubsPtr->tcl_GetCurrentNamespace) /* 124 */ sl@0: #endif sl@0: #ifndef Tcl_GetGlobalNamespace sl@0: #define Tcl_GetGlobalNamespace \ sl@0: (tclIntStubsPtr->tcl_GetGlobalNamespace) /* 125 */ sl@0: #endif sl@0: #ifndef Tcl_GetVariableFullName sl@0: #define Tcl_GetVariableFullName \ sl@0: (tclIntStubsPtr->tcl_GetVariableFullName) /* 126 */ sl@0: #endif sl@0: #ifndef Tcl_Import sl@0: #define Tcl_Import \ sl@0: (tclIntStubsPtr->tcl_Import) /* 127 */ sl@0: #endif sl@0: #ifndef Tcl_PopCallFrame sl@0: #define Tcl_PopCallFrame \ sl@0: (tclIntStubsPtr->tcl_PopCallFrame) /* 128 */ sl@0: #endif sl@0: #ifndef Tcl_PushCallFrame sl@0: #define Tcl_PushCallFrame \ sl@0: (tclIntStubsPtr->tcl_PushCallFrame) /* 129 */ sl@0: #endif sl@0: #ifndef Tcl_RemoveInterpResolvers sl@0: #define Tcl_RemoveInterpResolvers \ sl@0: (tclIntStubsPtr->tcl_RemoveInterpResolvers) /* 130 */ sl@0: #endif sl@0: #ifndef Tcl_SetNamespaceResolvers sl@0: #define Tcl_SetNamespaceResolvers \ sl@0: (tclIntStubsPtr->tcl_SetNamespaceResolvers) /* 131 */ sl@0: #endif sl@0: #ifndef TclpHasSockets sl@0: #define TclpHasSockets \ sl@0: (tclIntStubsPtr->tclpHasSockets) /* 132 */ sl@0: #endif sl@0: #ifndef TclpGetDate sl@0: #define TclpGetDate \ sl@0: (tclIntStubsPtr->tclpGetDate) /* 133 */ sl@0: #endif sl@0: #ifndef TclpStrftime sl@0: #define TclpStrftime \ sl@0: (tclIntStubsPtr->tclpStrftime) /* 134 */ sl@0: #endif sl@0: #ifndef TclpCheckStackSpace sl@0: #define TclpCheckStackSpace \ sl@0: (tclIntStubsPtr->tclpCheckStackSpace) /* 135 */ sl@0: #endif sl@0: /* Slot 136 is reserved */ sl@0: /* Slot 137 is reserved */ sl@0: #ifndef TclGetEnv sl@0: #define TclGetEnv \ sl@0: (tclIntStubsPtr->tclGetEnv) /* 138 */ sl@0: #endif sl@0: /* Slot 139 is reserved */ sl@0: #ifndef TclLooksLikeInt sl@0: #define TclLooksLikeInt \ sl@0: (tclIntStubsPtr->tclLooksLikeInt) /* 140 */ sl@0: #endif sl@0: #ifndef TclpGetCwd sl@0: #define TclpGetCwd \ sl@0: (tclIntStubsPtr->tclpGetCwd) /* 141 */ sl@0: #endif sl@0: #ifndef TclSetByteCodeFromAny sl@0: #define TclSetByteCodeFromAny \ sl@0: (tclIntStubsPtr->tclSetByteCodeFromAny) /* 142 */ sl@0: #endif sl@0: #ifndef TclAddLiteralObj sl@0: #define TclAddLiteralObj \ sl@0: (tclIntStubsPtr->tclAddLiteralObj) /* 143 */ sl@0: #endif sl@0: #ifndef TclHideLiteral sl@0: #define TclHideLiteral \ sl@0: (tclIntStubsPtr->tclHideLiteral) /* 144 */ sl@0: #endif sl@0: #ifndef TclGetAuxDataType sl@0: #define TclGetAuxDataType \ sl@0: (tclIntStubsPtr->tclGetAuxDataType) /* 145 */ sl@0: #endif sl@0: #ifndef TclHandleCreate sl@0: #define TclHandleCreate \ sl@0: (tclIntStubsPtr->tclHandleCreate) /* 146 */ sl@0: #endif sl@0: #ifndef TclHandleFree sl@0: #define TclHandleFree \ sl@0: (tclIntStubsPtr->tclHandleFree) /* 147 */ sl@0: #endif sl@0: #ifndef TclHandlePreserve sl@0: #define TclHandlePreserve \ sl@0: (tclIntStubsPtr->tclHandlePreserve) /* 148 */ sl@0: #endif sl@0: #ifndef TclHandleRelease sl@0: #define TclHandleRelease \ sl@0: (tclIntStubsPtr->tclHandleRelease) /* 149 */ sl@0: #endif sl@0: #ifndef TclRegAbout sl@0: #define TclRegAbout \ sl@0: (tclIntStubsPtr->tclRegAbout) /* 150 */ sl@0: #endif sl@0: #ifndef TclRegExpRangeUniChar sl@0: #define TclRegExpRangeUniChar \ sl@0: (tclIntStubsPtr->tclRegExpRangeUniChar) /* 151 */ sl@0: #endif sl@0: #ifndef TclSetLibraryPath sl@0: #define TclSetLibraryPath \ sl@0: (tclIntStubsPtr->tclSetLibraryPath) /* 152 */ sl@0: #endif sl@0: #ifndef TclGetLibraryPath sl@0: #define TclGetLibraryPath \ sl@0: (tclIntStubsPtr->tclGetLibraryPath) /* 153 */ sl@0: #endif sl@0: /* Slot 154 is reserved */ sl@0: /* Slot 155 is reserved */ sl@0: #ifndef TclRegError sl@0: #define TclRegError \ sl@0: (tclIntStubsPtr->tclRegError) /* 156 */ sl@0: #endif sl@0: #ifndef TclVarTraceExists sl@0: #define TclVarTraceExists \ sl@0: (tclIntStubsPtr->tclVarTraceExists) /* 157 */ sl@0: #endif sl@0: #ifndef TclSetStartupScriptFileName sl@0: #define TclSetStartupScriptFileName \ sl@0: (tclIntStubsPtr->tclSetStartupScriptFileName) /* 158 */ sl@0: #endif sl@0: #ifndef TclGetStartupScriptFileName sl@0: #define TclGetStartupScriptFileName \ sl@0: (tclIntStubsPtr->tclGetStartupScriptFileName) /* 159 */ sl@0: #endif sl@0: /* Slot 160 is reserved */ sl@0: #ifndef TclChannelTransform sl@0: #define TclChannelTransform \ sl@0: (tclIntStubsPtr->tclChannelTransform) /* 161 */ sl@0: #endif sl@0: #ifndef TclChannelEventScriptInvoker sl@0: #define TclChannelEventScriptInvoker \ sl@0: (tclIntStubsPtr->tclChannelEventScriptInvoker) /* 162 */ sl@0: #endif sl@0: #ifndef TclGetInstructionTable sl@0: #define TclGetInstructionTable \ sl@0: (tclIntStubsPtr->tclGetInstructionTable) /* 163 */ sl@0: #endif sl@0: #ifndef TclExpandCodeArray sl@0: #define TclExpandCodeArray \ sl@0: (tclIntStubsPtr->tclExpandCodeArray) /* 164 */ sl@0: #endif sl@0: #ifndef TclpSetInitialEncodings sl@0: #define TclpSetInitialEncodings \ sl@0: (tclIntStubsPtr->tclpSetInitialEncodings) /* 165 */ sl@0: #endif sl@0: #ifndef TclListObjSetElement sl@0: #define TclListObjSetElement \ sl@0: (tclIntStubsPtr->tclListObjSetElement) /* 166 */ sl@0: #endif sl@0: #ifndef TclSetStartupScriptPath sl@0: #define TclSetStartupScriptPath \ sl@0: (tclIntStubsPtr->tclSetStartupScriptPath) /* 167 */ sl@0: #endif sl@0: #ifndef TclGetStartupScriptPath sl@0: #define TclGetStartupScriptPath \ sl@0: (tclIntStubsPtr->tclGetStartupScriptPath) /* 168 */ sl@0: #endif sl@0: #ifndef TclpUtfNcmp2 sl@0: #define TclpUtfNcmp2 \ sl@0: (tclIntStubsPtr->tclpUtfNcmp2) /* 169 */ sl@0: #endif sl@0: #ifndef TclCheckInterpTraces sl@0: #define TclCheckInterpTraces \ sl@0: (tclIntStubsPtr->tclCheckInterpTraces) /* 170 */ sl@0: #endif sl@0: #ifndef TclCheckExecutionTraces sl@0: #define TclCheckExecutionTraces \ sl@0: (tclIntStubsPtr->tclCheckExecutionTraces) /* 171 */ sl@0: #endif sl@0: #ifndef TclInThreadExit sl@0: #define TclInThreadExit \ sl@0: (tclIntStubsPtr->tclInThreadExit) /* 172 */ sl@0: #endif sl@0: #ifndef TclUniCharMatch sl@0: #define TclUniCharMatch \ sl@0: (tclIntStubsPtr->tclUniCharMatch) /* 173 */ sl@0: #endif sl@0: /* Slot 174 is reserved */ sl@0: /* Slot 175 is reserved */ sl@0: /* Slot 176 is reserved */ sl@0: /* Slot 177 is reserved */ sl@0: /* Slot 178 is reserved */ sl@0: /* Slot 179 is reserved */ sl@0: /* Slot 180 is reserved */ sl@0: /* Slot 181 is reserved */ sl@0: #ifndef TclpLocaltime sl@0: #define TclpLocaltime \ sl@0: (tclIntStubsPtr->tclpLocaltime) /* 182 */ sl@0: #endif sl@0: #ifndef TclpGmtime sl@0: #define TclpGmtime \ sl@0: (tclIntStubsPtr->tclpGmtime) /* 183 */ sl@0: #endif sl@0: /* Slot 184 is reserved */ sl@0: /* Slot 185 is reserved */ sl@0: /* Slot 186 is reserved */ sl@0: /* Slot 187 is reserved */ sl@0: /* Slot 188 is reserved */ sl@0: /* Slot 189 is reserved */ sl@0: /* Slot 190 is reserved */ sl@0: /* Slot 191 is reserved */ sl@0: /* Slot 192 is reserved */ sl@0: /* Slot 193 is reserved */ sl@0: /* Slot 194 is reserved */ sl@0: /* Slot 195 is reserved */ sl@0: /* Slot 196 is reserved */ sl@0: /* Slot 197 is reserved */ sl@0: /* Slot 198 is reserved */ sl@0: #ifndef TclMatchIsTrivial sl@0: #define TclMatchIsTrivial \ sl@0: (tclIntStubsPtr->tclMatchIsTrivial) /* 199 */ sl@0: #endif sl@0: sl@0: #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ sl@0: sl@0: /* !END!: Do not edit above this line. */ sl@0: sl@0: #endif /* _TCLINTDECLS */