Starting tests for lisp

2008-04-27 23:12:52 -04:00 · 2008-04-27 23:12:52 -04:00 · f02ca2284c
parent 5d689e732d
commit f02ca2284c
1 changed files with 5 additions and 4 deletions
--- a/extra/lisp/lisp-tests.factor
+++ b/extra/lisp/lisp-tests.factor
@ -1,4 +1,5 @@
-[ [ T{ lisp-symbol f "foo" } [ 2 T{ lisp-symbol f "bar" } ] [ 3 4 T{ lisp-symbol f "baz" } ] if ] ]
-  [ "(if foo (bar 2) (baz 3 4))" lisp-expr parse-result-ast convert-if ] unit-test
-  
-  
+! Copyright (C) 2008 James Cash
+! See http://factorcode.org/license.txt for BSD license.
+USING: lisp tools.test ;
+
+IN: lisp.tests