tcl.h: #if TCL_UTF_MAX > 4
|User & Date:||pointsman 2013-12-22 23:12:32|
- Change assignee to "nobody"
- Change closer to "nobody"
- Change cmimetype to "text/plain"
- Change comment to:
#if TCL_UTF_MAX > 4 /* * unsigned int isn't 100% accurate as it should be a strict 4-byte value * (perhaps wchar_t). 64-bit systems may have troubles. The size of this * value must be reflected correctly in regcustom.h and * in tclEncoding.c. * XXX: Tcl is currently UCS-2 and planning UTF-16 for the Unicode * XXX: string rep that Tcl_UniChar represents. Changing the size * XXX: of Tcl_UniChar is /not/ supported. */ typedef unsigned int Tcl_UniChar; #else typedef unsigned short Tcl_UniChar; #endif
(See in context here: http://core.tcl.tk/tcl/artifact/f555d5aa61ea46ec31d833b33c52fb8788c8dcdf?ln=2208-2221)
That means, with TCL_UTF_MAX 4 Tcl_UniChar is still an unsigned short. This is obviously wrong, because a valid 4 byte utf-8 char is beyond the BMP, that means bigger than an unsigned short.
That define should read as
#if TCL_UTF_MAX > 3
as before check-in http://core.tcl.tk/tcl/info/4d6af4f7a468b71a
Same in regcustom.h: http://core.tcl.tk/tcl/artifact/197b7849d4dfcb86b50f783fdc0fc45dde12125b?ln=100-108
- Change foundin to "8.6.1"
- Change is_private to "0"
- Change login to "pointsman"
- Change priority to "5 Medium"
- Change private_contact to "4ca203a8e925aecdd9419645f936bccf18cd6ea7"
- Change resolution to "None"
- Change severity to "Minor"
- Change status to "Open"
- Change submitter to "pointsman"
- Change subsystem to "44. UTF-8 Strings"
- Change title to "tcl.h: #if TCL_UTF_MAX > 4"
- Change type to "Bug"