diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-17 11:17:27 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-17 11:17:27 (GMT) |
commit | 292c03d1c289ed9aae8eac6aba53c1857e4bf90d (patch) | |
tree | 9576fec9f197250b00a54b86af11f92a9921b9e3 /generic/tclPkg.c | |
parent | 53b939e3bc6f9b4995c798d45dada91369aa82ad (diff) | |
parent | af999a3a2c4770f8654059f5c5b50d766cc88c7f (diff) | |
download | tcl-292c03d1c289ed9aae8eac6aba53c1857e4bf90d.zip tcl-292c03d1c289ed9aae8eac6aba53c1857e4bf90d.tar.gz tcl-292c03d1c289ed9aae8eac6aba53c1857e4bf90d.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclPkg.c')
-rw-r--r-- | generic/tclPkg.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclPkg.c b/generic/tclPkg.c index 4297207..9cf0ab3 100644 --- a/generic/tclPkg.c +++ b/generic/tclPkg.c @@ -1361,7 +1361,7 @@ TclNRPackageObjCmd( objvListPtr = Tcl_NewListObj(0, NULL); Tcl_IncrRefCount(objvListPtr); Tcl_ListObjAppendElement(interp, objvListPtr, ov); - TclListObjGetElements(interp, objvListPtr, &newobjc, &newObjvPtr); + TclListObjGetElementsM(interp, objvListPtr, &newobjc, &newObjvPtr); Tcl_NRAddCallback(interp, TclNRPackageObjCmdCleanup, objv[3], objvListPtr, NULL,NULL); @@ -1388,7 +1388,7 @@ TclNRPackageObjCmd( Tcl_ListObjAppendElement(interp, objvListPtr, Tcl_DuplicateObj(newobjv[i])); } - TclListObjGetElements(interp, objvListPtr, &newobjc, &newObjvPtr); + TclListObjGetElementsM(interp, objvListPtr, &newobjc, &newObjvPtr); Tcl_NRAddCallback(interp, TclNRPackageObjCmdCleanup, objv[2], objvListPtr, NULL,NULL); Tcl_NRAddCallback(interp, |