summaryrefslogtreecommitdiffstats
path: root/unix/dltest
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-29 11:39:00 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-29 11:39:00 (GMT)
commitb2522c9c24b283a616ac38c4c987827c4fa86167 (patch)
tree7ce411d2af949b4e0efb15ac084505dc3427742a /unix/dltest
parent23a0290873b671c61ba3bc112ffc158fb859667a (diff)
downloadtcl-b2522c9c24b283a616ac38c4c987827c4fa86167.zip
tcl-b2522c9c24b283a616ac38c4c987827c4fa86167.tar.gz
tcl-b2522c9c24b283a616ac38c4c987827c4fa86167.tar.bz2
Tcl_SetVar -> Tcl_SetVar2 and comparable replacements, eliminating functions which are deprecated.
Diffstat (limited to 'unix/dltest')
-rw-r--r--unix/dltest/pkgua.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/dltest/pkgua.c b/unix/dltest/pkgua.c
index 417bedb..5de0101 100644
--- a/unix/dltest/pkgua.c
+++ b/unix/dltest/pkgua.c
@@ -224,7 +224,7 @@ Pkgua_Init(
return code;
}
- Tcl_SetVar(interp, "::pkgua_loaded", ".", TCL_APPEND_VALUE);
+ Tcl_SetVar2(interp, "::pkgua_loaded", NULL, ".", TCL_APPEND_VALUE);
cmdTokens = PkguaInterpToTokens(interp);
cmdTokens[cmdIndex++] =
@@ -299,7 +299,7 @@ Pkgua_Unload(
PkguaDeleteTokens(interp);
- Tcl_SetVar(interp, "::pkgua_detached", ".", TCL_APPEND_VALUE);
+ Tcl_SetVar2(interp, "::pkgua_detached", NULL, ".", TCL_APPEND_VALUE);
if (flags == TCL_UNLOAD_DETACH_FROM_PROCESS) {
/*
@@ -309,7 +309,7 @@ Pkgua_Unload(
*/
PkguaFreeTokensHashTable();
- Tcl_SetVar(interp, "::pkgua_unloaded", ".", TCL_APPEND_VALUE);
+ Tcl_SetVar2(interp, "::pkgua_unloaded", NULL, ".", TCL_APPEND_VALUE);
}
return TCL_OK;
}