From f85189bcdd2735a21ea60a252ac44900cdd87879 Mon Sep 17 00:00:00 2001 From: Stefan Fehrenbach Date: Mon, 20 Feb 2012 16:26:15 +0100 Subject: [PATCH] Remove octal literals misfeature --- src/julia-parser.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/julia-parser.scm b/src/julia-parser.scm index e816b00358f24..d03a32df01a54 100644 --- a/src/julia-parser.scm +++ b/src/julia-parser.scm @@ -177,7 +177,7 @@ (read-digs) (disallow #\.))) (let* ((s (get-output-string str)) - (n (string->number s))) + (n (string->number s (if (eq? pred char-hex?) 16 10)))) (if n (if (eq? pred char-hex?) (sized-uint-literal n s)