diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-04-12 11:08:18 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-04-12 11:08:18 (GMT) |
commit | 98fc2e08c445e88c982282eba4b2f7da09a583e9 (patch) | |
tree | f4cf227e14cdc2994b8c031ecf77513425c1b187 /generic/tclDecls.h | |
parent | 6379f60ed8aca0d3ce1aa00314d5249bf6da6f86 (diff) | |
download | tcl-98fc2e08c445e88c982282eba4b2f7da09a583e9.zip tcl-98fc2e08c445e88c982282eba4b2f7da09a583e9.tar.gz tcl-98fc2e08c445e88c982282eba4b2f7da09a583e9.tar.bz2 |
Implement Tcl_Pkg* functions as macro's around Tcl_Pkg*Ex. This saves stack space, is (marginally) faster, while still being fully up/down compatible. It makes pkgb.so loadable in "novem" without the need to change the Tcl_PkgProvide() call to Tcl_PkgProvideEx().
Diffstat (limited to 'generic/tclDecls.h')
-rw-r--r-- | generic/tclDecls.h | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 618536d..a94cb0e 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -4516,6 +4516,16 @@ extern TclStubs *tclStubsPtr; #undef TclUnusedStubEntry +#undef Tcl_PkgPresent +#define Tcl_PkgPresent(interp, name, version, exact) \ + Tcl_PkgPresentEx(interp, name, version, exact, NULL) +#undef Tcl_PkgProvide +#define Tcl_PkgProvide(interp, name, version) \ + Tcl_PkgProvideEx(interp, name, version, NULL) +#undef Tcl_PkgRequire +#define Tcl_PkgRequire(interp, name, version, exact) \ + Tcl_PkgRequireEx(interp, name, version, exact, NULL) + /* * Deprecated Tcl procedures: */ |