diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2019-04-30 13:35:53 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2019-04-30 13:35:53 (GMT) |
commit | bb3f92db4dd5481dce096a7b9b3636f1b9f96034 (patch) | |
tree | 8fff7cdcc0bafacd639f1399556b69fb0e319696 /generic/tclIntDecls.h | |
parent | 9166f253641547167c7d15b1fb9788b5e8c45a70 (diff) | |
download | tcl-bb3f92db4dd5481dce096a7b9b3636f1b9f96034.zip tcl-bb3f92db4dd5481dce096a7b9b3636f1b9f96034.tar.gz tcl-bb3f92db4dd5481dce096a7b9b3636f1b9f96034.tar.bz2 |
Export API
Diffstat (limited to 'generic/tclIntDecls.h')
-rw-r--r-- | generic/tclIntDecls.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index eddbcb3..56abe77 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -653,6 +653,9 @@ EXTERN void TclStaticPackage(Tcl_Interp *interp, const char *pkgName, Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc); +/* 258 */ +EXTERN Tcl_Obj * TclpCreateTemporaryDirectory(Tcl_Obj *dirObj, + Tcl_Obj *basenameObj); typedef struct TclIntStubs { int magic; @@ -916,6 +919,7 @@ typedef struct TclIntStubs { int (*tclPtrObjMakeUpvar) (Tcl_Interp *interp, Tcl_Var otherPtr, Tcl_Obj *myNamePtr, int myFlags); /* 255 */ int (*tclPtrUnsetVar) (Tcl_Interp *interp, Tcl_Var varPtr, Tcl_Var arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, const int flags); /* 256 */ void (*tclStaticPackage) (Tcl_Interp *interp, const char *pkgName, Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc); /* 257 */ + Tcl_Obj * (*tclpCreateTemporaryDirectory) (Tcl_Obj *dirObj, Tcl_Obj *basenameObj); /* 258 */ } TclIntStubs; extern const TclIntStubs *tclIntStubsPtr; @@ -1359,6 +1363,8 @@ extern const TclIntStubs *tclIntStubsPtr; (tclIntStubsPtr->tclPtrUnsetVar) /* 256 */ #define TclStaticPackage \ (tclIntStubsPtr->tclStaticPackage) /* 257 */ +#define TclpCreateTemporaryDirectory \ + (tclIntStubsPtr->tclpCreateTemporaryDirectory) /* 258 */ #endif /* defined(USE_TCL_STUBS) */ |