GrammaTech /sel
Programmatic modification and evaluation of software
source-id=321 version=257 project-id=321 project-version=0
| Type | GITHUB |
|---|---|
| Created at | 2025-08-14 23:12:27 UTC |
| Source | https://github.com/GrammaTech/sel |
| Branch or tag | master |
| Last seen commit | 8d444dab9705b3efc2dee9086a740b84e205478c |
| Release | http://dist.ultralisp.org/archive/321/GrammaTech-sel-20250814231219.tgz |
| Systems |
|
| Distributions | ultralisp |
| Last check | Finished 1 hour 25 minutes ago. There
was an
Check ErrorTraceback (most recent call last):
0 File "/tmp/checker/qlot/.qlot/dists/quicklisp/software/alexandria-20241012-git/alexandria-1/definitions.lisp", line 2
In alexandria::%reevaluate-constant
Args (+unicode-a0-bf-to-cp1251+ #(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172 173 174 nil 176 177 nil
nil nil 181 182 183 nil nil nil 187 nil nil nil nil) #<function equalp>)
1 File "unknown"
In sb-int:simple-eval-in-lexenv
Args ((alexandria::%reevaluate-constant '+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil
171 172 173 174 nil 176 177 nil nil nil 181
182 183 nil nil nil 187 nil nil nil nil)
#'equalp) #<NULL-LEXENV>)
2 File "unknown"
In sb-int:simple-eval-in-lexenv
Args ((sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location)) #<NULL-LEXENV>)
3 File "unknown"
In sb-int:simple-eval-in-lexenv
Args ((progn
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))) #<NULL-LEXENV>)
4 File "unknown"
In sb-ext:eval-tlf
Args ((progn
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))) 3 #<NULL-LEXENV>)
5 File "unknown"
In (flet sb-c::frob :in sb-c::eval-compile-toplevel)
Args ()
6 File "unknown"
In sb-c::eval-compile-toplevel
Args (((sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))) ((sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))
(eval-when (:compile-toplevel :load-toplevel :execute)
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171
172 173 174 nil 176 177 nil nil nil 181 182 183
nil nil nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location)))
(defconstant +unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant '+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169
nil 171 172 173 174 nil 176 177 nil nil
nil 181 182 183 nil nil nil 187 nil nil
nil nil)
#'equalp))
sb-c::original-source-start 0 3))
7 File "unknown"
In sb-c::process-toplevel-form
Args ((sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location)) ((eval-when (:compile-toplevel :load-toplevel :execute)
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171
172 173 174 nil 176 177 nil nil nil 181 182 183
nil nil nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location)))
(defconstant +unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant '+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169
nil 171 172 173 174 nil 176 177 nil nil
nil 181 182 183 nil nil nil 187 nil nil
nil nil)
#'equalp))
sb-c::original-source-start 0 3) (:compile-toplevel))
8 File "unknown"
In sb-c::process-toplevel-progn
Args (((sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))) ((eval-when (:compile-toplevel :load-toplevel :execute)
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171
172 173 174 nil 176 177 nil nil nil 181 182 183
nil nil nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location)))
(defconstant +unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant '+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169
nil 171 172 173 174 nil 176 177 nil nil
nil 181 182 183 nil nil nil 187 nil nil
nil nil)
#'equalp))
sb-c::original-source-start 0 3) (:compile-toplevel))
9 File "unknown"
In sb-c::process-toplevel-form
Args ((eval-when (:compile-toplevel :load-toplevel :execute)
(sb-impl::%defconstant '+unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant
'+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
#'equalp)
(sb-c:source-location))) ((defconstant +unicode-a0-bf-to-cp1251+
(alexandria::%reevaluate-constant '+unicode-a0-bf-to-cp1251+
#(160 nil nil nil 164 nil 166 167 nil 169
nil 171 172 173 174 nil 176 177 nil nil
nil 181 182 183 nil nil nil 187 nil nil
nil nil)
#'equalp))
sb-c::original-source-start 0 3) nil)
Condition simple-error: +unicode-a0-bf-to-cp1251+ is an already defined
constant whose value
#(160 0 0 0 164 0 166 167 0 169 0 171 172 173 174 0 176
177 0 0 0 181 182 183 0 0 0 187 0 0 0 0)
is not equal to the provided initial value
#(160 nil nil nil 164 nil 166 167 nil 169 nil 171 172
173 174 nil 176 177 nil nil nil 181 182 183 nil nil
nil 187 nil nil nil nil)
under #<function equalp>.
|