75 |
(classify-error |
(classify-error |
76 |
(loop for x on '(a b c) |
(loop for x on '(a b c) |
77 |
for x on '(d e f) collect x)) |
for x on '(d e f) collect x)) |
78 |
programm-error) |
program-error) |
79 |
|
|
80 |
(deftest loop.3.15 |
(deftest loop.3.15 |
81 |
(classify-error |
(classify-error |
82 |
(loop for (x . x) on '((a b) (c d)) collect x)) |
(loop for (x . x) on '((a b) (c d)) collect x)) |
83 |
programm-error) |
program-error) |
84 |
|
|
85 |
(deftest loop.3.16 |
(deftest loop.3.16 |
86 |
(loop for nil on nil do (return t)) |
(loop for nil on nil do (return t)) |