Fix several newly introduced bugs in the migration to mutable strings

[jscl.git] / tests / eval.lisp

diff --git a/tests/eval.lisp b/tests/eval.lisp
index 9a0e50c..f17414a 100644 (file)
--- a/tests/eval.lisp
+++ b/tests/eval.lisp
@@ -1 +1,5 @@
+(print "<<<")
+(print (find 'a '((b) (c) (a)) :key #'car))
+(print ">>>")
+
 (test (= (eval '(+ 1 2)) 3))