Check overflow in integer literals

Make this: >> 9'999'999'999'999'999'999 == 9223372036854775807 become: >> 9'999'999'999'999'999'999 ** Syntax error: invalid "integer" -- "9'999'999'999'999'999'999" ** Near: (line 1) 9'999'999'999'999'999'999 zsx#8
earl · Aug 20, 2014 · 2306206 · 2306206
1 parent 9876dc7
commit 2306206
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/core/l-types.c b/src/core/l-types.c
@@ -335,7 +335,9 @@ bad_hex:	Trap0(RE_INVALID_CHARS);
 	if (len > 19) return 0;
 
 	// Convert, check, and return:
+	errno = 0;
 	n = CHR_TO_INT(buf);
+	if (errno != 0) return 0; //overflow
 	if ((n > 0 && neg) || (n < 0 && !neg)) return 0;
 	SET_INTEGER(value, n);
 	return cp;