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