webruby 0.2.7 → 0.9.1

data/modules/emscripten/system/lib/libc/musl/src/locale/legacychars.h

@@ -1,39 +0,0 @@
-0,1,160,167,168,169,175,176,178,183,184,198,215,216,230,247,248,256,257,258,
-259,260,261,262,263,264,265,266,267,268,269,270,271,272,273,274,275,278,279,
-280,281,282,283,284,285,286,287,288,289,290,291,292,293,294,295,296,297,298,
-299,302,303,304,305,308,309,310,311,312,313,314,315,316,317,318,321,322,323,
-324,325,326,327,328,330,331,332,333,336,337,338,339,340,341,342,343,344,345,
-346,347,348,349,350,351,352,353,354,355,356,357,358,359,360,361,362,363,364,
-365,366,367,368,369,370,371,372,373,374,375,376,377,378,379,380,381,382,402,
-416,417,431,432,536,537,538,539,710,711,728,729,731,732,733,768,769,771,777,
-803,890,900,901,902,904,905,906,908,910,911,912,913,914,915,916,917,918,919,
-920,921,922,923,924,925,926,927,928,929,931,932,933,934,935,936,937,938,939,
-940,941,942,943,944,945,946,947,948,949,950,951,952,953,954,955,956,957,958,
-959,960,961,962,963,964,965,966,967,968,969,970,971,972,973,974,1025,1026,
-1027,1028,1029,1030,1031,1032,1033,1034,1035,1036,1038,1039,1040,1041,1042,
-1043,1044,1045,1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,
-1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,1071,1072,
-1073,1074,1075,1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1086,1087,
-1088,1089,1090,1091,1092,1093,1094,1095,1096,1097,1098,1099,1100,1101,1102,
-1103,1105,1106,1107,1108,1109,1110,1111,1112,1113,1114,1115,1116,1118,1119,
-1168,1169,1456,1457,1458,1459,1460,1461,1462,1463,1464,1465,1467,1468,1469,
-1470,1471,1472,1473,1474,1475,1488,1489,1490,1491,1492,1493,1494,1495,1496,
-1497,1498,1499,1500,1501,1502,1503,1504,1505,1506,1507,1508,1509,1510,1511,
-1512,1513,1514,1520,1521,1522,1523,1524,1548,1563,1567,1569,1570,1571,1572,
-1573,1574,1575,1576,1577,1578,1579,1580,1581,1582,1583,1584,1585,1586,1587,
-1588,1589,1590,1591,1592,1593,1594,1600,1601,1602,1603,1604,1605,1606,1607,
-1608,1609,1610,1611,1612,1613,1614,1615,1616,1617,1618,1657,1662,1670,1672,
-1681,1688,1705,1711,1722,1726,1729,1746,3585,3586,3587,3588,3589,3590,3591,
-3592,3593,3594,3595,3596,3597,3598,3599,3600,3601,3602,3603,3604,3605,3606,
-3607,3608,3609,3610,3611,3612,3613,3614,3615,3616,3617,3618,3619,3620,3621,
-3622,3623,3624,3625,3626,3627,3628,3629,3630,3631,3632,3633,3634,3635,3636,
-3637,3638,3639,3640,3641,3642,3647,3648,3649,3650,3651,3652,3653,3654,3655,
-3656,3657,3658,3659,3660,3661,3662,3663,3664,3665,3666,3667,3668,3669,3670,
-3671,3672,3673,3674,3675,7682,7683,7690,7691,7710,7711,7744,7745,7766,7767,
-7776,7777,7786,7787,7808,7809,7810,7811,7812,7813,7922,7923,8204,8205,8206,
-8207,8211,8212,8213,8215,8216,8217,8218,8220,8221,8222,8224,8225,8226,8230,
-8240,8249,8250,8362,8363,8364,8367,8470,8482,8729,8730,8776,8804,8805,8992,
-8993,9472,9474,9484,9488,9492,9496,9500,9508,9516,9524,9532,9552,9553,9554,
-9555,9556,9557,9558,9559,9560,9561,9562,9563,9564,9565,9566,9567,9568,9569,
-9570,9571,9572,9573,9574,9575,9576,9577,9578,9579,9580,9600,9604,9608,9612,
-9616,9617,9618,9619,9632,

data/modules/emscripten/system/lib/libc/musl/src/locale/strfmon.c

@@ -1,101 +0,0 @@
-#include <stdio.h>
-#include <ctype.h>
-#include <stdarg.h>
-#include <monetary.h>
-#include <errno.h>
-#include <stdarg.h>
-
-static ssize_t vstrfmon_l(char *s, size_t n, locale_t loc, const char *fmt, va_list ap)
-{
-	size_t l;
-	double x;
-	int fill, nogrp, negpar, nosym, left, intl;
-	int lp, rp, w, fw;
-	char *s0=s;
-	for (; n && *fmt; ) {
-		if (*fmt != '%') {
-		literal:
-			*s++ = *fmt++;
-			n--;
-			continue;
-		}
-		fmt++;
-		if (*fmt == '%') goto literal;
-
-		fill = ' ';
-		nogrp = 0;
-		negpar = 0;
-		nosym = 0;
-		left = 0;
-		for (; ; fmt++) {
-			switch (*fmt) {
-			case '=':
-				fill = *++fmt;
-				continue;
-			case '^':
-				nogrp = 1;
-				continue;
-			case '(':
-				negpar = 1;
-			case '+':
-				continue;
-			case '!':
-				nosym = 1;
-				continue;
-			case '-':
-				left = 1;
-				continue;
-			}
-			break;
-		}
-
-		for (fw=0; isdigit(*fmt); fmt++)
-			fw = 10*fw + (*fmt-'0');
-		lp = 0;
-		rp = 2;
-		if (*fmt=='#') for (lp=0, fmt++; isdigit(*fmt); fmt++)
-			lp = 10*lp + (*fmt-'0');
-		if (*fmt=='.') for (rp=0, fmt++; isdigit(*fmt); fmt++)
-			rp = 10*rp + (*fmt-'0');
-
-		intl = *fmt++ == 'i';
-
-		w = lp + 1 + rp;
-		if (!left && fw>w) w = fw;
-
-		x = va_arg(ap, double);
-		l = snprintf(s, n, "%*.*f", w, rp, x);
-		if (l >= n) {
-			errno = E2BIG;
-			return -1;
-		}
-		s += l;
-		n -= l;
-	}
-	return s-s0;
-}
-
-ssize_t strfmon_l(char *restrict s, size_t n, locale_t loc, const char *restrict fmt, ...)
-{
-	va_list ap;
-	ssize_t ret;
-
-	va_start(ap, fmt);
-	ret = vstrfmon_l(s, n, loc, fmt, ap);
-	va_end(ap);
-
-	return ret;
-}
-
-
-ssize_t strfmon(char *restrict s, size_t n, const char *restrict fmt, ...)
-{
-	va_list ap;
-	ssize_t ret;
-
-	va_start(ap, fmt);
-	ret = vstrfmon_l(s, n, 0, fmt, ap);
-	va_end(ap);
-
-	return ret;
-}

data/modules/emscripten/system/lib/libc/musl/src/locale/strxfrm.c

@@ -1,18 +0,0 @@
-#include <string.h>
-#include <locale.h>
-#include "libc.h"
-
-/* collate only by code points */
-size_t __strxfrm_l(char *restrict dest, const char *restrict src, size_t n, locale_t loc)
-{
-	size_t l = strlen(src);
-	if (n > l) strcpy(dest, src);
-	return l;
-}
-
-size_t strxfrm(char *restrict dest, const char *restrict src, size_t n)
-{
-	return __strxfrm_l(dest, src, n, 0);
-}
-
-weak_alias(__strxfrm_l, strxfrm_l);

data/modules/emscripten/system/lib/libc/musl/src/locale/towctrans_l.c

@@ -1,6 +0,0 @@
-#include <wctype.h>
-
-wint_t towctrans_l(wint_t c, wctrans_t t, locale_t l)
-{
-	return towctrans(c, t);
-}

data/modules/emscripten/system/lib/libc/musl/src/locale/towlower_l.c

@@ -1,9 +0,0 @@
-#include <wctype.h>
-#include "libc.h"
-
-wint_t towlower_l(wint_t c, locale_t l)
-{
-	return towlower(c);
-}
-
-weak_alias(towlower_l, __towlower_l);

data/modules/emscripten/system/lib/libc/musl/src/locale/towupper_l.c

@@ -1,9 +0,0 @@
-#include <wctype.h>
-#include "libc.h"
-
-wint_t towupper_l(wint_t c, locale_t l)
-{
-	return towupper(c);
-}
-
-weak_alias(towupper_l, __towupper_l);

data/modules/emscripten/system/lib/libc/musl/src/locale/wcscoll.c

@@ -1,16 +0,0 @@
-#include <wchar.h>
-#include <locale.h>
-#include "libc.h"
-
-/* FIXME: stub */
-int __wcscoll_l(const wchar_t *l, const wchar_t *r, locale_t locale)
-{
-	return wcscmp(l, r);
-}
-
-int wcscoll(const wchar_t *l, const wchar_t *r)
-{
-	return __wcscoll_l(l, r, 0);
-}
-
-weak_alias(__wcscoll_l, wcscoll_l);

data/modules/emscripten/system/lib/libc/musl/src/locale/wcscoll_l.c

@@ -1,6 +0,0 @@
-#include <wchar.h>
-
-int wcscoll_l(const wchar_t *l, const wchar_t *r, locale_t locale)
-{
-	return wcscoll(l, r);
-}

data/modules/emscripten/system/lib/libc/musl/src/locale/wcsxfrm.c

@@ -1,21 +0,0 @@
-#include <wchar.h>
-#include <locale.h>
-#include "libc.h"
-
-/* collate only by code points */
-size_t __wcsxfrm_l(wchar_t *restrict dest, const wchar_t *restrict src, size_t n, locale_t loc)
-{
-	size_t l = wcslen(src);
-	if (l >= n) {
-		wmemcpy(dest, src, n-1);
-		dest[n-1] = 0;
-	} else wcscpy(dest, src);
-	return l;
-}
-
-size_t wcsxfrm(wchar_t *restrict dest, const wchar_t *restrict src, size_t n)
-{
-	return __wcsxfrm_l(dest, src, n, 0);
-}
-
-weak_alias(__wcsxfrm_l, wcsxfrm_l);

data/modules/emscripten/system/lib/libc/musl/src/locale/wcsxfrm_l.c

@@ -1,6 +0,0 @@
-#include <wchar.h>
-
-size_t wcsxfrm_l(wchar_t *restrict dest, const wchar_t *restrict src, size_t n, locale_t locale)
-{
-	return wcsxfrm(dest, src, n);
-}

data/modules/emscripten/system/lib/libc/musl/src/locale/wctrans_l.c

@@ -1,6 +0,0 @@
-#include <wctype.h>
-
-wctrans_t wctrans_l(const char *s, locale_t l)
-{
-	return wctrans(s);
-}

data/modules/emscripten/system/lib/libc/musl/src/locale/wctype_l.c

@@ -1,9 +0,0 @@
-#include <wctype.h>
-#include "libc.h"
-
-wctype_t wctype_l(const char *s, locale_t l)
-{
-	return wctype(s);
-}
-
-weak_alias(wctype_l, __wctype_l);

data/modules/emscripten/system/lib/libc/musl/src/multibyte/btowc.c

@@ -1,7 +0,0 @@
-#include <stdio.h>
-#include <wchar.h>
-
-wint_t btowc(int c)
-{
-	return c<128U ? c : EOF;
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/internal.c

@@ -1,38 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <inttypes.h>
-
-#include "internal.h"
-
-#define C(x) ( x<2 ? -1 : ( R(0x80,0xc0) | x ) )
-#define D(x) C((x+16))
-#define E(x) ( ( x==0 ? R(0xa0,0xc0) : \
-                 x==0xd ? R(0x80,0xa0) : \
-                 R(0x80,0xc0) ) \
-             | ( R(0x80,0xc0) >> 6 ) \
-             | x )
-#define F(x) ( ( x>=5 ? 0 : \
-                 x==0 ? R(0x90,0xc0) : \
-                 x==4 ? R(0x80,0xa0) : \
-                 R(0x80,0xc0) ) \
-             | ( R(0x80,0xc0) >> 6 ) \
-             | ( R(0x80,0xc0) >> 12 ) \
-             | x )
-
-const uint32_t bittab[] = {
-	              C(0x2),C(0x3),C(0x4),C(0x5),C(0x6),C(0x7),
-	C(0x8),C(0x9),C(0xa),C(0xb),C(0xc),C(0xd),C(0xe),C(0xf),
-	D(0x0),D(0x1),D(0x2),D(0x3),D(0x4),D(0x5),D(0x6),D(0x7),
-	D(0x8),D(0x9),D(0xa),D(0xb),D(0xc),D(0xd),D(0xe),D(0xf),
-	E(0x0),E(0x1),E(0x2),E(0x3),E(0x4),E(0x5),E(0x6),E(0x7),
-	E(0x8),E(0x9),E(0xa),E(0xb),E(0xc),E(0xd),E(0xe),E(0xf),
-	F(0x0),F(0x1),F(0x2),F(0x3),F(0x4)
-};
-
-#ifdef BROKEN_VISIBILITY
-__asm__(".hidden __fsmu8");
-#endif

data/modules/emscripten/system/lib/libc/musl/src/multibyte/internal.h

@@ -1,22 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#define bittab __fsmu8
-
-#include "libc.h"
-
-extern const uint32_t bittab[] ATTR_LIBC_VISIBILITY;
-
-/* Upper 6 state bits are a negative integer offset to bound-check next byte */
-/*    equivalent to: ( (b-0x80) | (b+offset) ) & ~0x3f      */
-#define OOB(c,b) (((((b)>>3)-0x10)|(((b)>>3)+((int32_t)(c)>>26))) & ~7)
-
-/* Interval [a,b). Either a must be 80 or b must be c0, lower 3 bits clear. */
-#define R(a,b) ((uint32_t)((a==0x80 ? 0x40-b : -a) << 23))
-#define FAILSTATE R(0x80,0x80)
-
-#define SA 0xc2u
-#define SB 0xf4u

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mblen.c

@@ -1,17 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-
-int mblen(const char *s, size_t n)
-{
-	return mbtowc(0, s, n);
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbrlen.c

@@ -1,18 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-
-size_t mbrlen(const char *restrict s, size_t n, mbstate_t *restrict st)
-{
-	static unsigned internal;
-	return mbrtowc(0, s, n, st ? st : (mbstate_t *)&internal);
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbrtowc.c

@@ -1,57 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-
-size_t mbrtowc(wchar_t *restrict wc, const char *restrict src, size_t n, mbstate_t *restrict st)
-{
-	static unsigned internal_state;
-	unsigned c;
-	const unsigned char *s = (const void *)src;
-	const unsigned N = n;
-
-	if (!st) st = (void *)&internal_state;
-	c = *(unsigned *)st;
-	
-	if (!s) {
-		if (c) goto ilseq;
-		return 0;
-	} else if (!wc) wc = (void *)&wc;
-
-	if (!n) return -2;
-	if (!c) {
-		if (*s < 0x80) return !!(*wc = *s);
-		if (*s-SA > SB-SA) goto ilseq;
-		c = bittab[*s++-SA]; n--;
-	}
-
-	if (n) {
-		if (OOB(c,*s)) goto ilseq;
-loop:
-		c = c<<6 | *s++-0x80; n--;
-		if (!(c&(1U<<31))) {
-			*(unsigned *)st = 0;
-			*wc = c;
-			return N-n;
-		}
-		if (n) {
-			if (*s-0x80u >= 0x40) goto ilseq;
-			goto loop;
-		}
-	}
-
-	*(unsigned *)st = c;
-	return -2;
-ilseq:
-	*(unsigned *)st = 0;
-	errno = EILSEQ;
-	return -1;
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbsinit.c

@@ -1,17 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-
-int mbsinit(const mbstate_t *st)
-{
-	return !st || !*(unsigned *)st;
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbsnrtowcs.c

@@ -1,65 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-#include <stdio.h>
-
-#include "internal.h"
-
-size_t mbsnrtowcs(wchar_t *restrict wcs, const char **restrict src, size_t n, size_t wn, mbstate_t *restrict st)
-{
-	size_t l, cnt=0, n2;
-	wchar_t *ws, wbuf[256];
-	const char *s = *src;
-
-	if (!wcs) ws = wbuf, wn = sizeof wbuf / sizeof *wbuf;
-	else ws = wcs;
-
-	/* making sure output buffer size is at most n/4 will ensure
-	 * that mbsrtowcs never reads more than n input bytes. thus
-	 * we can use mbsrtowcs as long as it's practical.. */
-
-	while ( s && wn && ( (n2=n/4)>=wn || n2>32 ) ) {
-		if (n2>=wn) n2=wn;
-		n -= n2;
-		l = mbsrtowcs(ws, &s, n2, st);
-		if (!(l+1)) {
-			cnt = l;
-			wn = 0;
-			break;
-		}
-		if (ws != wbuf) {
-			ws += l;
-			wn -= l;
-		}
-		cnt += l;
-	}
-	if (s) while (wn && n) {
-		l = mbrtowc(ws, s, n, st);
-		if (l+2<=2) {
-			if (!(l+1)) {
-				cnt = l;
-				break;
-			}
-			if (!l) {
-				s = 0;
-				break;
-			}
-			/* have to roll back partial character */
-			*(unsigned *)st = 0;
-			break;
-		}
-		s += l; n -= l;
-		/* safe - this loop runs fewer than sizeof(wbuf)/8 times */
-		ws++; wn--;
-		cnt++;
-	}
-	if (wcs) *src = s;
-	return cnt;
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbsrtowcs.c

@@ -1,100 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-
-size_t mbsrtowcs(wchar_t *restrict ws, const char **restrict src, size_t wn, mbstate_t *restrict st)
-{
-	const unsigned char *s = (const void *)*src;
-	size_t wn0 = wn;
-	unsigned c = 0;
-
-	if (st && (c = *(unsigned *)st)) {
-		if (ws) {
-			*(unsigned *)st = 0;
-			goto resume;
-		} else {
-			goto resume0;
-		}
-	}
-
-	if (!ws) for (;;) {
-		if (*s-1u < 0x7f && (uintptr_t)s%4 == 0) {
-			while (!(( *(uint32_t*)s | *(uint32_t*)s-0x01010101) & 0x80808080)) {
-				s += 4;
-				wn -= 4;
-			}
-		}
-		if (*s-1u < 0x7f) {
-			s++;
-			wn--;
-			continue;
-		}
-		if (*s-SA > SB-SA) break;
-		c = bittab[*s++-SA];
-resume0:
-		if (OOB(c,*s)) { s--; break; }
-		s++;
-		if (c&(1U<<25)) {
-			if (*s-0x80u >= 0x40) { s-=2; break; }
-			s++;
-			if (c&(1U<<19)) {
-				if (*s-0x80u >= 0x40) { s-=3; break; }
-				s++;
-			}
-		}
-		wn--;
-		c = 0;
-	} else for (;;) {
-		if (!wn) return wn0;
-		if (*s-1u < 0x7f && (uintptr_t)s%4 == 0) {
-			while (wn>=4 && !(( *(uint32_t*)s | *(uint32_t*)s-0x01010101) & 0x80808080)) {
-				*ws++ = *s++;
-				*ws++ = *s++;
-				*ws++ = *s++;
-				*ws++ = *s++;
-				wn -= 4;
-			}
-		}
-		if (*s-1u < 0x7f) {
-			*ws++ = *s++;
-			wn--;
-			continue;
-		}
-		if (*s-SA > SB-SA) break;
-		c = bittab[*s++-SA];
-resume:
-		if (OOB(c,*s)) { s--; break; }
-		c = (c<<6) | *s++-0x80;
-		if (c&(1U<<31)) {
-			if (*s-0x80u >= 0x40) { s-=2; break; }
-			c = (c<<6) | *s++-0x80;
-			if (c&(1U<<31)) {
-				if (*s-0x80u >= 0x40) { s-=3; break; }
-				c = (c<<6) | *s++-0x80;
-			}
-		}
-		*ws++ = c;
-		wn--;
-		c = 0;
-	}
-
-	if (!c && !*s) {
-		if (ws) {
-			*ws = 0;
-			*src = 0;
-		}
-		return wn0-wn;
-	}
-	errno = EILSEQ;
-	if (ws) *src = (const void *)s;
-	return -1;
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbstowcs.c

@@ -1,7 +0,0 @@
-#include <stdlib.h>
-#include <wchar.h>
-
-size_t mbstowcs(wchar_t *restrict ws, const char *restrict s, size_t wn)
-{
-	return mbsrtowcs(ws, (void*)&s, wn, 0);
-}

data/modules/emscripten/system/lib/libc/musl/src/multibyte/mbtowc.c

@@ -1,53 +0,0 @@
-/* 
- * This code was written by Rich Felker in 2010; no copyright is claimed.
- * This code is in the public domain. Attribution is appreciated but
- * unnecessary.
- */
-
-#include <stdlib.h>
-#include <inttypes.h>
-#include <wchar.h>
-#include <errno.h>
-
-#include "internal.h"
-#include <stdio.h>
-int mbtowc(wchar_t *restrict wc, const char *restrict src, size_t n)
-{
-	unsigned c;
-	const unsigned char *s = (const void *)src;
-
-	if (!s) return 0;
-	if (!n) goto ilseq;
-	if (!wc) wc = (void *)&wc;
-
-	if (*s < 0x80) return !!(*wc = *s);
-	if (*s-SA > SB-SA) goto ilseq;
-	c = bittab[*s++-SA];
-
-	/* Avoid excessive checks against n: If shifting the state n-1
-	 * times does not clear the high bit, then the value of n is
-	 * insufficient to read a character */
-	if (n<4 && ((c<<(6*n-6)) & (1U<<31))) goto ilseq;
-
-	if (OOB(c,*s)) goto ilseq;
-	c = c<<6 | *s++-0x80;
-	if (!(c&(1U<<31))) {
-		*wc = c;
-		return 2;
-	}
-
-	if (*s-0x80u >= 0x40) goto ilseq;
-	c = c<<6 | *s++-0x80;
-	if (!(c&(1U<<31))) {
-		*wc = c;
-		return 3;
-	}
-
-	if (*s-0x80u >= 0x40) goto ilseq;
-	*wc = c<<6 | *s++-0x80;
-	return 4;
-
-ilseq:
-	errno = EILSEQ;
-	return -1;
-}