Differences From Artifact [6bc82beea3]:

• File generic/tclUtf.c — part of check-in [8aa5fcb56e] at 2020-05-12 07:26:16 on branch bug-ed29806baf-8.6 — Fix "knownBug" utf-4.11. Turns out a few other testcases where still not correct, now they are. Make next/prev behavior the same for all TCL_UTF_MAX values, since the exact behavior for TCL_UTF_MAX>3 should be worked out further for Tcl 8.7 first, then everything agreed upon can be backported. (user: jan.nijtmans size: 61680)

To Artifact [c2b8a025c1]:

• File generic/tclUtf.c — part of check-in [b5d4bf440b] at 2020-05-12 11:08:43 on branch bug-ed29806baf-8.6 — Merge testcase cleanup. Make Tcl_UtfPrev() behave the same for any TCL_UTF_MAX value, since we didn't figure out yet how it should behave for TCL_UTF_MAX>3. (user: jan.nijtmans size: 61613) [more...]

883
884
885
886
887
888
889
890
891
892
893
894

895
896
897
898
899
900
901
902

	}

	/* Continue the search backwards... */
	look--;
    } while (trailBytesSeen < 3);

    /*
     * We've seen 3 (or 4) trail bytes, so we know there will not be a
     * properly formed byte sequence to find, and we can stop looking,
     * accepting the fallback (for TCL_UTF_MAX > 4) or just go back as
     * far as we can.
     */

    return src - 3;
}

/*
 *---------------------------------------------------------------------------
 *
 * Tcl_UniCharAtIndex --
 *

|

|
<

>
|

883
884
885
886
887
888
889
890
891
892

893
894
895
896
897
898
899
900
901
902

	}

	/* Continue the search backwards... */
	look--;
    } while (trailBytesSeen < 3);

    /*
     * We've seen 3 trail bytes, so we know there will not be a
     * properly formed byte sequence to find, and we can stop looking,
     * accepting the fallback.

     */

    return fallback;
}

/*
 *---------------------------------------------------------------------------
 *
 * Tcl_UniCharAtIndex --
 *