SA
я ж не оформлял это как либу
Size: a a a
2020 October 17
SA
кто вдруг решит что это не игрушка на 5 минут welocme
VL
так
VL
(defconstant +alien-w+
(make-array 3 :element-type '(unsigned-byte 8) :initial-contents '(14 13 45)))
VL
есть такая форма
VL
вроде ничего особенного
VL
но sbcl ругается
VL
говорит
The constant SIMPLE-ASTEROIDS::+ALIEN-W+ is being redefined
(from #(14 13 45) to #(14 13 45))
The constant SIMPLE-ASTEROIDS::+ALIEN-W+ is being redefined
(from #(14 13 45) to #(14 13 45))
VL
это как понимать
λ
(defconstant +alien-w+
(make-array 3 :element-type '(unsigned-byte 8) :initial-contents '(14 13 45)))
забавно
λ
в ECL норм
λ
(defconstant +alien-w+
(make-array 3 :element-type '(unsigned-byte 8) :initial-contents '(14 13 45)))
и в sbcl норм
λ
говорит
The constant SIMPLE-ASTEROIDS::+ALIEN-W+ is being redefined
(from #(14 13 45) to #(14 13 45))
The constant SIMPLE-ASTEROIDS::+ALIEN-W+ is being redefined
(from #(14 13 45) to #(14 13 45))
ты пере определяешь константу, пере запусти банку
VL
ты пере определяешь константу, пере запусти банку
да нет, вроде свежо все
λ
да нет, вроде свежо все
ну в ошибке, что ты кинул, ясно же )
λ
The constant SIMPLE-ASTEROIDS::+ALIEN-W+ is being redefined
VL
я понял
VL
но
VL
я ничего не переопределяю)
VL
сделал просто (ql:quickload "simple-asteroids")