From ea1ad5ac34565f67e7bff0dda39b515a3362e1e4 Mon Sep 17 00:00:00 2001
From: James Cash <james.nvc@gmail.com>
Date: Tue, 10 Jun 2008 01:44:38 -0400
Subject: [PATCH] Adding fix to lisp.parser to allow lisp-exprs to be atoms
---
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 1e37193d3a..8fadb00e65 100644
--- a/extra/lisp/parser/parser.factor
+++ b/extra/lisp/parser/parser.factor
@@ -34,6 +34,6 @@ string = dquote ( escaped | !(dquote) . )* dquote => [[ second >string ]]
atom = number
| identifier
| string
-list-item = _ ( atom | s-expression ) _ => [[ second ]]
s-expression = LPAREN (list-item)* RPAREN => [[ second seq>cons ]]
+list-item = _ ( atom | s-expression ) _ => [[ second ]]
;EBNF
\ No newline at end of file