История изменений
Исправление no-such-file, (текущая версия) :
Из твоих предыдущих сообщений это никак не следовало
Здрастье, приехали. Я про обычный loop из cl. Подробности в гиперспеке.
А если их больше одного
> (loop for i from 1 to 10
when (and (< i 8) (+ i 2))
when (and (> i 3) (+ i 1))
collect it)
(5 6 7 8)
> (loop for i from 1 to 10 when (and (< i 5) 1) collect it when (and (> i 5) 2) collect it)
(1 1 1 1 2 2 2 2 2)
> (loop for i from 1 to 10 when (and (< i 8) 1) collect it when (and (> i 2) 2) collect it)
(1 1 1 2 1 2 1 2 1 2 1 2 2 2 2)
Улавливаешь?
Исходная версия no-such-file, :
Из твоих предыдущих сообщений это никак не следовало
Здрастье, приехали. Я про обычный loop из cl. Подробности в гиперспеке.
А если их больше одного
> (loop for i from 1 to 10
when (and (< i 8) (+ i 2))
when (and (> i 3) (+ i 1))
collect it)
(5 6 7 8)
> (loop for i from 1 to 10 when (and (< i 5) 1) collect it when (and (> i 5) 2) collect it)
(1 1 1 1 2 2 2 2 2)
Улавливаешь?