Hi,
I propose a new test case, which unfortunately fails right now...
(deftest values.previous (equal (iter (repeat 3) (for (values a b) = (floor 5 2)) (for p-a previous a) (for p-b previous b) (collect (list a b p-a p-b))) '((2 1 nil nil) (2 1 2 1) (2 1 2 1))) T)
Just wanted to let you know that I was stumbling over this as a user - I probably could not fix it myself....
Cheers, Kilian
Bug confirmed, thank you very much.
VALUES is not involved, the bug is also triggered via (for (a b) = (list 2 1))
(deftest values.previous (equal (iter '((2 1 nil nil) (2 1 2 1) (2 1 2 1))) T)
Why didn't you write (deftest value.previous (iter #) ((2 1 nil nil) ...)) ? RT/DEFTEST output would then be more informative.
Regards, Jorg Hohle.
-
Hoehle, Joerg-Cyril -
Kilian Sprotte