LINUX.ORG.RU

История изменений

Исправление kim-roader, (текущая версия) :

Проверил в sbcl 1.2.2 дебиановской сборки:

* `#(1 2 3 ,@(loop repeat 3 collect 1))

#(1 2 3 (1 1 1))
* `(1 2 3 ,@(loop repeat 3 collect 1))

(1 2 3 1 1 1)

В clisp 2.49

[1]> `#(1 2 3 ,@(loop repeat 3 collect 1))
#(1 2 3 1 1 1)

И, для полноты картины, gcl 2.6.11

> `#(1 2 3 ,@(loop repeat 3 collect 1))

#(1 2 3 1 1 1)

Исходная версия kim-roader, :

Проверил в sbcl 1.2.2 дебиановской сборки:

* `#(1 2 3 ,@(loop repeat 3 collect 1))

#(1 2 3 (1 1 1))

В clisp 2.49

[1]> `#(1 2 3 ,@(loop repeat 3 collect 1))
#(1 2 3 1 1 1)

И, для полноты картины, gcl 2.6.11

> `#(1 2 3 ,@(loop repeat 3 collect 1))

#(1 2 3 1 1 1)