diff --git a/extra/lisp/lisp-tests.factor b/extra/lisp/lisp-tests.factor
index a3db32c915..6266693571 100644
--- 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
-  
-  
\ No newline at end of file
+! Copyright (C) 2008 James Cash
+! See http://factorcode.org/license.txt for BSD license.
+USING: lisp tools.test ;
+
+IN: lisp.tests
\ No newline at end of file