Search found 2 matches
- Wed Nov 25, 2009 6:08 pm
- Forum: Common Lisp
- Topic: List with unexpected values!?
- Replies: 3
- Views: 5118
Re: List with unexpected values!?
Trying to simplify the problem... This: (print l) (loop for y below m do (loop for x below n do (when(zerop(coord x y table)) (setf v (gennum x y l out)) (put v x y out) (push v l))) (print v) (print l)) Outputs: (1 8 2 9 6) 7 (7 8 2 0 9 0 6 NIL NIL NIL) 3 (3 0 1 NIL 2 0 NIL 7 6 NIL) 7 (7 NIL NIL NI...
- Tue Nov 24, 2009 10:19 pm
- Forum: Common Lisp
- Topic: List with unexpected values!?
- Replies: 3
- Views: 5118
List with unexpected values!?
Why is my gennum function attaching it's return value l? I've commented everything inside gennum, just left a return value.
Code: Select all
(loop for y below m do
(loop for x below n do
(when(zerop(coord x y table))
(print l)
(unless(setf v([b]gennum[/b] x y [b]l[/b] out))
(return-from alpha nil)))))