Tcl Source Code

Check-in [d369017148]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Unbreak MSVC6 debug build (thanks Andreas Kupries!)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: d369017148f266851caca148d77e505603a58fd1
User & Date: jan.nijtmans 2013-07-08 18:56:13
Context
2013-07-10
17:58
Fix for [86fb5ea28e]. Test will eventually merge in from tip280-test-coverage. check-in: ca488c3bfe user: dgp tags: trunk
16:17
Disabling the SetLineInformation() macro entirely causes only 3 tests in the test suite to fail. Re... check-in: 3474390eda user: dgp tags: tip280-test-coverage
2013-07-09
09:30
rebase check-in: 82fa3f9bb1 user: jan.nijtmans tags: bug-1712098
2013-07-08
19:54
merge trunk check-in: 917f4540cf user: dgp tags: dgp-tcs-rewrite
19:53
merge trunk: check-in: 886e808dd1 user: dgp tags: dgp-refactor
18:56
Unbreak MSVC6 debug build (thanks Andreas Kupries!) check-in: b259e31b93 user: jan.nijtmans tags: novem
18:56
Unbreak MSVC6 debug build (thanks Andreas Kupries!) check-in: d369017148 user: jan.nijtmans tags: trunk
18:55
Unbreak MSVC6 debug build (thanks Andreas Kupries!) check-in: 728fb2f25b user: jan.nijtmans tags: core-8-5-branch
06:51
Build stub objects with -DSTATIC_BUILD on all platforms. Only important on win32 (already done) and ... check-in: 15c829bcbe user: jan.nijtmans tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclUtf.c.

1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
{
    /*
     * If the character is within the first 127 characters, just use the
     * standard C function, otherwise consult the Unicode table.
     */

    if (((Tcl_UniChar) ch) < ((Tcl_UniChar) 0x80)) {
	return TclIsSpaceProc(ch);
    } else if ((Tcl_UniChar) ch == 0x0085 || (Tcl_UniChar) ch == 0x180e
	    || (Tcl_UniChar) ch == 0x200b || (Tcl_UniChar) ch == 0x2060
	    || (Tcl_UniChar) ch == 0xfeff) {
	return 1;
    } else {
	return ((SPACE_BITS >> GetCategory(ch)) & 1);
    }







|







1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
{
    /*
     * If the character is within the first 127 characters, just use the
     * standard C function, otherwise consult the Unicode table.
     */

    if (((Tcl_UniChar) ch) < ((Tcl_UniChar) 0x80)) {
	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) {
	return 1;
    } else {
	return ((SPACE_BITS >> GetCategory(ch)) & 1);
    }