diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-06-24 14:28:47 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-06-24 14:28:47 (GMT) |
| commit | b358a0b815c16a175c7861aa6cbb08b9ca211cb4 (patch) | |
| tree | 4d6c6c3ff1523215625e73e476b04a963aace2d2 /generic/tclTest.c | |
| parent | eb049d668c3f6c715771f027207ceeff6c2cba43 (diff) | |
| download | tcl-b358a0b815c16a175c7861aa6cbb08b9ca211cb4.zip tcl-b358a0b815c16a175c7861aa6cbb08b9ca211cb4.tar.gz tcl-b358a0b815c16a175c7861aa6cbb08b9ca211cb4.tar.bz2 | |
Tcl_GetStringFromObj(..., NULL) -> Tcl_GetString(...). Use size_t in stead of int for more internal variables.
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 0f4b6d4..19a9033 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -2306,9 +2306,9 @@ TesteventDeleteProc( return 0; } targetName = (Tcl_Obj *) clientData; - targetNameStr = (char *) Tcl_GetStringFromObj(targetName, NULL); + targetNameStr = (char *) Tcl_GetString(targetName); ev = (TestEvent *) event; - evNameStr = Tcl_GetStringFromObj(ev->tag, NULL); + evNameStr = Tcl_GetString(ev->tag); if (strcmp(evNameStr, targetNameStr) == 0) { Tcl_DecrRefCount(ev->tag); Tcl_DecrRefCount(ev->command); |