diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-04 16:56:26 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-04 16:56:26 (GMT) |
| commit | 15b5f31cafb65b5055b670feabbbcf17d7af45f4 (patch) | |
| tree | 5cfd0e5d4fb092d6f74fc95c1c6f5b47b67673af /generic/tclTest.c | |
| parent | 226bb13f4e093299c9d975ebd16c6cacb4af6356 (diff) | |
| download | tcl-15b5f31cafb65b5055b670feabbbcf17d7af45f4.zip tcl-15b5f31cafb65b5055b670feabbbcf17d7af45f4.tar.gz tcl-15b5f31cafb65b5055b670feabbbcf17d7af45f4.tar.bz2 | |
Rename exported symbol "Tcl_StaticPackage" to "Tcl_StaticLibrary". Still undocumented, to be formalized by TIP #595. Tcl_StaticPackage() still works the same
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 3835698..9e4ec57 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -4220,7 +4220,7 @@ TestsetplatformCmd( * TeststaticpkgCmd -- * * This procedure implements the "teststaticpkg" command. - * It is used to test the procedure Tcl_StaticPackage. + * It is used to test the procedure Tcl_StaticLibrary. * * Results: * A standard Tcl result. @@ -4252,7 +4252,7 @@ TeststaticpkgCmd( if (Tcl_GetInt(interp, argv[3], &loaded) != TCL_OK) { return TCL_ERROR; } - Tcl_StaticPackage((loaded) ? interp : NULL, argv[1], + Tcl_StaticLibrary((loaded) ? interp : NULL, argv[1], StaticInitProc, (safe) ? StaticInitProc : NULL); return TCL_OK; } |