Skip to content
Snippets Groups Projects
Commit e5677433 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

Merge branch 'number-token' into 'master'

Add test for numbers without digits

See merge request !14
parents 4466ba32 aa555878
No related branches found
No related tags found
No related merge requests found
......@@ -59,6 +59,11 @@
(list (list type s n)))))
nil)
;;; All numbers must contain at least one digit (see CLHS 2.3.1)
(def-syntax-test syntax.number-token.5
(values (eql (read-from-string "-.") (intern "-."))
(eql (read-from-string "+.") (intern "+.")))
t t)
;;; Dot tokens
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment