LINUX.ORG.RU

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

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

(block nil
  (tagbody
    #:start
    ... (return result)
    ... (go #:start)))

Можно сделать сильно проще:

(loop
  ... (return result))

Сейчас оттестю и напишу целиком.

Исходная версия naryl, :

(block nil (tagbody #:start ... (return result) ... (go #:start)))

Можно сделать сильно проще: (loop ... (return result))

Сейчас оттестю и напишу целиком.