diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-04-12 11:27:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-04-12 11:27:37 (GMT) |
| commit | 40691feec1993222d76235c047d25b488d08310b (patch) | |
| tree | 2493f0dc8127e59b48881d4e4108ebb93a38ba22 /unix | |
| parent | 0af5420032e18a434670faed6ce8a932fc1a5b28 (diff) | |
| parent | 05aa6581cccb3435b6e1e24b98d0f6f5a9df56eb (diff) | |
| download | tcl-40691feec1993222d76235c047d25b488d08310b.zip tcl-40691feec1993222d76235c047d25b488d08310b.tar.gz tcl-40691feec1993222d76235c047d25b488d08310b.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 'unix')
| -rw-r--r-- | unix/dltest/pkgb.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/dltest/pkgb.c b/unix/dltest/pkgb.c index ad61d77..f102496 100644 --- a/unix/dltest/pkgb.c +++ b/unix/dltest/pkgb.c @@ -144,7 +144,7 @@ Pkgb_Init( if (Tcl_InitStubs(interp, "8.5-", 0) == NULL) { return TCL_ERROR; } - code = Tcl_PkgProvideEx(interp, "Pkgb", "2.3", NULL); + code = Tcl_PkgProvide(interp, "Pkgb", "2.3"); if (code != TCL_OK) { return code; } @@ -181,7 +181,7 @@ Pkgb_SafeInit( if (Tcl_InitStubs(interp, "8.5-", 0) == NULL) { return TCL_ERROR; } - code = Tcl_PkgProvideEx(interp, "Pkgb", "2.3", NULL); + code = Tcl_PkgProvide(interp, "Pkgb", "2.3"); if (code != TCL_OK) { return code; } |