added macros, temporarily removed some error checks

1 files changed, 0 insertions, 7 deletions

diff --git a/test/tests.lisp b/test/tests.lisp
index e51aad2..8b00817 100644
--- a/test/tests.lisp
+++ b/test/tests.lisp
@@ -16,13 +16,6 @@
       (:string new-file)
       (:file (pathname new-file)))))
 
-(defun lex-stream (str)
-  (iter outer
-        (for line = (read-line str nil nil))
-        (until (null line))
-        (for line-num from 1)
-        (appending (lex-line line line-num))))
-
 (defun read-form-comment (str)
   (read-from-string 
    (format nil "~{~a~^~%~}"