From a2e1ad28142fe42f6e3bb788237320e505a934d5 Mon Sep 17 00:00:00 2001 From: James Cash Date: Sun, 18 May 2008 11:58:32 -0400 Subject: [PATCH] Allowing identifiers to begin with '#' --- extra/lisp/parser/parser.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/lisp/parser/parser.factor b/extra/lisp/parser/parser.factor index 32886f9367..44c79fd962 100644 --- a/extra/lisp/parser/parser.factor +++ b/extra/lisp/parser/parser.factor @@ -24,7 +24,7 @@ rational = integer "/" (digit)+ => [[ first3 nip string number = float | rational | integer -id-specials = "!" | "$" | "%" | "&" | "*" | "/" | ":" | "<" +id-specials = "!" | "$" | "%" | "&" | "*" | "/" | ":" | "<" | "#" | " =" | ">" | "?" | "^" | "_" | "~" | "+" | "-" | "." | "@" letters = [a-zA-Z] => [[ 1array >string ]] initials = letters | id-specials