diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-12 11:27:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-12 11:27:37 (GMT) |
| commit | 842aaedd1dfa328d665d08d7c58e21d86e789caa (patch) | |
| tree | 2493f0dc8127e59b48881d4e4108ebb93a38ba22 /generic/tclDecls.h | |
| parent | 60117633e009c470b0dc3d2816c962d6c43eda1c (diff) | |
| parent | e8afde99c7b4bba616c5e10909e3e41451aa98a7 (diff) | |
| download | tcl-842aaedd1dfa328d665d08d7c58e21d86e789caa.zip tcl-842aaedd1dfa328d665d08d7c58e21d86e789caa.tar.gz tcl-842aaedd1dfa328d665d08d7c58e21d86e789caa.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().
FossilOrigin-Name: 0d1aa1bcb821fcbc36914d7296c7ea1a75937f3e
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 a1c0bf4..5fda514 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -3809,6 +3809,16 @@ extern const TclStubs *tclStubsPtr; #undef Tcl_SeekOld #undef Tcl_TellOld +#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: */ |