/macosx-10.10.1/tcl-105/tcl84/tcl/generic/ |
H A D | tcl.h | 1667 typedef int (Tcl_FSStatProc) _ANSI_ARGS_((Tcl_Obj *pathPtr, Tcl_StatBuf *buf)); 1668 typedef int (Tcl_FSAccessProc) _ANSI_ARGS_((Tcl_Obj *pathPtr, int mode)); 1670 _ANSI_ARGS_((Tcl_Interp *interp, Tcl_Obj *pathPtr, 1673 Tcl_Obj *result, Tcl_Obj *pathPtr, CONST char *pattern, 1676 typedef int (Tcl_FSChdirProc) _ANSI_ARGS_((Tcl_Obj *pathPtr)); 1677 typedef int (Tcl_FSLstatProc) _ANSI_ARGS_((Tcl_Obj *pathPtr, 1679 typedef int (Tcl_FSCreateDirectoryProc) _ANSI_ARGS_((Tcl_Obj *pathPtr)); 1680 typedef int (Tcl_FSDeleteFileProc) _ANSI_ARGS_((Tcl_Obj *pathPtr)); 1685 typedef int (Tcl_FSRemoveDirectoryProc) _ANSI_ARGS_((Tcl_Obj *pathPtr, 1693 typedef int (Tcl_FSUtimeProc) _ANSI_ARGS_((Tcl_Obj *pathPtr, [all...] |
H A D | tclMain.c | 91 void TclSetStartupScriptPath(pathPtr) 92 Tcl_Obj *pathPtr; 97 tclStartupScriptPath = pathPtr; 146 Tcl_Obj *pathPtr = Tcl_NewStringObj(fileName,-1); 147 TclSetStartupScriptPath(pathPtr); 170 Tcl_Obj *pathPtr = TclGetStartupScriptPath(); 172 if (pathPtr == NULL) { 175 return Tcl_GetString(pathPtr); 145 Tcl_Obj *pathPtr = Tcl_NewStringObj(fileName,-1); local 168 Tcl_Obj *pathPtr = TclGetStartupScriptPath(); local
|
H A D | tclEncoding.c | 660 Tcl_Obj *pathPtr, *resultPtr; 677 pathPtr = TclGetLibraryPath(); 678 if (pathPtr != NULL) { 686 Tcl_ListObjGetElements(NULL, pathPtr, &objc, &objv); 692 * Construct the path from the element of pathPtr, 1320 Tcl_Obj *pathPtr; 1324 pathPtr = TclGetLibraryPath(); 1325 if (pathPtr == NULL) { 1329 Tcl_ListObjGetElements(NULL, pathPtr, &objc, &objv); 1423 Tcl_Obj *pathPtr; 648 Tcl_Obj *pathPtr, *resultPtr; local 1300 Tcl_Obj *pathPtr; local 1402 Tcl_Obj *pathPtr; local 3143 Tcl_Obj *pathPtr; local [all...] |
H A D | tclFCmd.c | 26 Tcl_Obj *pathPtr)); 823 FileBasename(interp, pathPtr) 825 Tcl_Obj *pathPtr; /* Path whose basename to extract. */ 831 splitPtr = Tcl_FSSplitPath(pathPtr, &objc); 834 if ((objc == 1) && (*Tcl_GetString(pathPtr) == '~')) { 836 if (Tcl_FSConvertToPathType(interp, pathPtr) != TCL_OK) { 839 splitPtr = Tcl_FSSplitPath(pathPtr, &objc);
|
H A D | tclInterp.c | 170 Tcl_Obj *pathPtr)); 176 Tcl_Obj *pathPtr, int safe)); 1588 Tcl_Obj *pathPtr; 1591 pathPtr = Tcl_NewStringObj(slavePath, -1); 1592 slaveInterp = SlaveCreate(interp, pathPtr, isSafe); 1593 Tcl_DecrRefCount(pathPtr); 1621 Tcl_Obj *pathPtr; 1624 pathPtr = Tcl_NewStringObj(slavePath, -1); 1625 slaveInterp = GetInterp(interp, pathPtr); 1626 Tcl_DecrRefCount(pathPtr); 1571 Tcl_Obj *pathPtr; local 1603 Tcl_Obj *pathPtr; local [all...] |
H A D | tclEvent.c | 693 TclSetLibraryPath(pathPtr) 694 Tcl_Obj *pathPtr; /* A Tcl list object whose elements are 701 if (pathPtr != NULL) { 702 Tcl_IncrRefCount(pathPtr); 707 tsdPtr->tclLibraryPath = pathPtr; 716 toDupe = Tcl_GetStringFromObj(pathPtr, &size);
|
H A D | tclInt.h | 1487 * pathPtr of the file being sourced. */ 2017 EXTERN int TclpObjLstat _ANSI_ARGS_((Tcl_Obj *pathPtr, 2042 Tcl_Obj *pathPtr, 2055 Tcl_Obj *pathPtr, int nextCheckpoint)); 2056 EXTERN int TclpObjCreateDirectory _ANSI_ARGS_((Tcl_Obj *pathPtr)); 2059 EXTERN Tcl_Obj* TclpNativeSplitPath _ANSI_ARGS_((Tcl_Obj *pathPtr, 2065 EXTERN int TclpObjDeleteFile _ANSI_ARGS_((Tcl_Obj *pathPtr)); 2070 EXTERN int TclpObjRemoveDirectory _ANSI_ARGS_((Tcl_Obj *pathPtr, 2075 Tcl_Obj *resultPtr, Tcl_Obj *pathPtr, 2079 EXTERN Tcl_Obj* TclpObjLink _ANSI_ARGS_((Tcl_Obj *pathPtr, [all...] |
H A D | tclTest.c | 409 Tcl_Interp *interp, Tcl_Obj *pathPtr, 411 static int TestReportInFilesystem _ANSI_ARGS_ ((Tcl_Obj *pathPtr, ClientData *clientDataPtr)); 424 Tcl_Obj *pathPtr, ClientData *clientDataPtr)); 425 static Tcl_Obj* SimpleCopy _ANSI_ARGS_ ((Tcl_Obj *pathPtr)); 4764 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); 4766 Tcl_IncrRefCount(pathPtr); 4767 ret = TclpObjStat(pathPtr, buf); 4768 Tcl_DecrRefCount(pathPtr); 4772 Tcl_IncrRefCount(pathPtr); 4773 ret = TclpObjStat(pathPtr, 4707 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); local 5023 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); local 5145 Tcl_Obj *pathPtr; local 6051 TestReportInFilesystem(Tcl_Obj *pathPtr, ClientData *clientDataPtr) argument 6339 SimplePathInFilesystem(Tcl_Obj *pathPtr, ClientData *clientDataPtr) argument [all...] |
/macosx-10.10.1/tcl-105/tcl84/tcl/unix/ |
H A D | tclUnixFCmd.c | 154 static int DoCreateDirectory _ANSI_ARGS_((CONST char *pathPtr)); 155 static int DoRemoveDirectory _ANSI_ARGS_((Tcl_DString *pathPtr, 596 TclpObjDeleteFile(pathPtr) 597 Tcl_Obj *pathPtr; 599 return TclpDeleteFile(Tcl_FSGetNativePath(pathPtr)); 640 TclpObjCreateDirectory(pathPtr) 641 Tcl_Obj *pathPtr; 643 return DoCreateDirectory(Tcl_FSGetNativePath(pathPtr)); 762 TclpObjRemoveDirectory(pathPtr, recursive, errorPtr) 763 Tcl_Obj *pathPtr; [all...] |
H A D | tclLoadDyld.c | 163 Tcl_Obj *pathPtr, /* Name of the file containing the desired 198 nativePath = Tcl_FSGetNativePath(pathPtr); 213 fileName = Tcl_GetString(pathPtr); 242 fileName = Tcl_GetString(pathPtr); 159 TclpDlopen( Tcl_Interp *interp, Tcl_Obj *pathPtr, Tcl_LoadHandle *loadHandle, Tcl_FSUnloadFileProc **unloadProcPtr) argument
|
/macosx-10.10.1/tcl-105/tcl/tcl/generic/ |
H A D | tclFileName.c | 40 const char *separators, Tcl_Obj *pathPtr, int flags, 379 Tcl_Obj *pathPtr, /* Native path of interest */ 386 char *path = Tcl_GetStringFromObj(pathPtr, &pathLen); 483 Tcl_Obj *pathPtr, /* Path to split. */ 494 resultPtr = SplitUnixPath(Tcl_GetString(pathPtr)); 498 resultPtr = SplitWinPath(Tcl_GetString(pathPtr)); 786 Tcl_Obj *pathPtr, /* Valid path or NULL. */ 793 if (pathPtr == NULL) { 796 lobj = Tcl_NewListObj(1, &pathPtr); 2093 * be native format paths. The prefix contained in 'pathPtr' i 374 TclpGetNativePathType( Tcl_Obj *pathPtr, int *driveNameLengthPtr, Tcl_Obj **driveNameRef) argument 477 TclpNativeSplitPath( Tcl_Obj *pathPtr, int *lenPtr) argument 776 Tcl_FSJoinToPath( Tcl_Obj *pathPtr, int objc, Tcl_Obj *const objv[]) argument 2095 DoGlob( Tcl_Interp *interp, Tcl_Obj *matchesObj, const char *separators, Tcl_Obj *pathPtr, int flags, char *pattern, Tcl_GlobTypeData *types) argument [all...] |
H A D | tclDecls.h | 2612 EXTERN int Tcl_FSCreateDirectory(Tcl_Obj *pathPtr); 2617 EXTERN int Tcl_FSDeleteFile(Tcl_Obj *pathPtr); 2622 EXTERN int Tcl_FSLoadFile(Tcl_Interp *interp, Tcl_Obj *pathPtr, 2633 Tcl_Obj *result, Tcl_Obj *pathPtr, 2639 EXTERN Tcl_Obj * Tcl_FSLink(Tcl_Obj *pathPtr, Tcl_Obj *toPtr, 2645 EXTERN int Tcl_FSRemoveDirectory(Tcl_Obj *pathPtr, 2657 EXTERN int Tcl_FSLstat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf); 2662 EXTERN int Tcl_FSUtime(Tcl_Obj *pathPtr, struct utimbuf *tval); 2668 Tcl_Obj *pathPtr, Tcl_Obj **objPtrRef); 2674 Tcl_Obj *pathPtr, Tcl_Ob [all...] |
H A D | tclIntDecls.h | 677 EXTERN void TclSetLibraryPath(Tcl_Obj *pathPtr); 746 EXTERN void TclSetStartupScriptPath(Tcl_Obj *pathPtr); 811 EXTERN void Tcl_SetStartupScript(Tcl_Obj *pathPtr, 855 EXTERN int TclpObjRemoveDirectory(Tcl_Obj *pathPtr, 867 EXTERN int TclpObjCreateDirectory(Tcl_Obj *pathPtr); 872 EXTERN int TclpObjDeleteFile(Tcl_Obj *pathPtr); 889 EXTERN int TclpObjStat(Tcl_Obj *pathPtr, Tcl_StatBuf *buf); 894 EXTERN int TclpObjAccess(Tcl_Obj *pathPtr, int mode); 900 Tcl_Obj *pathPtr, int mode, int permissions); 1196 void (*tclSetLibraryPath) (Tcl_Obj *pathPtr); /* 15 [all...] |
H A D | tclFCmd.c | 24 static Tcl_Obj * FileBasename(Tcl_Interp *interp, Tcl_Obj *pathPtr); 880 Tcl_Obj *pathPtr) /* Path whose basename to extract. */ 886 splitPtr = Tcl_FSSplitPath(pathPtr, &objc); 890 if ((objc == 1) && (*TclGetString(pathPtr) == '~')) { 892 if (Tcl_FSConvertToPathType(interp, pathPtr) != TCL_OK) { 895 splitPtr = Tcl_FSSplitPath(pathPtr, &objc); 871 FileBasename( Tcl_Interp *interp, Tcl_Obj *pathPtr) argument
|
H A D | tclCmdAH.c | 23 static int CheckAccess(Tcl_Interp *interp, Tcl_Obj *pathPtr, 28 static int GetStatBuf(Tcl_Interp *interp, Tcl_Obj *pathPtr, 1414 Tcl_Obj *pathPtr, /* Name of file to check. */ 1420 if (Tcl_FSConvertToPathType(interp, pathPtr) != TCL_OK) { 1423 value = (Tcl_FSAccess(pathPtr, mode) == 0); 1454 Tcl_Obj *pathPtr, /* Path name to examine. */ 1462 if (Tcl_FSConvertToPathType(interp, pathPtr) != TCL_OK) { 1466 status = (*statProc)(pathPtr, statPtr); 1471 TclGetString(pathPtr), "\": ", 1397 CheckAccess( Tcl_Interp *interp, Tcl_Obj *pathPtr, int mode) argument 1437 GetStatBuf( Tcl_Interp *interp, Tcl_Obj *pathPtr, Tcl_FSStatProc *statProc, Tcl_StatBuf *statPtr) argument
|
H A D | tclTest.c | 381 static Tcl_Obj * TestReportGetNativePath(Tcl_Obj *pathPtr); 414 Tcl_Obj *pathPtr, int nextCheckpoint); 415 static int TestReportInFilesystem(Tcl_Obj *pathPtr, ClientData *clientDataPtr); 425 Tcl_Obj *pathPtr, ClientData *clientDataPtr); 426 static Tcl_Obj * SimpleRedirect(Tcl_Obj *pathPtr); 5136 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); 5138 Tcl_IncrRefCount(pathPtr); 5139 ret = TclpObjStat(pathPtr, buf); 5140 Tcl_DecrRefCount(pathPtr); 5144 Tcl_IncrRefCount(pathPtr); 5076 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); local 5388 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1); local 5506 Tcl_Obj *pathPtr; local 6450 TestReportInFilesystem( Tcl_Obj *pathPtr, ClientData *clientDataPtr) argument 6484 TestReportGetNativePath( Tcl_Obj *pathPtr) argument 6754 TestReportNormalizePath( Tcl_Interp *interp, Tcl_Obj *pathPtr, int nextCheckpoint) argument 6764 SimplePathInFilesystem( Tcl_Obj *pathPtr, ClientData *clientDataPtr) argument 6827 SimpleRedirect( Tcl_Obj *pathPtr) argument 6892 SimpleOpenFileChannel( Tcl_Interp *interp, Tcl_Obj *pathPtr, int mode, int permissions) argument 6915 SimpleAccess( Tcl_Obj *pathPtr, int mode) argument 6927 SimpleStat( Tcl_Obj *pathPtr, Tcl_StatBuf *bufPtr) argument [all...] |
/macosx-10.10.1/tcl-105/tcl84/tcl/win/ |
H A D | tclWinFile.c | 756 TclpMatchInDirectory(interp, resultPtr, pathPtr, pattern, types) 759 Tcl_Obj *pathPtr; /* Contains path to directory to search. */ 768 Tcl_Obj *norm = Tcl_FSGetNormalizedPath(NULL, pathPtr); 775 native = (CONST TCHAR*) Tcl_FSGetNativePath(pathPtr); 792 Tcl_ListObjAppendElement(interp, resultPtr, pathPtr); 814 fileNamePtr = Tcl_FSGetTranslatedPath(interp, pathPtr); 962 TclNewFSPathObj(pathPtr, utfname, 1633 TclpObjChdir(pathPtr) 1634 Tcl_Obj *pathPtr; /* Path to new working directory. */ 1646 nativePath = (CONST TCHAR *) Tcl_FSGetNativePath(pathPtr); 2643 TclpUtime( Tcl_Obj *pathPtr, struct utimbuf *tval) argument [all...] |
H A D | tclWinFCmd.c | 112 static int DoCreateDirectory(CONST TCHAR *pathPtr); 115 static int DoRemoveDirectory(Tcl_DString *pathPtr, int recursive, 742 TclpObjDeleteFile(pathPtr) 743 Tcl_Obj *pathPtr; 745 return TclpDeleteFile(Tcl_FSGetNativePath(pathPtr)); 852 TclpObjCreateDirectory(pathPtr) 853 Tcl_Obj *pathPtr; 855 return DoCreateDirectory(Tcl_FSGetNativePath(pathPtr)); 970 TclpObjRemoveDirectory(pathPtr, recursive, errorPtr) 971 Tcl_Obj *pathPtr; 1135 DoRemoveDirectory( Tcl_DString *pathPtr, int recursive, Tcl_DString *errorPtr) argument [all...] |
H A D | tclWinChan.c | 790 TclpOpenFileChannel(interp, pathPtr, mode, permissions) 793 Tcl_Obj *pathPtr; /* Name of file to open. */ 808 nativeName = (TCHAR*) Tcl_FSGetNativePath(pathPtr); 895 Tcl_GetString(pathPtr), "\": ", 914 Tcl_GetString(pathPtr), "\": ", 951 Tcl_GetString(pathPtr), "\": ",
|
/macosx-10.10.1/tcl-105/tcl/tcl/win/ |
H A D | tclWinFile.c | 894 Tcl_Obj *pathPtr, /* Contains path to directory to search. */ 911 Tcl_Obj *norm = Tcl_FSGetNormalizedPath(NULL, pathPtr); 921 native = (const TCHAR *) Tcl_FSGetNativePath(pathPtr); 938 Tcl_ListObjAppendElement(interp, resultPtr, pathPtr); 961 fileNamePtr = Tcl_FSGetNormalizedPath(interp, pathPtr); 970 native = Tcl_FSGetNativePath(pathPtr); 1143 TclNewFSPathObj(pathPtr, utfname, 1849 Tcl_Obj *pathPtr) /* Path to new working directory. */ 1860 nativePath = (const TCHAR *) Tcl_FSGetNativePath(pathPtr); 2008 Tcl_Obj *pathPtr, /* Pat 881 TclpMatchInDirectory( Tcl_Interp *interp, Tcl_Obj *resultPtr, Tcl_Obj *pathPtr, const char *pattern, Tcl_GlobTypeData *types) argument 1831 TclpObjChdir( Tcl_Obj *pathPtr) argument 1987 TclpObjStat( Tcl_Obj *pathPtr, Tcl_StatBuf *statPtr) argument 2381 TclpObjAccess( Tcl_Obj *pathPtr, int mode) argument 2389 TclpObjLstat( Tcl_Obj *pathPtr, Tcl_StatBuf *statPtr) argument 2407 TclpObjLink( Tcl_Obj *pathPtr, Tcl_Obj *toPtr, int linkAction) argument 2463 TclpFilesystemPathType( Tcl_Obj *pathPtr) argument 2547 TclpObjNormalizePath( Tcl_Interp *interp, Tcl_Obj *pathPtr, int nextCheckpoint) argument 3185 TclNativeCreateNativeRep( Tcl_Obj *pathPtr) argument 3305 TclpUtime( Tcl_Obj *pathPtr, struct utimbuf *tval) argument [all...] |
H A D | tclWinFCmd.c | 107 static int DoCreateDirectory(CONST TCHAR *pathPtr); 110 static int DoRemoveDirectory(Tcl_DString *pathPtr, int recursive, 771 Tcl_Obj *pathPtr) 773 return TclpDeleteFile(Tcl_FSGetNativePath(pathPtr)); 884 Tcl_Obj *pathPtr) 886 return DoCreateDirectory(Tcl_FSGetNativePath(pathPtr)); 998 Tcl_Obj *pathPtr, 1014 normPtr = Tcl_FSGetNormalizedPath(NULL, pathPtr); 1022 ret = DoRemoveJustDirectory(Tcl_FSGetNativePath(pathPtr), 0, &ds); 1030 *errorPtr = pathPtr; 767 TclpObjDeleteFile( Tcl_Obj *pathPtr) argument 879 TclpObjCreateDirectory( Tcl_Obj *pathPtr) argument 991 TclpObjRemoveDirectory( Tcl_Obj *pathPtr, int recursive, Tcl_Obj **errorPtr) argument 1187 DoRemoveDirectory( Tcl_DString *pathPtr, int recursive, Tcl_DString *errorPtr) argument [all...] |
H A D | tclWinChan.c | 862 Tcl_Obj *pathPtr, /* Name of file to open. */ 875 nativeName = (TCHAR*) Tcl_FSGetNativePath(pathPtr); 961 Tcl_AppendResult(interp, "couldn't open \"", TclGetString(pathPtr), 981 TclGetString(pathPtr), "\": ", 1016 Tcl_AppendResult(interp, "couldn't open \"", TclGetString(pathPtr), 844 TclpOpenFileChannel( Tcl_Interp *interp, Tcl_Obj *pathPtr, int mode, int permissions) argument
|
/macosx-10.10.1/tcl-105/tcl/tcl/unix/ |
H A D | tclUnixInit.c | 485 Tcl_Obj *pathPtr, *objPtr; 489 pathPtr = Tcl_NewObj(); 523 Tcl_ListObjAppendElement(NULL, pathPtr, objPtr); 538 Tcl_ListObjAppendElement(NULL, pathPtr, objPtr); 567 Tcl_ListObjAppendElement(NULL, pathPtr, objPtr); 573 str = Tcl_GetStringFromObj(pathPtr, lengthPtr); 576 Tcl_DecrRefCount(pathPtr); 483 Tcl_Obj *pathPtr, *objPtr; local
|
H A D | tclUnixFCmd.c | 182 static int DoCreateDirectory(CONST char *pathPtr); 183 static int DoRemoveDirectory(Tcl_DString *pathPtr, 628 Tcl_Obj *pathPtr) 630 return TclpDeleteFile(Tcl_FSGetNativePath(pathPtr)); 672 Tcl_Obj *pathPtr) 674 return DoCreateDirectory(Tcl_FSGetNativePath(pathPtr)); 791 Tcl_Obj *pathPtr, 798 Tcl_Obj *transPtr = Tcl_FSGetTranslatedPath(NULL, pathPtr); 819 Tcl_DString *pathPtr, /* Pathname of directory to be removed 832 path = Tcl_DStringValue(pathPtr); 623 TclpObjDeleteFile( Tcl_Obj *pathPtr) argument 666 TclpObjCreateDirectory( Tcl_Obj *pathPtr) argument 783 TclpObjRemoveDirectory( Tcl_Obj *pathPtr, int recursive, Tcl_Obj **errorPtr) argument 811 DoRemoveDirectory( Tcl_DString *pathPtr, int recursive, Tcl_DString *errorPtr) argument 1893 TclpObjNormalizePath( Tcl_Interp *interp, Tcl_Obj *pathPtr, int nextCheckpoint) argument [all...] |
H A D | tclLoadDyld.c | 161 Tcl_Obj *pathPtr, /* Name of the file containing the desired 196 nativePath = Tcl_FSGetNativePath(pathPtr); 211 fileName = Tcl_GetString(pathPtr); 240 fileName = Tcl_GetString(pathPtr); 157 TclpDlopen( Tcl_Interp *interp, Tcl_Obj *pathPtr, Tcl_LoadHandle *loadHandle, Tcl_FSUnloadFileProc **unloadProcPtr) argument
|