From 2a907f8290adb7507ffe1bacab5a475a85747f8a Mon Sep 17 00:00:00 2001 From: Calvin Rose Date: Thu, 6 Sep 2018 14:12:10 -0400 Subject: [PATCH] Fix number parsing. --- src/core/strtod.c | 1 + src/core/vm.c | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/src/core/strtod.c b/src/core/strtod.c index 1b781ff1..76028181 100644 --- a/src/core/strtod.c +++ b/src/core/strtod.c @@ -199,6 +199,7 @@ static struct JanetScanRes janet_scan_impl( res.foundexp = 1; break; } else if (!gotradix && (*str == 'x' || *str == 'X')) { + if (!seenadigit) goto error; if (res.seenpoint || res.mant > 0) goto error; res.base = 16; res.mant = 0; diff --git a/src/core/vm.c b/src/core/vm.c index 11f95c30..4aa2e2fa 100644 --- a/src/core/vm.c +++ b/src/core/vm.c @@ -1333,7 +1333,7 @@ int janet_init(void) { * a collection pretty much every cycle, which is * incredibly horrible for performance, but can help ensure * there are no memory bugs during development */ - janet_vm_gc_interval = 0x10000; + janet_vm_gc_interval = 0x1000000; janet_symcache_init(); /* Initialize gc roots */ janet_vm_roots = NULL;