diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2025-09-17 05:24:07 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2025-09-17 05:24:07 (GMT) |
| commit | 5ab8b8b3d8634976de5ffb5fd04eed6fd1f7dc8e (patch) | |
| tree | a02d02be73a7cb1357555dfeef748f3a4065336d /generic/tclTest.c | |
| parent | 4b5c6bedda3393e42f06dfb50a5af067c3173b33 (diff) | |
| parent | 133e32482931da3d774c7c0c8f6f176639c0639c (diff) | |
| download | tcl-core-apn-init-refactor.zip tcl-core-apn-init-refactor.tar.gz tcl-core-apn-init-refactor.tar.bz2 | |
Merge trunkcore-apn-init-refactor
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 703f39e..fce2b80 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -9160,8 +9160,7 @@ TestUtfToNormalizedCmd( return TCL_ERROR; } if (len > slen) { - Tcl_SetObjResult(interp, - Tcl_ObjPrintf( + Tcl_SetObjResult(interp, Tcl_ObjPrintf( "Passed length %" TCL_SIZE_MODIFIER "d is greater than string length %" TCL_SIZE_MODIFIER "d.", len, slen)); @@ -9181,8 +9180,8 @@ TestUtfToNormalizedCmd( (Tcl_UnicodeNormalizationForm)normForm, profile, bufPtr, bufLen, &bufStored); if (result == TCL_OK) { /* Return as raw bytes, not string */ - Tcl_SetObjResult(interp, - Tcl_NewByteArrayObj((unsigned char *)bufPtr, bufStored)); + Tcl_SetObjResult(interp, Tcl_NewByteArrayObj( + (unsigned char *)bufPtr, bufStored)); } if (bufPtr != buffer) { Tcl_Free(bufPtr); @@ -9238,8 +9237,7 @@ TestUtfToNormalizedDStringCmd( return TCL_ERROR; } if (len > slen) { - Tcl_SetObjResult(interp, - Tcl_ObjPrintf( + Tcl_SetObjResult(interp, Tcl_ObjPrintf( "Passed length %" TCL_SIZE_MODIFIER "d is greater than string length %" TCL_SIZE_MODIFIER "d.", len, slen)); @@ -9252,8 +9250,8 @@ TestUtfToNormalizedDStringCmd( (Tcl_UnicodeNormalizationForm)normForm, profile, &ds); if (result == TCL_OK) { /* Return as raw bytes, not string */ - Tcl_SetObjResult(interp, - Tcl_NewByteArrayObj((unsigned char *)Tcl_DStringValue(&ds), + Tcl_SetObjResult(interp, Tcl_NewByteArrayObj( + (unsigned char *)Tcl_DStringValue(&ds), Tcl_DStringLength(&ds))); Tcl_DStringFree(&ds); } |