rebirth: Recognize numbers with decimal points

* build-aux/bootstrap/rebirth.scm (tname-verbatim?): Recognize `.' alongside digits.
master
Mike Gerwitz 2018-09-10 20:41:18 -04:00
parent b9f8e24ec2
commit 0559d3a73b
Signed by: mikegerwitz
GPG Key ID: 8C917B7F5DC51BA2
1 changed files with 1 additions and 1 deletions

View File

@ -300,7 +300,7 @@
;; ;;
;; This only returns #t for numbers. ;; This only returns #t for numbers.
(define (tname-verbatim? name) (define (tname-verbatim? name)
(es:match (es:regexp "^\\d+$") name)) (es:match (es:regexp "^-?\\d+(\.\\d+)?$") name))
;; Generate ECMAScript to reference the variable associated with the token T ;; Generate ECMAScript to reference the variable associated with the token T