mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 15:43:01 +00:00
Code Issues 1 Releases Wiki Activity

Make number syntax a bit stricter - no leading underscores

Browse Source 
and no underscores in exponent.
This commit is contained in:
Calvin Rose
2019-01-03 12:13:14 -05:00
parent ddba0010b0
commit dd3fc24a1e
1 changed files with 3 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/core/strtod.c
View File

@@ -308,8 +308,9 @@ int janet_scan_number(
} else if (base == 10 && (*str == 'E' || *str == 'e')) {
foundexp = 1;
break;
} else if (*str != '_') {
/* underscores are ignored - can be used for separator */
} else if (*str == '_') {
if (!seenadigit) goto error;
} else {
int digit = digit_lookup[*str & 0x7F];
if (*str > 127 || digit >= base) goto error;
if (seenpoint) ex--;
@@ -342,10 +343,6 @@ int janet_scan_number(
}
while (str < end && ee < (INT32_MAX / 40)) {
int digit = digit_lookup[*str & 0x7F];
if (*str == '_') {
str++;
continue;
}
if (*str > 127 || digit >= base) goto error;
ee = base * ee + digit;
str++;