deftransform error on LENGTH and MAKE--SEQUENCE of (STRING *)
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
Fix Released
|
Undecided
|
Unassigned |
Bug Description
;; Note that this is valid code!
(compile nil '(lambda () (length (make-sequence '(string *) 10 :initial-element #\a))))
==>
The value
*
is not of type
LIST
[Condition of type TYPE-ERROR]
Restarts:
0: [RETRY] Retry SLIME REPL evaluation request.
1: [*ABORT] Return to SLIME's top level.
2: [ABORT] abort thread (#<THREAD "new-repl-thread" RUNNING {101675CC43}>)
Backtrace:
0: ((SB-C:DEFTRANSFORM SB-C::VECTOR-
1: (SB-C::
2: (SB-C::IR1-OPTIMIZE #<SB-C:COMPONENT :NAME (LAMBDA NIL) :REANALYZE T {1016E84773}> NIL)
3: (SB-C::
4: (SB-C::
5: (SB-C::IR1-PHASES #<SB-C:COMPONENT :NAME (LAMBDA NIL) :REANALYZE T {1016E84773}>)
6: (SB-C::
7: (SB-C::%COMPILE (LAMBDA NIL (LENGTH (MAKE-SEQUENCE # 10 :INITIAL-ELEMENT #\a))) #<SB-C::CORE-OBJECT {1016E810F3}> :NAME NIL :PATH (SB-C::
Changed in sbcl: | |
status: | New → Fix Committed |
Changed in sbcl: | |
status: | Fix Committed → Fix Released |