Search found 1 match
- Sat May 26, 2012 3:01 pm
- Forum: Common Lisp
- Topic: Should be a lambda expression
- Replies: 1
- Views: 5280
Should be a lambda expression
Here is the function causing problems: (defun equalprev (x y) (cond ((or (atom x) (atom y)) (if (not(null isLoop)) t ((setq list1 (append list1 (list x))) (setq list2 (append list2 (list y))) (eql x y)) ) ) ((equalprev (car x) (car y)) (equalprev (cdr x) (cdr y)) ) ) ) ERROR: *** - SYSTEM::%EXPAND-F...