summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2014-06-03 11:08:38 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2014-06-03 11:08:38 (GMT)
commit622180938c63060edf98112f7b99e35b4b2551ad (patch)
treec79192f74a513c9e559f678cef64aeb06f6d1b3b /unix
parentd962821b84a7745d3cc1a45c6e58e7192d2b764f (diff)
downloadtk-622180938c63060edf98112f7b99e35b4b2551ad.zip
tk-622180938c63060edf98112f7b99e35b4b2551ad.tar.gz
tk-622180938c63060edf98112f7b99e35b4b2551ad.tar.bz2
Convert TkpTestembedCmd and TkpTesttextCmd to Tcl_Obj-based commands.
Diffstat (limited to 'unix')
-rw-r--r--unix/tkUnixEmbed.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tkUnixEmbed.c b/unix/tkUnixEmbed.c
index 8a4c368..7f3f94b 100644
--- a/unix/tkUnixEmbed.c
+++ b/unix/tkUnixEmbed.c
@@ -867,8 +867,8 @@ int
TkpTestembedCmd(
ClientData clientData, /* Main window for application. */
Tcl_Interp *interp, /* Current interpreter. */
- int argc, /* Number of arguments. */
- const char **argv) /* Argument strings. */
+ int objc, /* Number of arguments. */
+ Tcl_Obj *const objv[]) /* Argument strings. */
{
int all;
Container *containerPtr;
@@ -877,7 +877,7 @@ TkpTestembedCmd(
ThreadSpecificData *tsdPtr =
Tcl_GetThreadData(&dataKey, sizeof(ThreadSpecificData));
- if ((argc > 1) && (strcmp(argv[1], "all") == 0)) {
+ if ((objc > 1) && (strcmp(Tcl_GetString(objv[1]), "all") == 0)) {
all = 1;
} else {
all = 0;