diff options
Diffstat (limited to 'generic/tclTestObj.c')
| -rw-r--r-- | generic/tclTestObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 6fe4338..8f12fd6 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -1348,7 +1348,7 @@ TeststringobjCmd( if (objc != 3) { goto wrongNumArgs; } - Tcl_GetUnicodeFromObj(varPtr[varIndex], NULL); + Tcl_GetUnicode(varPtr[varIndex]); break; case 11: /* appendself */ if (objc != 4) { |