diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2017-06-06 17:51:12 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2017-06-06 17:51:12 (GMT) |
commit | aa9f62da23ab5e38de116429abb7fcfcc0504c4c (patch) | |
tree | 582b3c47a3c3d3b321ee8e319415e761bec0114c /generic/tclStubInit.c | |
parent | 9c05979998520bc1162e96cdd7a6de1011ff548c (diff) | |
download | tcl-aa9f62da23ab5e38de116429abb7fcfcc0504c4c.zip tcl-aa9f62da23ab5e38de116429abb7fcfcc0504c4c.tar.gz tcl-aa9f62da23ab5e38de116429abb7fcfcc0504c4c.tar.bz2 |
Expose some of the core variable access APIs.
dkf_expose_ptrgetvar_8_6
(Cherrypick from [b4dfc30083])
Diffstat (limited to 'generic/tclStubInit.c')
-rw-r--r-- | generic/tclStubInit.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 5b7a1cd..b185f04 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -560,6 +560,11 @@ static const TclIntStubs tclIntStubs = { TclDoubleDigits, /* 249 */ TclSetSlaveCancelFlags, /* 250 */ TclRegisterLiteral, /* 251 */ + TclPtrGetVar, /* 252 */ + TclPtrSetVar, /* 253 */ + TclPtrIncrObjVar, /* 254 */ + TclPtrObjMakeUpvar, /* 255 */ + TclPtrUnsetVar, /* 256 */ }; static const TclIntPlatStubs tclIntPlatStubs = { |