replace undefined function

test/test1.lisp

@@ -10,6 +10,6 @@
 (CDR (CONS (QUOTE A) (CONS (QUOTE B) NIL)))
 (COND ((QUOTE T) (QUOTE A)))
 (COND ((QUOTE NIL) (QUOTE A)) ((QUOTE T) (QUOTE B)))
-(LAMBDA (Z) Z)
+((LAMBDA (Z) Z) (QUOTE ZZZ))
 ((LAMBDA (Z) (CAR Z)) (CONS (QUOTE A) (QUOTE B)))