diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-08 20:37:56 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-08 20:37:56 (GMT) |
| commit | 23becaa71a28010cbce1c4e4e64004e970c6ee17 (patch) | |
| tree | 39db8cee85b864e290a84e040b7e86c1ca000778 /generic/tclTestObj.c | |
| parent | ebfa9b6f2dab96c8ae9b1216ecc832b6b263fd98 (diff) | |
| parent | c3da6c8fed02c02c3cc9e696107a87a7e004d8e6 (diff) | |
| download | tcl-23becaa71a28010cbce1c4e4e64004e970c6ee17.zip tcl-23becaa71a28010cbce1c4e4e64004e970c6ee17.tar.gz tcl-23becaa71a28010cbce1c4e4e64004e970c6ee17.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclTestObj.c')
| -rw-r--r-- | generic/tclTestObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 7accb9b..6f919eb 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -1261,7 +1261,7 @@ TeststringobjCmd( static const char *const options[] = { "append", "appendstrings", "get", "get2", "length", "length2", "set", "set2", "setlength", "maxchars", "range", "appendself", - "appendself2", NULL + "appendself2", "newunicode", NULL }; if (objc < 3) { @@ -1498,7 +1498,7 @@ TeststringobjCmd( Tcl_SetObjResult(interp, varPtr[varIndex]); break; case 13: /* newunicode*/ - unicode = (Tcl_UniChar *) Tcl_Alloc((objc - 3) * sizeof(Tcl_UniChar)); + unicode = (Tcl_UniChar *)Tcl_Alloc((objc - 3) * sizeof(Tcl_UniChar)); for (i = 0; i < (objc - 3); ++i) { int val; if (Tcl_GetIntFromObj(interp, objv[i + 3], &val) != TCL_OK) { |