From a033091b44b60774af70541bbd23fa22bb84e5ca Mon Sep 17 00:00:00 2001
From: James Cash <james.nvc@gmail.com>
Date: Thu, 17 Apr 2008 12:37:31 -0400
Subject: [PATCH] Starting work on EBNF for lisp

---
 extra/lisp/lisp.factor | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/extra/lisp/lisp.factor b/extra/lisp/lisp.factor
index c604a35b1b..e051241a32 100644
--- a/extra/lisp/lisp.factor
+++ b/extra/lisp/lisp.factor
@@ -1,4 +1,8 @@
 ! Copyright (C) 2008 James Cash
 ! See http://factorcode.org/license.txt for BSD license.
+USING: kernel peg.ebnf peg.expr ;
+IN: lisp
 
-IN: lisp
\ No newline at end of file
+EBNF: expr
+list  = "(" ( atom | list )* ")"   =>  [[ second 1array ]]
+;EBNF
\ No newline at end of file