1/* 2 * tclStubInit.c -- 3 * 4 * This file contains the initializers for the Tcl stub vectors. 5 * 6 * Copyright (c) 1998-1999 by Scriptics Corporation. 7 * 8 * See the file "license.terms" for information on usage and redistribution 9 * of this file, and for a DISCLAIMER OF ALL WARRANTIES. 10 * 11 * RCS: @(#) $Id: tclStubInit.c,v 1.2 1999/03/28 15:16:04 aku Exp $ 12 */ 13 14#include "tclInt.h" 15#include "tclPort.h" 16 17/* 18 * Remove macros that will interfere with the definitions below. 19 */ 20 21#undef Tcl_Alloc 22#undef Tcl_Free 23#undef Tcl_Realloc 24#undef Tcl_NewBooleanObj 25#undef Tcl_NewByteArrayObj 26#undef Tcl_NewDoubleObj 27#undef Tcl_NewIntObj 28#undef Tcl_NewListObj 29#undef Tcl_NewLongObj 30#undef Tcl_NewObj 31#undef Tcl_NewStringObj 32#undef Tcl_DumpActiveMemory 33#undef Tcl_ValidateAllMemory 34 35/* 36 * WARNING: The contents of this file is automatically generated by the 37 * tools/genStubs.tcl script. Any modifications to the function declarations 38 * below should be made in the generic/tcl.decls script. 39 */ 40 41/* !BEGIN!: Do not edit below this line. */ 42 43static TclStubHooks tclStubHooks; 44 45TclStubs tclStubs = { 46 TCL_STUB_MAGIC, 47 &tclStubHooks, 48 Tcl_PkgProvideEx, /* 0 */ 49 Tcl_PkgRequireEx, /* 1 */ 50 Tcl_Panic, /* 2 */ 51 Tcl_Alloc, /* 3 */ 52 Tcl_Free, /* 4 */ 53 Tcl_Realloc, /* 5 */ 54 Tcl_DbCkalloc, /* 6 */ 55 Tcl_DbCkfree, /* 7 */ 56 Tcl_DbCkrealloc, /* 8 */ 57#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ 58 Tcl_CreateFileHandler, /* 9 */ 59#endif /* UNIX */ 60#ifdef __WIN32__ 61 NULL, /* 9 */ 62#endif /* __WIN32__ */ 63#ifdef MAC_TCL 64 NULL, /* 9 */ 65#endif /* MAC_TCL */ 66#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ 67 Tcl_DeleteFileHandler, /* 10 */ 68#endif /* UNIX */ 69#ifdef __WIN32__ 70 NULL, /* 10 */ 71#endif /* __WIN32__ */ 72#ifdef MAC_TCL 73 NULL, /* 10 */ 74#endif /* MAC_TCL */ 75 Tcl_SetTimer, /* 11 */ 76 Tcl_Sleep, /* 12 */ 77 Tcl_WaitForEvent, /* 13 */ 78 Tcl_AppendAllObjTypes, /* 14 */ 79 Tcl_AppendStringsToObj, /* 15 */ 80 Tcl_AppendToObj, /* 16 */ 81 Tcl_ConcatObj, /* 17 */ 82 Tcl_ConvertToType, /* 18 */ 83 Tcl_DbDecrRefCount, /* 19 */ 84 Tcl_DbIncrRefCount, /* 20 */ 85 Tcl_DbIsShared, /* 21 */ 86 Tcl_DbNewBooleanObj, /* 22 */ 87 Tcl_DbNewByteArrayObj, /* 23 */ 88 Tcl_DbNewDoubleObj, /* 24 */ 89 Tcl_DbNewListObj, /* 25 */ 90 Tcl_DbNewLongObj, /* 26 */ 91 Tcl_DbNewObj, /* 27 */ 92 Tcl_DbNewStringObj, /* 28 */ 93 Tcl_DuplicateObj, /* 29 */ 94 TclFreeObj, /* 30 */ 95 Tcl_GetBoolean, /* 31 */ 96 Tcl_GetBooleanFromObj, /* 32 */ 97 Tcl_GetByteArrayFromObj, /* 33 */ 98 Tcl_GetDouble, /* 34 */ 99 Tcl_GetDoubleFromObj, /* 35 */ 100 Tcl_GetIndexFromObj, /* 36 */ 101 Tcl_GetInt, /* 37 */ 102 Tcl_GetIntFromObj, /* 38 */ 103 Tcl_GetLongFromObj, /* 39 */ 104 Tcl_GetObjType, /* 40 */ 105 Tcl_GetStringFromObj, /* 41 */ 106 Tcl_InvalidateStringRep, /* 42 */ 107 Tcl_ListObjAppendList, /* 43 */ 108 Tcl_ListObjAppendElement, /* 44 */ 109 Tcl_ListObjGetElements, /* 45 */ 110 Tcl_ListObjIndex, /* 46 */ 111 Tcl_ListObjLength, /* 47 */ 112 Tcl_ListObjReplace, /* 48 */ 113 Tcl_NewBooleanObj, /* 49 */ 114 Tcl_NewByteArrayObj, /* 50 */ 115 Tcl_NewDoubleObj, /* 51 */ 116 Tcl_NewIntObj, /* 52 */ 117 Tcl_NewListObj, /* 53 */ 118 Tcl_NewLongObj, /* 54 */ 119 Tcl_NewObj, /* 55 */ 120 Tcl_NewStringObj, /* 56 */ 121 Tcl_SetBooleanObj, /* 57 */ 122 Tcl_SetByteArrayLength, /* 58 */ 123 Tcl_SetByteArrayObj, /* 59 */ 124 Tcl_SetDoubleObj, /* 60 */ 125 Tcl_SetIntObj, /* 61 */ 126 Tcl_SetListObj, /* 62 */ 127 Tcl_SetLongObj, /* 63 */ 128 Tcl_SetObjLength, /* 64 */ 129 Tcl_SetStringObj, /* 65 */ 130 Tcl_AddErrorInfo, /* 66 */ 131 Tcl_AddObjErrorInfo, /* 67 */ 132 Tcl_AllowExceptions, /* 68 */ 133 Tcl_AppendElement, /* 69 */ 134 Tcl_AppendResult, /* 70 */ 135 Tcl_AsyncCreate, /* 71 */ 136 Tcl_AsyncDelete, /* 72 */ 137 Tcl_AsyncInvoke, /* 73 */ 138 Tcl_AsyncMark, /* 74 */ 139 Tcl_AsyncReady, /* 75 */ 140 Tcl_BackgroundError, /* 76 */ 141 Tcl_Backslash, /* 77 */ 142 Tcl_BadChannelOption, /* 78 */ 143 Tcl_CallWhenDeleted, /* 79 */ 144 Tcl_CancelIdleCall, /* 80 */ 145 Tcl_Close, /* 81 */ 146 Tcl_CommandComplete, /* 82 */ 147 Tcl_Concat, /* 83 */ 148 Tcl_ConvertElement, /* 84 */ 149 Tcl_ConvertCountedElement, /* 85 */ 150 Tcl_CreateAlias, /* 86 */ 151 Tcl_CreateAliasObj, /* 87 */ 152 Tcl_CreateChannel, /* 88 */ 153 Tcl_CreateChannelHandler, /* 89 */ 154 Tcl_CreateCloseHandler, /* 90 */ 155 Tcl_CreateCommand, /* 91 */ 156 Tcl_CreateEventSource, /* 92 */ 157 Tcl_CreateExitHandler, /* 93 */ 158 Tcl_CreateInterp, /* 94 */ 159 Tcl_CreateMathFunc, /* 95 */ 160 Tcl_CreateObjCommand, /* 96 */ 161 Tcl_CreateSlave, /* 97 */ 162 Tcl_CreateTimerHandler, /* 98 */ 163 Tcl_CreateTrace, /* 99 */ 164 Tcl_DeleteAssocData, /* 100 */ 165 Tcl_DeleteChannelHandler, /* 101 */ 166 Tcl_DeleteCloseHandler, /* 102 */ 167 Tcl_DeleteCommand, /* 103 */ 168 Tcl_DeleteCommandFromToken, /* 104 */ 169 Tcl_DeleteEvents, /* 105 */ 170 Tcl_DeleteEventSource, /* 106 */ 171 Tcl_DeleteExitHandler, /* 107 */ 172 Tcl_DeleteHashEntry, /* 108 */ 173 Tcl_DeleteHashTable, /* 109 */ 174 Tcl_DeleteInterp, /* 110 */ 175 Tcl_DetachPids, /* 111 */ 176 Tcl_DeleteTimerHandler, /* 112 */ 177 Tcl_DeleteTrace, /* 113 */ 178 Tcl_DontCallWhenDeleted, /* 114 */ 179 Tcl_DoOneEvent, /* 115 */ 180 Tcl_DoWhenIdle, /* 116 */ 181 Tcl_DStringAppend, /* 117 */ 182 Tcl_DStringAppendElement, /* 118 */ 183 Tcl_DStringEndSublist, /* 119 */ 184 Tcl_DStringFree, /* 120 */ 185 Tcl_DStringGetResult, /* 121 */ 186 Tcl_DStringInit, /* 122 */ 187 Tcl_DStringResult, /* 123 */ 188 Tcl_DStringSetLength, /* 124 */ 189 Tcl_DStringStartSublist, /* 125 */ 190 Tcl_Eof, /* 126 */ 191 Tcl_ErrnoId, /* 127 */ 192 Tcl_ErrnoMsg, /* 128 */ 193 Tcl_Eval, /* 129 */ 194 Tcl_EvalFile, /* 130 */ 195 Tcl_EvalObj, /* 131 */ 196 Tcl_EventuallyFree, /* 132 */ 197 Tcl_Exit, /* 133 */ 198 Tcl_ExposeCommand, /* 134 */ 199 Tcl_ExprBoolean, /* 135 */ 200 Tcl_ExprBooleanObj, /* 136 */ 201 Tcl_ExprDouble, /* 137 */ 202 Tcl_ExprDoubleObj, /* 138 */ 203 Tcl_ExprLong, /* 139 */ 204 Tcl_ExprLongObj, /* 140 */ 205 Tcl_ExprObj, /* 141 */ 206 Tcl_ExprString, /* 142 */ 207 Tcl_Finalize, /* 143 */ 208 Tcl_FindExecutable, /* 144 */ 209 Tcl_FirstHashEntry, /* 145 */ 210 Tcl_Flush, /* 146 */ 211 Tcl_FreeResult, /* 147 */ 212 Tcl_GetAlias, /* 148 */ 213 Tcl_GetAliasObj, /* 149 */ 214 Tcl_GetAssocData, /* 150 */ 215 Tcl_GetChannel, /* 151 */ 216 Tcl_GetChannelBufferSize, /* 152 */ 217 Tcl_GetChannelHandle, /* 153 */ 218 Tcl_GetChannelInstanceData, /* 154 */ 219 Tcl_GetChannelMode, /* 155 */ 220 Tcl_GetChannelName, /* 156 */ 221 Tcl_GetChannelOption, /* 157 */ 222 Tcl_GetChannelType, /* 158 */ 223 Tcl_GetCommandInfo, /* 159 */ 224 Tcl_GetCommandName, /* 160 */ 225 Tcl_GetErrno, /* 161 */ 226 Tcl_GetHostName, /* 162 */ 227 Tcl_GetInterpPath, /* 163 */ 228 Tcl_GetMaster, /* 164 */ 229 Tcl_GetNameOfExecutable, /* 165 */ 230 Tcl_GetObjResult, /* 166 */ 231#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ 232 Tcl_GetOpenFile, /* 167 */ 233#endif /* UNIX */ 234#ifdef __WIN32__ 235 NULL, /* 167 */ 236#endif /* __WIN32__ */ 237#ifdef MAC_TCL 238 NULL, /* 167 */ 239#endif /* MAC_TCL */ 240 Tcl_GetPathType, /* 168 */ 241 Tcl_Gets, /* 169 */ 242 Tcl_GetsObj, /* 170 */ 243 Tcl_GetServiceMode, /* 171 */ 244 Tcl_GetSlave, /* 172 */ 245 Tcl_GetStdChannel, /* 173 */ 246 Tcl_GetStringResult, /* 174 */ 247 Tcl_GetVar, /* 175 */ 248 Tcl_GetVar2, /* 176 */ 249 Tcl_GlobalEval, /* 177 */ 250 Tcl_GlobalEvalObj, /* 178 */ 251 Tcl_HideCommand, /* 179 */ 252 Tcl_Init, /* 180 */ 253 Tcl_InitHashTable, /* 181 */ 254 Tcl_InputBlocked, /* 182 */ 255 Tcl_InputBuffered, /* 183 */ 256 Tcl_InterpDeleted, /* 184 */ 257 Tcl_IsSafe, /* 185 */ 258 Tcl_JoinPath, /* 186 */ 259 Tcl_LinkVar, /* 187 */ 260 NULL, /* 188 */ 261 Tcl_MakeFileChannel, /* 189 */ 262 Tcl_MakeSafe, /* 190 */ 263 Tcl_MakeTcpClientChannel, /* 191 */ 264 Tcl_Merge, /* 192 */ 265 Tcl_NextHashEntry, /* 193 */ 266 Tcl_NotifyChannel, /* 194 */ 267 Tcl_ObjGetVar2, /* 195 */ 268 Tcl_ObjSetVar2, /* 196 */ 269 Tcl_OpenCommandChannel, /* 197 */ 270 Tcl_OpenFileChannel, /* 198 */ 271 Tcl_OpenTcpClient, /* 199 */ 272 Tcl_OpenTcpServer, /* 200 */ 273 Tcl_Preserve, /* 201 */ 274 Tcl_PrintDouble, /* 202 */ 275 Tcl_PutEnv, /* 203 */ 276 Tcl_PosixError, /* 204 */ 277 Tcl_QueueEvent, /* 205 */ 278 Tcl_Read, /* 206 */ 279 Tcl_ReapDetachedProcs, /* 207 */ 280 Tcl_RecordAndEval, /* 208 */ 281 Tcl_RecordAndEvalObj, /* 209 */ 282 Tcl_RegisterChannel, /* 210 */ 283 Tcl_RegisterObjType, /* 211 */ 284 Tcl_RegExpCompile, /* 212 */ 285 Tcl_RegExpExec, /* 213 */ 286 Tcl_RegExpMatch, /* 214 */ 287 Tcl_RegExpRange, /* 215 */ 288 Tcl_Release, /* 216 */ 289 Tcl_ResetResult, /* 217 */ 290 Tcl_ScanElement, /* 218 */ 291 Tcl_ScanCountedElement, /* 219 */ 292 Tcl_Seek, /* 220 */ 293 Tcl_ServiceAll, /* 221 */ 294 Tcl_ServiceEvent, /* 222 */ 295 Tcl_SetAssocData, /* 223 */ 296 Tcl_SetChannelBufferSize, /* 224 */ 297 Tcl_SetChannelOption, /* 225 */ 298 Tcl_SetCommandInfo, /* 226 */ 299 Tcl_SetErrno, /* 227 */ 300 Tcl_SetErrorCode, /* 228 */ 301 Tcl_SetMaxBlockTime, /* 229 */ 302 Tcl_SetPanicProc, /* 230 */ 303 Tcl_SetRecursionLimit, /* 231 */ 304 Tcl_SetResult, /* 232 */ 305 Tcl_SetServiceMode, /* 233 */ 306 Tcl_SetObjErrorCode, /* 234 */ 307 Tcl_SetObjResult, /* 235 */ 308 Tcl_SetStdChannel, /* 236 */ 309 Tcl_SetVar, /* 237 */ 310 Tcl_SetVar2, /* 238 */ 311 Tcl_SignalId, /* 239 */ 312 Tcl_SignalMsg, /* 240 */ 313 Tcl_SourceRCFile, /* 241 */ 314 Tcl_SplitList, /* 242 */ 315 Tcl_SplitPath, /* 243 */ 316 Tcl_StaticPackage, /* 244 */ 317 Tcl_StringMatch, /* 245 */ 318 Tcl_Tell, /* 246 */ 319 Tcl_TraceVar, /* 247 */ 320 Tcl_TraceVar2, /* 248 */ 321 Tcl_TranslateFileName, /* 249 */ 322 Tcl_Ungets, /* 250 */ 323 Tcl_UnlinkVar, /* 251 */ 324 Tcl_UnregisterChannel, /* 252 */ 325 Tcl_UnsetVar, /* 253 */ 326 Tcl_UnsetVar2, /* 254 */ 327 Tcl_UntraceVar, /* 255 */ 328 Tcl_UntraceVar2, /* 256 */ 329 Tcl_UpdateLinkedVar, /* 257 */ 330 Tcl_UpVar, /* 258 */ 331 Tcl_UpVar2, /* 259 */ 332 Tcl_VarEval, /* 260 */ 333 Tcl_VarTraceInfo, /* 261 */ 334 Tcl_VarTraceInfo2, /* 262 */ 335 Tcl_Write, /* 263 */ 336 Tcl_WrongNumArgs, /* 264 */ 337 Tcl_DumpActiveMemory, /* 265 */ 338 Tcl_ValidateAllMemory, /* 266 */ 339 Tcl_AppendResultVA, /* 267 */ 340 Tcl_AppendStringsToObjVA, /* 268 */ 341 Tcl_HashStats, /* 269 */ 342 Tcl_ParseVar, /* 270 */ 343 Tcl_PkgPresent, /* 271 */ 344 Tcl_PkgPresentEx, /* 272 */ 345 Tcl_PkgProvide, /* 273 */ 346 Tcl_PkgRequire, /* 274 */ 347 Tcl_SetErrorCodeVA, /* 275 */ 348 Tcl_VarEvalVA, /* 276 */ 349 Tcl_WaitPid, /* 277 */ 350 Tcl_PanicVA, /* 278 */ 351 Tcl_GetVersion, /* 279 */ 352 NULL, /* 280 */ 353 NULL, /* 281 */ 354 NULL, /* 282 */ 355 NULL, /* 283 */ 356 NULL, /* 284 */ 357 NULL, /* 285 */ 358 Tcl_AppendObjToObj, /* 286 */ 359 Tcl_CreateEncoding, /* 287 */ 360 Tcl_CreateThreadExitHandler, /* 288 */ 361 Tcl_DeleteThreadExitHandler, /* 289 */ 362 Tcl_DiscardResult, /* 290 */ 363 Tcl_EvalEx, /* 291 */ 364 Tcl_EvalObjv, /* 292 */ 365 Tcl_EvalObjEx, /* 293 */ 366 Tcl_ExitThread, /* 294 */ 367 Tcl_ExternalToUtf, /* 295 */ 368 Tcl_ExternalToUtfDString, /* 296 */ 369 Tcl_FinalizeThread, /* 297 */ 370 Tcl_FinalizeNotifier, /* 298 */ 371 Tcl_FreeEncoding, /* 299 */ 372 Tcl_GetCurrentThread, /* 300 */ 373 Tcl_GetEncoding, /* 301 */ 374 Tcl_GetEncodingName, /* 302 */ 375 Tcl_GetEncodingNames, /* 303 */ 376 Tcl_GetIndexFromObjStruct, /* 304 */ 377 Tcl_GetThreadData, /* 305 */ 378 Tcl_GetVar2Ex, /* 306 */ 379 Tcl_InitNotifier, /* 307 */ 380 Tcl_MutexLock, /* 308 */ 381 Tcl_MutexUnlock, /* 309 */ 382 Tcl_ConditionNotify, /* 310 */ 383 Tcl_ConditionWait, /* 311 */ 384 Tcl_NumUtfChars, /* 312 */ 385 Tcl_ReadChars, /* 313 */ 386 Tcl_RestoreResult, /* 314 */ 387 Tcl_SaveResult, /* 315 */ 388 Tcl_SetSystemEncoding, /* 316 */ 389 Tcl_SetVar2Ex, /* 317 */ 390 Tcl_ThreadAlert, /* 318 */ 391 Tcl_ThreadQueueEvent, /* 319 */ 392 Tcl_UniCharAtIndex, /* 320 */ 393 Tcl_UniCharToLower, /* 321 */ 394 Tcl_UniCharToTitle, /* 322 */ 395 Tcl_UniCharToUpper, /* 323 */ 396 Tcl_UniCharToUtf, /* 324 */ 397 Tcl_UtfAtIndex, /* 325 */ 398 Tcl_UtfCharComplete, /* 326 */ 399 Tcl_UtfBackslash, /* 327 */ 400 Tcl_UtfFindFirst, /* 328 */ 401 Tcl_UtfFindLast, /* 329 */ 402 Tcl_UtfNext, /* 330 */ 403 Tcl_UtfPrev, /* 331 */ 404 Tcl_UtfToExternal, /* 332 */ 405 Tcl_UtfToExternalDString, /* 333 */ 406 Tcl_UtfToLower, /* 334 */ 407 Tcl_UtfToTitle, /* 335 */ 408 Tcl_UtfToUniChar, /* 336 */ 409 Tcl_UtfToUpper, /* 337 */ 410 Tcl_WriteChars, /* 338 */ 411 Tcl_WriteObj, /* 339 */ 412 Tcl_GetString, /* 340 */ 413 Tcl_GetDefaultEncodingDir, /* 341 */ 414 Tcl_SetDefaultEncodingDir, /* 342 */ 415 NULL, NULL 416 Tcl_ReplaceChannel, /* 345 */ 417 Tcl_UndoReplaceChannel, /* 346 */ 418}; 419 420TclStubs *tclStubsPtr = &tclStubs; 421 422TclIntStubs tclIntStubs = { 423 TCL_STUB_MAGIC, 424 NULL, 425 TclAccess, /* 0 */ 426 TclAccessDeleteProc, /* 1 */ 427 TclAccessInsertProc, /* 2 */ 428 TclAllocateFreeObjects, /* 3 */ 429 NULL, /* 4 */ 430 TclCleanupChildren, /* 5 */ 431 TclCleanupCommand, /* 6 */ 432 TclCopyAndCollapse, /* 7 */ 433 TclCopyChannel, /* 8 */ 434 TclCreatePipeline, /* 9 */ 435 TclCreateProc, /* 10 */ 436 TclDeleteCompiledLocalVars, /* 11 */ 437 TclDeleteVars, /* 12 */ 438 TclDoGlob, /* 13 */ 439 TclDumpMemoryInfo, /* 14 */ 440 NULL, /* 15 */ 441 TclExprFloatError, /* 16 */ 442 TclFileAttrsCmd, /* 17 */ 443 TclFileCopyCmd, /* 18 */ 444 TclFileDeleteCmd, /* 19 */ 445 TclFileMakeDirsCmd, /* 20 */ 446 TclFileRenameCmd, /* 21 */ 447 TclFindElement, /* 22 */ 448 TclFindProc, /* 23 */ 449 TclFormatInt, /* 24 */ 450 TclFreePackageInfo, /* 25 */ 451 NULL, /* 26 */ 452 TclGetDate, /* 27 */ 453 TclpGetDefaultStdChannel, /* 28 */ 454 TclGetElementOfIndexedArray, /* 29 */ 455 NULL, /* 30 */ 456 TclGetExtension, /* 31 */ 457 TclGetFrame, /* 32 */ 458 TclGetInterpProc, /* 33 */ 459 TclGetIntForIndex, /* 34 */ 460 TclGetIndexedScalar, /* 35 */ 461 TclGetLong, /* 36 */ 462 TclGetLoadedPackages, /* 37 */ 463 TclGetNamespaceForQualName, /* 38 */ 464 TclGetObjInterpProc, /* 39 */ 465 TclGetOpenMode, /* 40 */ 466 TclGetOriginalCommand, /* 41 */ 467 TclpGetUserHome, /* 42 */ 468 TclGlobalInvoke, /* 43 */ 469 TclGuessPackageName, /* 44 */ 470 TclHideUnsafeCommands, /* 45 */ 471 TclInExit, /* 46 */ 472 TclIncrElementOfIndexedArray, /* 47 */ 473 TclIncrIndexedScalar, /* 48 */ 474 TclIncrVar2, /* 49 */ 475 TclInitCompiledLocals, /* 50 */ 476 TclInterpInit, /* 51 */ 477 TclInvoke, /* 52 */ 478 TclInvokeObjectCommand, /* 53 */ 479 TclInvokeStringCommand, /* 54 */ 480 TclIsProc, /* 55 */ 481 NULL, /* 56 */ 482 NULL, /* 57 */ 483 TclLookupVar, /* 58 */ 484 TclpMatchFiles, /* 59 */ 485 TclNeedSpace, /* 60 */ 486 TclNewProcBodyObj, /* 61 */ 487 TclObjCommandComplete, /* 62 */ 488 TclObjInterpProc, /* 63 */ 489 TclObjInvoke, /* 64 */ 490 TclObjInvokeGlobal, /* 65 */ 491 TclOpenFileChannelDeleteProc, /* 66 */ 492 TclOpenFileChannelInsertProc, /* 67 */ 493 TclpAccess, /* 68 */ 494 TclpAlloc, /* 69 */ 495 TclpCopyFile, /* 70 */ 496 TclpCopyDirectory, /* 71 */ 497 TclpCreateDirectory, /* 72 */ 498 TclpDeleteFile, /* 73 */ 499 TclpFree, /* 74 */ 500 TclpGetClicks, /* 75 */ 501 TclpGetSeconds, /* 76 */ 502 TclpGetTime, /* 77 */ 503 TclpGetTimeZone, /* 78 */ 504 TclpListVolumes, /* 79 */ 505 TclpOpenFileChannel, /* 80 */ 506 TclpRealloc, /* 81 */ 507 TclpRemoveDirectory, /* 82 */ 508 TclpRenameFile, /* 83 */ 509 NULL, /* 84 */ 510 NULL, /* 85 */ 511 NULL, /* 86 */ 512 NULL, /* 87 */ 513 TclPrecTraceProc, /* 88 */ 514 TclPreventAliasLoop, /* 89 */ 515 NULL, /* 90 */ 516 TclProcCleanupProc, /* 91 */ 517 TclProcCompileProc, /* 92 */ 518 TclProcDeleteProc, /* 93 */ 519 TclProcInterpProc, /* 94 */ 520 TclpStat, /* 95 */ 521 TclRenameCommand, /* 96 */ 522 TclResetShadowedCmdRefs, /* 97 */ 523 TclServiceIdle, /* 98 */ 524 TclSetElementOfIndexedArray, /* 99 */ 525 TclSetIndexedScalar, /* 100 */ 526 NULL, /* 101 */ 527 TclSetupEnv, /* 102 */ 528 TclSockGetPort, /* 103 */ 529 TclSockMinimumBuffers, /* 104 */ 530 TclStat, /* 105 */ 531 TclStatDeleteProc, /* 106 */ 532 TclStatInsertProc, /* 107 */ 533 TclTeardownNamespace, /* 108 */ 534 TclUpdateReturnInfo, /* 109 */ 535 NULL, /* 110 */ 536 Tcl_AddInterpResolvers, /* 111 */ 537 Tcl_AppendExportList, /* 112 */ 538 Tcl_CreateNamespace, /* 113 */ 539 Tcl_DeleteNamespace, /* 114 */ 540 Tcl_Export, /* 115 */ 541 Tcl_FindCommand, /* 116 */ 542 Tcl_FindNamespace, /* 117 */ 543 Tcl_GetInterpResolvers, /* 118 */ 544 Tcl_GetNamespaceResolvers, /* 119 */ 545 Tcl_FindNamespaceVar, /* 120 */ 546 Tcl_ForgetImport, /* 121 */ 547 Tcl_GetCommandFromObj, /* 122 */ 548 Tcl_GetCommandFullName, /* 123 */ 549 Tcl_GetCurrentNamespace, /* 124 */ 550 Tcl_GetGlobalNamespace, /* 125 */ 551 Tcl_GetVariableFullName, /* 126 */ 552 Tcl_Import, /* 127 */ 553 Tcl_PopCallFrame, /* 128 */ 554 Tcl_PushCallFrame, /* 129 */ 555 Tcl_RemoveInterpResolvers, /* 130 */ 556 Tcl_SetNamespaceResolvers, /* 131 */ 557 TclpHasSockets, /* 132 */ 558 TclpGetDate, /* 133 */ 559 TclpStrftime, /* 134 */ 560 TclpCheckStackSpace, /* 135 */ 561 NULL, /* 136 */ 562 TclpChdir, /* 137 */ 563 TclGetEnv, /* 138 */ 564 TclpLoadFile, /* 139 */ 565 TclLooksLikeInt, /* 140 */ 566}; 567 568TclIntStubs *tclIntStubsPtr = &tclIntStubs; 569 570TclIntPlatStubs tclIntPlatStubs = { 571 TCL_STUB_MAGIC, 572 NULL, 573#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ 574 TclGetAndDetachPids, /* 0 */ 575 TclpCloseFile, /* 1 */ 576 TclpCreateCommandChannel, /* 2 */ 577 TclpCreatePipe, /* 3 */ 578 TclpCreateProcess, /* 4 */ 579 NULL, /* 5 */ 580 TclpMakeFile, /* 6 */ 581 TclpOpenFile, /* 7 */ 582 TclUnixWaitForFile, /* 8 */ 583 TclpCreateTempFile, /* 9 */ 584#endif /* UNIX */ 585#ifdef __WIN32__ 586 TclWinConvertError, /* 0 */ 587 TclWinConvertWSAError, /* 1 */ 588 TclWinGetServByName, /* 2 */ 589 TclWinGetSockOpt, /* 3 */ 590 TclWinGetTclInstance, /* 4 */ 591 NULL, /* 5 */ 592 TclWinNToHS, /* 6 */ 593 TclWinSetSockOpt, /* 7 */ 594 TclpGetPid, /* 8 */ 595 TclWinGetPlatformId, /* 9 */ 596 TclWinSynchSpawn, /* 10 */ 597 TclGetAndDetachPids, /* 11 */ 598 TclpCloseFile, /* 12 */ 599 TclpCreateCommandChannel, /* 13 */ 600 TclpCreatePipe, /* 14 */ 601 TclpCreateProcess, /* 15 */ 602 NULL, /* 16 */ 603 NULL, /* 17 */ 604 TclpMakeFile, /* 18 */ 605 TclpOpenFile, /* 19 */ 606 TclWinAddProcess, /* 20 */ 607 TclpAsyncMark, /* 21 */ 608 TclpCreateTempFile, /* 22 */ 609 TclpGetTZName, /* 23 */ 610 TclWinNoBackslash, /* 24 */ 611 Tcl_WinUtfToTChar, /* 25 */ 612 Tcl_WinTCharToUtf, /* 26 */ 613#endif /* __WIN32__ */ 614#ifdef MAC_TCL 615 TclpSysAlloc, /* 0 */ 616 TclpSysFree, /* 1 */ 617 TclpSysRealloc, /* 2 */ 618 TclpExit, /* 3 */ 619 FSpGetDefaultDir, /* 4 */ 620 FSpSetDefaultDir, /* 5 */ 621 FSpFindFolder, /* 6 */ 622 GetGlobalMouse, /* 7 */ 623 FSpGetDirectoryID, /* 8 */ 624 FSpOpenResFileCompat, /* 9 */ 625 FSpCreateResFileCompat, /* 10 */ 626 FSpLocationFromPath, /* 11 */ 627 FSpPathFromLocation, /* 12 */ 628 TclMacExitHandler, /* 13 */ 629 TclMacInitExitToShell, /* 14 */ 630 TclMacInstallExitToShellPatch, /* 15 */ 631 TclMacOSErrorToPosixError, /* 16 */ 632 TclMacRemoveTimer, /* 17 */ 633 TclMacStartTimer, /* 18 */ 634 TclMacTimerExpired, /* 19 */ 635 TclMacRegisterResourceFork, /* 20 */ 636 TclMacUnRegisterResourceFork, /* 21 */ 637 TclMacCreateEnv, /* 22 */ 638 TclMacFOpenHack, /* 23 */ 639 NULL, /* 24 */ 640 TclMacChmod, /* 25 */ 641#endif /* MAC_TCL */ 642}; 643 644TclIntPlatStubs *tclIntPlatStubsPtr = &tclIntPlatStubs; 645 646TclPlatStubs tclPlatStubs = { 647 TCL_STUB_MAGIC, 648 NULL, 649#ifdef MAC_TCL 650 Tcl_MacSetEventProc, /* 0 */ 651 Tcl_MacConvertTextResource, /* 1 */ 652 Tcl_MacEvalResource, /* 2 */ 653 Tcl_MacFindResource, /* 3 */ 654 Tcl_GetOSTypeFromObj, /* 4 */ 655 Tcl_SetOSTypeObj, /* 5 */ 656 Tcl_NewOSTypeObj, /* 6 */ 657 strncasecmp, /* 7 */ 658 strcasecmp, /* 8 */ 659#endif /* MAC_TCL */ 660}; 661 662TclPlatStubs *tclPlatStubsPtr = &tclPlatStubs; 663 664static TclStubHooks tclStubHooks = { 665 &tclPlatStubs, 666 &tclIntStubs, 667 &tclIntPlatStubs 668}; 669 670 671/* !END!: Do not edit above this line. */ 672