FIX: tinny code optimization

related to: Oldes/Rebol-issues#2504

Author: Oldes

src/core/l-types.c

@@ -365,11 +365,11 @@ bad_hex:	Trap0(RE_INVALID_CHARS);
 	}
 	*bp = 0;
 
-	// Too many digits?
+	// Count number of digits
 	len = (REBCNT)(bp - &buf[0]);
 	if (neg) len--;
-	if (len > 19) return 0;
 	if (len > 0) {
+		if (len > 19) return 0; // Too many digits
 		// Convert, check, and return:
 		errno = 0;
 		n = CHR_TO_INT(buf);

src/tests/units/make-test.r3

@@ -103,6 +103,13 @@ Rebol [
 	 	--assert 0 = to integer! "0"
 	 	--assert 0 = to integer! "00"
 	 	--assert 0 = to integer! "00000000000"
+	 	--assert 0 = to integer! "-0"
+	 	--assert 0 = to integer! "-00"
+	 	--assert 0 = to integer! "-00000000000"
+	 	--assert 0 = to integer! "+0"
+	 	--assert 0 = to integer! "+00"
+	 	--assert 0 = to integer! "+00000000000"
+	 	--assert 0 = to integer! "000'000'000"
 
 ===end-group===