diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-02-02 21:12:14 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-02-02 21:12:14 (GMT) |
| commit | 02b3c85edaf8ff8a0878716a4b426629fceb32ac (patch) | |
| tree | 79d9f3b18ce8dfc7bf1cafd47c71846778702ab7 /tools/uniParse.tcl | |
| parent | bb750df4b42a35f9bc9ebd37914a8ac6c91d2a09 (diff) | |
| parent | c38d07a84806fed9a98b05707cec411170a3255d (diff) | |
| download | tcl-02b3c85edaf8ff8a0878716a4b426629fceb32ac.zip tcl-02b3c85edaf8ff8a0878716a4b426629fceb32ac.tar.gz tcl-02b3c85edaf8ff8a0878716a4b426629fceb32ac.tar.bz2 | |
[Frq 3464401] Support Unicode 6.1
Diffstat (limited to 'tools/uniParse.tcl')
| -rw-r--r-- | tools/uniParse.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/uniParse.tcl b/tools/uniParse.tcl index 86f6d04..947dae4 100644 --- a/tools/uniParse.tcl +++ b/tools/uniParse.tcl @@ -337,7 +337,7 @@ static CONST int groups\[\] = {" puts $f $line puts -nonewline $f "}; -#if UTF_MAX_LEN > 3 +#if TCL_UTF_MAX > 3 # define UNICODE_OUT_OF_RANGE(ch) (((ch) & 0x1fffff) >= [format 0x%x $next]) #else # define UNICODE_OUT_OF_RANGE(ch) (((ch) & 0x1f0000) != 0) |