diff options
author | dgp <dgp@users.sourceforge.net> | 2013-07-08 19:54:50 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-07-08 19:54:50 (GMT) |
commit | 47671bee1a20cd9ccf3099ed6ed47843c972aa1e (patch) | |
tree | 9b1346029c5f9378f87c0517d48d6863cadb552f | |
parent | 8127bc5dd162ce6a44aa4bdcb28f378ae8663514 (diff) | |
parent | 17ffd6902101268bd8cc522ed62049279e2894d5 (diff) | |
download | tcl-47671bee1a20cd9ccf3099ed6ed47843c972aa1e.zip tcl-47671bee1a20cd9ccf3099ed6ed47843c972aa1e.tar.gz tcl-47671bee1a20cd9ccf3099ed6ed47843c972aa1e.tar.bz2 |
merge trunk
-rw-r--r-- | generic/tclUtf.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c index 0af2c25..a349846 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -1555,7 +1555,7 @@ Tcl_UniCharIsSpace( */ if (((Tcl_UniChar) ch) < ((Tcl_UniChar) 0x80)) { - return TclIsSpaceProc(ch); + return TclIsSpaceProc((char) ch); } else if ((Tcl_UniChar) ch == 0x0085 || (Tcl_UniChar) ch == 0x180e || (Tcl_UniChar) ch == 0x200b || (Tcl_UniChar) ch == 0x2060 || (Tcl_UniChar) ch == 0xfeff) { |