diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-12 13:30:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-12 13:30:03 (GMT) |
| commit | 9c5561ea5682d377441dd111da3730dc0be56abf (patch) | |
| tree | e1f55eb4dc6387d7c02eb312c1fbc31e1c3d84c5 | |
| parent | 1e6f410bd20b8576dbd0be31a153d56d48a1dae4 (diff) | |
| parent | f55203403c6ec05a55134dcfea129095e91c098e (diff) | |
| download | tcl-9c5561ea5682d377441dd111da3730dc0be56abf.zip tcl-9c5561ea5682d377441dd111da3730dc0be56abf.tar.gz tcl-9c5561ea5682d377441dd111da3730dc0be56abf.tar.bz2 | |
Fix TCL_UTF_MAX == 3 build
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 852c4ff..130379f 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -989,7 +989,11 @@ TclGetUnicodeFromObj( { String *stringPtr; +#if TCL_UTF_MAX > 3 SetUTF16StringFromAny(NULL, objPtr); +#else + SetStringFromAny(NULL, objPtr); +#endif stringPtr = GET_STRING(objPtr); if (lengthPtr != NULL) { |