Differences From Artifact [a8ffe9df20]:

• File generic/tclUtf.c — part of check-in [853c8b207f] at 2020-04-22 19:22:47 on branch dgp-27944a3661 — Place first-draft implementation of the proposed change to handling of trail bytes by Tcl_UtfNext on branch dgp-27944a3661 for examination. (user: dgp size: 52832)

To Artifact [d32185c5a9]:

• File generic/tclUtf.c — part of check-in [de68f922b4] at 2020-04-22 20:10:31 on branch dgp-27944a3661 — Adapt implementation and tests to vary behavior with TCL_UTF_MAX. (user: dgp size: 52865)

645
646
647
648
649
650
651


652


653
654
655
656
657
658
659

    CONST char *src)		/* The current location in the string. */
{
    int byte = *((unsigned char *) src);
    int left = totalBytes[byte];
    const char *next = src + 1;

    if (((*src) & 0xC0) == 0x80) {


        if ((((*++src) & 0xC0) == 0x80) && (((*++src) & 0xC0) == 0x80)) {


            ++src;
        }
        return src;
    }

    while (--left) {
	byte = *((unsigned char *) next);

>
>
|
>
>

645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663

    CONST char *src)		/* The current location in the string. */
{
    int byte = *((unsigned char *) src);
    int left = totalBytes[byte];
    const char *next = src + 1;

    if (((*src) & 0xC0) == 0x80) {
        if (
#if TCL_UTF_MAX > 3
		(((*++src) & 0xC0) == 0x80) && 
#endif
		(((*++src) & 0xC0) == 0x80)) {
            ++src;
        }
        return src;
    }

    while (--left) {
	byte = *((unsigned char *) next);