diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2019-05-25 08:17:42 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2019-05-25 08:17:42 (GMT) |
| commit | 815f8822018df40f65d4dc2ce7029a9223da2ab6 (patch) | |
| tree | e1b6ac62c11e8c4b03a5255b3ce9aec0641ba2d2 /generic/tclIntDecls.h | |
| parent | e09e63e37e690f36ffc3b95ea85e966809c4b305 (diff) | |
| parent | 9290e6c1ace5bd8e3074900948ea3ad677f73832 (diff) | |
| download | tcl-815f8822018df40f65d4dc2ce7029a9223da2ab6.zip tcl-815f8822018df40f65d4dc2ce7029a9223da2ab6.tar.gz tcl-815f8822018df40f65d4dc2ce7029a9223da2ab6.tar.bz2 | |
Merge 8.7
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 61249c0..ec86071 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -583,6 +583,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; @@ -846,6 +849,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; @@ -1263,6 +1267,8 @@ extern const TclIntStubs *tclIntStubsPtr; (tclIntStubsPtr->tclPtrUnsetVar) /* 256 */ #define TclStaticPackage \ (tclIntStubsPtr->tclStaticPackage) /* 257 */ +#define TclpCreateTemporaryDirectory \ + (tclIntStubsPtr->tclpCreateTemporaryDirectory) /* 258 */ #endif /* defined(USE_TCL_STUBS) */ |