/* * tclStubInit.c -- * * This file contains the initializers for the Tcl stub vectors. * * Copyright (c) 1998-1999 by Scriptics Corporation. * * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * * RCS: @(#) $Id: tclStubInit.c,v 1.1 1999/03/03 00:38:43 stanton Exp $ */ #include "tclInt.h" #include "tclPort.h" /* * WARNING: The contents of this file is automatically generated by the * tools/genStubs.tcl script. Any modifications to the function declarations * below should be made in the generic/tcl.decls script. */ /* !BEGIN!: Do not edit below this line. */ static TclStubHooks tclStubHooks; TclStubs tclStubs = { TCL_STUB_MAGIC, &tclStubHooks, Tcl_AddErrorInfo, /* 0 */ Tcl_AddObjErrorInfo, /* 1 */ Tcl_Alloc, /* 2 */ Tcl_AllowExceptions, /* 3 */ Tcl_AppendAllObjTypes, /* 4 */ Tcl_AppendElement, /* 5 */ Tcl_AppendResult, /* 6 */ Tcl_AppendResultVA, /* 7 */ Tcl_AppendToObj, /* 8 */ Tcl_AppendStringsToObj, /* 9 */ Tcl_AppendStringsToObjVA, /* 10 */ Tcl_AsyncCreate, /* 11 */ Tcl_AsyncDelete, /* 12 */ Tcl_AsyncInvoke, /* 13 */ Tcl_AsyncMark, /* 14 */ Tcl_AsyncReady, /* 15 */ Tcl_BackgroundError, /* 16 */ Tcl_Backslash, /* 17 */ Tcl_BadChannelOption, /* 18 */ Tcl_CallWhenDeleted, /* 19 */ Tcl_CancelIdleCall, /* 20 */ Tcl_Close, /* 21 */ Tcl_CommandComplete, /* 22 */ Tcl_Concat, /* 23 */ Tcl_ConcatObj, /* 24 */ Tcl_ConvertCountedElement, /* 25 */ Tcl_ConvertElement, /* 26 */ Tcl_ConvertToType, /* 27 */ Tcl_CreateAlias, /* 28 */ Tcl_CreateAliasObj, /* 29 */ Tcl_CreateChannel, /* 30 */ Tcl_CreateChannelHandler, /* 31 */ Tcl_CreateCloseHandler, /* 32 */ Tcl_CreateCommand, /* 33 */ Tcl_CreateEventSource, /* 34 */ Tcl_CreateExitHandler, /* 35 */ Tcl_CreateInterp, /* 36 */ Tcl_CreateMathFunc, /* 37 */ Tcl_CreateObjCommand, /* 38 */ Tcl_CreateSlave, /* 39 */ Tcl_CreateTimerHandler, /* 40 */ Tcl_CreateTrace, /* 41 */ Tcl_DbCkalloc, /* 42 */ Tcl_DbCkfree, /* 43 */ Tcl_DbCkrealloc, /* 44 */ Tcl_DbDecrRefCount, /* 45 */ Tcl_DbIncrRefCount, /* 46 */ Tcl_DbIsShared, /* 47 */ Tcl_DbNewBooleanObj, /* 48 */ Tcl_DbNewByteArrayObj, /* 49 */ Tcl_DbNewDoubleObj, /* 50 */ Tcl_DbNewListObj, /* 51 */ Tcl_DbNewLongObj, /* 52 */ Tcl_DbNewObj, /* 53 */ Tcl_DbNewStringObj, /* 54 */ Tcl_DeleteAssocData, /* 55 */ Tcl_DeleteCommand, /* 56 */ Tcl_DeleteCommandFromToken, /* 57 */ Tcl_DeleteChannelHandler, /* 58 */ Tcl_DeleteCloseHandler, /* 59 */ Tcl_DeleteEvents, /* 60 */ Tcl_DeleteEventSource, /* 61 */ Tcl_DeleteExitHandler, /* 62 */ Tcl_DeleteHashEntry, /* 63 */ Tcl_DeleteHashTable, /* 64 */ Tcl_DeleteInterp, /* 65 */ Tcl_DeleteTimerHandler, /* 66 */ Tcl_DeleteTrace, /* 67 */ Tcl_DetachPids, /* 68 */ Tcl_DontCallWhenDeleted, /* 69 */ Tcl_DoOneEvent, /* 70 */ Tcl_DoWhenIdle, /* 71 */ Tcl_DStringAppend, /* 72 */ Tcl_DStringAppendElement, /* 73 */ Tcl_DStringEndSublist, /* 74 */ Tcl_DStringFree, /* 75 */ Tcl_DStringGetResult, /* 76 */ Tcl_DStringInit, /* 77 */ Tcl_DStringResult, /* 78 */ Tcl_DStringSetLength, /* 79 */ Tcl_DStringStartSublist, /* 80 */ Tcl_DumpActiveMemory, /* 81 */ Tcl_DuplicateObj, /* 82 */ Tcl_Eof, /* 83 */ Tcl_ErrnoId, /* 84 */ Tcl_ErrnoMsg, /* 85 */ Tcl_Eval, /* 86 */ Tcl_EvalFile, /* 87 */ Tcl_EventuallyFree, /* 88 */ Tcl_EvalObj, /* 89 */ Tcl_Exit, /* 90 */ Tcl_ExposeCommand, /* 91 */ Tcl_ExprBoolean, /* 92 */ Tcl_ExprBooleanObj, /* 93 */ Tcl_ExprDouble, /* 94 */ Tcl_ExprDoubleObj, /* 95 */ Tcl_ExprLong, /* 96 */ Tcl_ExprLongObj, /* 97 */ Tcl_ExprObj, /* 98 */ Tcl_ExprString, /* 99 */ Tcl_Finalize, /* 100 */ Tcl_FindExecutable, /* 101 */ Tcl_FirstHashEntry, /* 102 */ Tcl_Flush, /* 103 */ Tcl_Free, /* 104 */ TclFreeObj, /* 105 */ Tcl_FreeResult, /* 106 */ Tcl_GetAlias, /* 107 */ Tcl_GetAliasObj, /* 108 */ Tcl_GetAssocData, /* 109 */ Tcl_GetBoolean, /* 110 */ Tcl_GetBooleanFromObj, /* 111 */ Tcl_GetByteArrayFromObj, /* 112 */ Tcl_GetChannel, /* 113 */ Tcl_GetChannelBufferSize, /* 114 */ Tcl_GetChannelHandle, /* 115 */ Tcl_GetChannelInstanceData, /* 116 */ Tcl_GetChannelMode, /* 117 */ Tcl_GetChannelName, /* 118 */ Tcl_GetChannelOption, /* 119 */ Tcl_GetChannelType, /* 120 */ Tcl_GetCommandInfo, /* 121 */ Tcl_GetCommandName, /* 122 */ Tcl_GetDouble, /* 123 */ Tcl_GetDoubleFromObj, /* 124 */ Tcl_GetErrno, /* 125 */ Tcl_GetHostName, /* 126 */ Tcl_GetIndexFromObj, /* 127 */ Tcl_GetInt, /* 128 */ Tcl_GetInterpPath, /* 129 */ Tcl_GetIntFromObj, /* 130 */ Tcl_GetLongFromObj, /* 131 */ Tcl_GetMaster, /* 132 */ Tcl_GetNameOfExecutable, /* 133 */ Tcl_GetObjResult, /* 134 */ Tcl_GetObjType, /* 135 */ Tcl_GetPathType, /* 136 */ Tcl_Gets, /* 137 */ Tcl_GetsObj, /* 138 */ Tcl_GetServiceMode, /* 139 */ Tcl_GetSlave, /* 140 */ Tcl_GetStdChannel, /* 141 */ Tcl_GetStringFromObj, /* 142 */ Tcl_GetStringResult, /* 143 */ Tcl_GetVar, /* 144 */ Tcl_GetVar2, /* 145 */ Tcl_GlobalEval, /* 146 */ Tcl_GlobalEvalObj, /* 147 */ Tcl_HashStats, /* 148 */ Tcl_HideCommand, /* 149 */ Tcl_Init, /* 150 */ Tcl_InitHashTable, /* 151 */ Tcl_InputBlocked, /* 152 */ Tcl_InputBuffered, /* 153 */ Tcl_InterpDeleted, /* 154 */ Tcl_IsSafe, /* 155 */ Tcl_InvalidateStringRep, /* 156 */ Tcl_JoinPath, /* 157 */ Tcl_LinkVar, /* 158 */ Tcl_ListObjAppendList, /* 159 */ Tcl_ListObjAppendElement, /* 160 */ Tcl_ListObjGetElements, /* 161 */ Tcl_ListObjIndex, /* 162 */ Tcl_ListObjLength, /* 163 */ Tcl_ListObjReplace, /* 164 */ Tcl_MakeFileChannel, /* 165 */ Tcl_MakeSafe, /* 166 */ Tcl_MakeTcpClientChannel, /* 167 */ Tcl_Merge, /* 168 */ Tcl_NewBooleanObj, /* 169 */ Tcl_NewByteArrayObj, /* 170 */ Tcl_NewDoubleObj, /* 171 */ Tcl_NewIntObj, /* 172 */ Tcl_NewListObj, /* 173 */ Tcl_NewLongObj, /* 174 */ Tcl_NewObj, /* 175 */ Tcl_NewStringObj, /* 176 */ Tcl_NextHashEntry, /* 177 */ Tcl_NotifyChannel, /* 178 */ Tcl_ObjGetVar2, /* 179 */ Tcl_ObjSetVar2, /* 180 */ Tcl_OpenCommandChannel, /* 181 */ Tcl_OpenFileChannel, /* 182 */ Tcl_OpenTcpClient, /* 183 */ Tcl_OpenTcpServer, /* 184 */ Tcl_Panic, /* 185 */ Tcl_PanicVA, /* 186 */ Tcl_ParseVar, /* 187 */ Tcl_PkgPresent, /* 188 */ Tcl_PkgPresentEx, /* 189 */ Tcl_PkgProvide, /* 190 */ Tcl_PkgProvideEx, /* 191 */ Tcl_PkgRequire, /* 192 */ Tcl_PkgRequireEx, /* 193 */ Tcl_PosixError, /* 194 */ Tcl_Preserve, /* 195 */ Tcl_PrintDouble, /* 196 */ Tcl_PutEnv, /* 197 */ Tcl_QueueEvent, /* 198 */ Tcl_Read, /* 199 */ Tcl_Realloc, /* 200 */ Tcl_ReapDetachedProcs, /* 201 */ Tcl_RecordAndEval, /* 202 */ Tcl_RecordAndEvalObj, /* 203 */ Tcl_RegExpCompile, /* 204 */ Tcl_RegExpExec, /* 205 */ Tcl_RegExpMatch, /* 206 */ Tcl_RegExpRange, /* 207 */ Tcl_RegisterChannel, /* 208 */ Tcl_RegisterObjType, /* 209 */ Tcl_Release, /* 210 */ Tcl_ResetResult, /* 211 */ Tcl_ScanCountedElement, /* 212 */ Tcl_ScanElement, /* 213 */ Tcl_Seek, /* 214 */ Tcl_ServiceAll, /* 215 */ Tcl_ServiceEvent, /* 216 */ Tcl_SetAssocData, /* 217 */ Tcl_SetBooleanObj, /* 218 */ Tcl_SetByteArrayLength, /* 219 */ Tcl_SetByteArrayObj, /* 220 */ Tcl_SetChannelBufferSize, /* 221 */ Tcl_SetChannelOption, /* 222 */ Tcl_SetCommandInfo, /* 223 */ Tcl_SetDoubleObj, /* 224 */ Tcl_SetErrno, /* 225 */ Tcl_SetErrorCode, /* 226 */ Tcl_SetErrorCodeVA, /* 227 */ Tcl_SetIntObj, /* 228 */ Tcl_SetListObj, /* 229 */ Tcl_SetLongObj, /* 230 */ Tcl_SetMaxBlockTime, /* 231 */ Tcl_SetObjErrorCode, /* 232 */ Tcl_SetObjLength, /* 233 */ Tcl_SetObjResult, /* 234 */ Tcl_SetPanicProc, /* 235 */ Tcl_SetRecursionLimit, /* 236 */ Tcl_SetResult, /* 237 */ Tcl_SetServiceMode, /* 238 */ Tcl_SetStdChannel, /* 239 */ Tcl_SetStringObj, /* 240 */ Tcl_SetTimer, /* 241 */ Tcl_SetVar, /* 242 */ Tcl_SetVar2, /* 243 */ Tcl_SignalId, /* 244 */ Tcl_SignalMsg, /* 245 */ Tcl_Sleep, /* 246 */ Tcl_SourceRCFile, /* 247 */ Tcl_SplitList, /* 248 */ Tcl_SplitPath, /* 249 */ Tcl_StaticPackage, /* 250 */ Tcl_StringMatch, /* 251 */ Tcl_Tell, /* 252 */ Tcl_TraceVar, /* 253 */ Tcl_TraceVar2, /* 254 */ Tcl_TranslateFileName, /* 255 */ Tcl_Ungets, /* 256 */ Tcl_UnlinkVar, /* 257 */ Tcl_UnregisterChannel, /* 258 */ Tcl_UnsetVar, /* 259 */ Tcl_UnsetVar2, /* 260 */ Tcl_UntraceVar, /* 261 */ Tcl_UntraceVar2, /* 262 */ Tcl_UpdateLinkedVar, /* 263 */ Tcl_UpVar, /* 264 */ Tcl_UpVar2, /* 265 */ Tcl_ValidateAllMemory, /* 266 */ Tcl_VarEval, /* 267 */ Tcl_VarEvalVA, /* 268 */ Tcl_VarTraceInfo, /* 269 */ Tcl_VarTraceInfo2, /* 270 */ Tcl_WaitForEvent, /* 271 */ Tcl_WaitPid, /* 272 */ Tcl_Write, /* 273 */ Tcl_WrongNumArgs, /* 274 */ }; extern TclStubs *tclStubsPtr = &tclStubs; TclIntStubs tclIntStubs = { TCL_STUB_MAGIC, NULL, TclAccess, /* 0 */ TclAccessDeleteProc, /* 1 */ TclAccessInsertProc, /* 2 */ TclAllocateFreeObjects, /* 3 */ TclChdir, /* 4 */ TclCleanupChildren, /* 5 */ TclCleanupCommand, /* 6 */ TclCopyAndCollapse, /* 7 */ TclCopyChannel, /* 8 */ TclCreatePipeline, /* 9 */ TclCreateProc, /* 10 */ TclDeleteCompiledLocalVars, /* 11 */ TclDeleteVars, /* 12 */ TclDoGlob, /* 13 */ TclDumpMemoryInfo, /* 14 */ TclExpandParseValue, /* 15 */ TclExprFloatError, /* 16 */ TclFileAttrsCmd, /* 17 */ TclFileCopyCmd, /* 18 */ TclFileDeleteCmd, /* 19 */ TclFileMakeDirsCmd, /* 20 */ TclFileRenameCmd, /* 21 */ TclFinalizeCompExecEnv, /* 22 */ TclFinalizeEnvironment, /* 23 */ TclFinalizeExecEnv, /* 24 */ TclFindElement, /* 25 */ TclFindProc, /* 26 */ TclFormatInt, /* 27 */ TclFreePackageInfo, /* 28 */ TclGetAndDetachPids, /* 29 */ TclGetCwd, /* 30 */ TclGetDate, /* 31 */ TclGetDefaultStdChannel, /* 32 */ TclGetElementOfIndexedArray, /* 33 */ TclGetEnv, /* 34 */ TclGetExtension, /* 35 */ TclGetFrame, /* 36 */ TclGetInterpProc, /* 37 */ TclGetIntForIndex, /* 38 */ TclGetIndexedScalar, /* 39 */ TclGetLong, /* 40 */ TclGetLoadedPackages, /* 41 */ TclGetNamespaceForQualName, /* 42 */ TclGetObjInterpProc, /* 43 */ TclGetOpenMode, /* 44 */ TclGetOriginalCommand, /* 45 */ TclpGetUserHome, /* 46 */ TclGlobalInvoke, /* 47 */ TclGuessPackageName, /* 48 */ TclHasSockets, /* 49 */ TclHideUnsafeCommands, /* 50 */ TclInExit, /* 51 */ TclIncrElementOfIndexedArray, /* 52 */ TclIncrIndexedScalar, /* 53 */ TclIncrVar2, /* 54 */ TclInitCompiledLocals, /* 55 */ TclInitNamespaces, /* 56 */ TclInterpInit, /* 57 */ TclInvoke, /* 58 */ TclInvokeObjectCommand, /* 59 */ TclInvokeStringCommand, /* 60 */ TclIsProc, /* 61 */ TclLoadFile, /* 62 */ TclLooksLikeInt, /* 63 */ TclLookupVar, /* 64 */ TclMatchFiles, /* 65 */ TclNeedSpace, /* 66 */ TclNewProcBodyObj, /* 67 */ TclObjCommandComplete, /* 68 */ TclObjInterpProc, /* 69 */ TclObjInvoke, /* 70 */ TclObjInvokeGlobal, /* 71 */ TclOpenFileChannelDeleteProc, /* 72 */ TclOpenFileChannelInsertProc, /* 73 */ TclpAlloc, /* 74 */ TclpCloseFile, /* 75 */ TclpCopyFile, /* 76 */ TclpCopyDirectory, /* 77 */ TclpCreateCommandChannel, /* 78 */ TclpCreateDirectory, /* 79 */ TclpCreatePipe, /* 80 */ TclpCreateProcess, /* 81 */ TclpCreateTempFile, /* 82 */ TclpDeleteFile, /* 83 */ TclpFinalize, /* 84 */ TclpFree, /* 85 */ TclpGetClicks, /* 86 */ TclpGetSeconds, /* 87 */ TclpGetTime, /* 88 */ TclpGetTimeZone, /* 89 */ TclpGetTZName, /* 90 */ TclpListVolumes, /* 91 */ TclpMakeFile, /* 92 */ TclpOpenFile, /* 93 */ TclpOpenFileChannel, /* 94 */ TclpRealloc, /* 95 */ TclpRemoveDirectory, /* 96 */ TclpRenameFile, /* 97 */ TclParseBraces, /* 98 */ TclParseNestedCmd, /* 99 */ TclParseQuotes, /* 100 */ TclPlatformInit, /* 101 */ TclPrecTraceProc, /* 102 */ TclPreventAliasLoop, /* 103 */ TclPrintByteCodeObj, /* 104 */ TclProcCleanupProc, /* 105 */ TclProcCompileProc, /* 106 */ TclProcDeleteProc, /* 107 */ TclProcInterpProc, /* 108 */ TclRenameCommand, /* 109 */ TclResetShadowedCmdRefs, /* 110 */ TclServiceIdle, /* 111 */ TclSetElementOfIndexedArray, /* 112 */ TclSetIndexedScalar, /* 113 */ TclSetPreInitScript, /* 114 */ TclSetupEnv, /* 115 */ TclSockGetPort, /* 116 */ TclSockMinimumBuffers, /* 117 */ TclStat, /* 118 */ TclStatDeleteProc, /* 119 */ TclStatInsertProc, /* 120 */ TclTeardownNamespace, /* 121 */ TclUpdateReturnInfo, /* 122 */ TclWordEnd, /* 123 */ Tcl_AddInterpResolvers, /* 124 */ Tcl_AppendExportList, /* 125 */ Tcl_CreateNamespace, /* 126 */ Tcl_DeleteNamespace, /* 127 */ Tcl_Export, /* 128 */ Tcl_FindCommand, /* 129 */ Tcl_FindNamespace, /* 130 */ Tcl_GetInterpResolvers, /* 131 */ Tcl_GetNamespaceResolvers, /* 132 */ Tcl_FindNamespaceVar, /* 133 */ Tcl_ForgetImport, /* 134 */ Tcl_GetCommandFromObj, /* 135 */ Tcl_GetCommandFullName, /* 136 */ Tcl_GetCurrentNamespace, /* 137 */ Tcl_GetGlobalNamespace, /* 138 */ Tcl_GetVariableFullName, /* 139 */ Tcl_Import, /* 140 */ Tcl_PopCallFrame, /* 141 */ Tcl_PushCallFrame, /* 142 */ Tcl_RemoveInterpResolvers, /* 143 */ Tcl_SetNamespaceResolvers, /* 144 */ TclCompileBreakCmd, /* 145 */ TclCompileCatchCmd, /* 146 */ TclCompileContinueCmd, /* 147 */ TclCompileExprCmd, /* 148 */ TclCompileForCmd, /* 149 */ TclCompileForeachCmd, /* 150 */ TclCompileIfCmd, /* 151 */ TclCompileIncrCmd, /* 152 */ TclCompileSetCmd, /* 153 */ TclCompileWhileCmd, /* 154 */ }; extern TclIntStubs *tclIntStubsPtr = &tclIntStubs; TclIntPlatStubs tclIntPlatStubs = { TCL_STUB_MAGIC, NULL, #ifdef __WIN32__ TclWinConvertError, /* 0 */ TclWinConvertWSAError, /* 1 */ TclWinGetServByName, /* 2 */ TclWinGetSockOpt, /* 3 */ TclWinGetTclInstance, /* 4 */ TclWinLoadLibrary, /* 5 */ TclWinNToHS, /* 6 */ TclWinSetSockOpt, /* 7 */ #endif /* __WIN32__ */ #ifdef MAC_TCL TclpCheckStackSpace, /* 0 */ TclpSysAlloc, /* 1 */ TclpSysFree, /* 2 */ TclpSysRealloc, /* 3 */ TclPlatformExit, /* 4 */ #endif /* MAC_TCL */ }; extern TclIntPlatStubs *tclIntPlatStubsPtr = &tclIntPlatStubs; TclPlatStubs tclPlatStubs = { TCL_STUB_MAGIC, NULL, #if !defined(__WIN32__) && !defined(MAC_TCL) Tcl_CreateFileHandler, /* 0 */ Tcl_DeleteFileHandler, /* 1 */ Tcl_GetOpenFile, /* 2 */ #endif /* UNIX */ }; extern TclPlatStubs *tclPlatStubsPtr = &tclPlatStubs; static TclStubHooks tclStubHooks = { &tclPlatStubs, &tclIntStubs, &tclIntPlatStubs }; /* !END!: Do not edit above this line. */