Deftransform for FORMAT does not accept non-simple strings

Bug #1747520 reported by Paul F. Dietz on 2018-02-05
6
This bug affects 1 person
Affects Status Importance Assigned to Milestone
SBCL
Undecided
Unassigned

Bug Description

 (compile nil '(lambda () (format nil #.(make-array '(1) :element-type 'character :initial-element #\B :fill-pointer 1))))

==>

The value
  "B"
is not of type
  SIMPLE-STRING
when binding STRING
   [Condition of type TYPE-ERROR]
[...]
  0: (SB-FORMAT::TOKENIZE-CONTROL-STRING "B") [external]
  1: ((SB-C:DEFTRANSFORM FORMAT) #<SB-C::COMBINATION :FUN #<SB-C::REF :LEAF #<SB-C::GLOBAL-VAR :%SOURCE-NAME FORMAT :TYPE #1=#<SB-KERNEL:FUN-TYPE #> :DEFINED-TYPE #1# :WHERE-FROM :DECLARED :KIND :GLOBAL-F..
  2: (SB-C::IR1-TRANSFORM #<SB-C::COMBINATION :FUN #<SB-C::REF :LEAF #<SB-C::GLOBAL-VAR :%SOURCE-NAME FORMAT :TYPE #1=#<SB-KERNEL:FUN-TYPE #> :DEFINED-TYPE #1# :WHERE-FROM :DECLARED :KIND :GLOBAL-FUNCTION..
[...]

Stas Boukarev (stassats) wrote :

8b79f7d10e5e6e0a029b2cb01d85bb19d4f00f15

Changed in sbcl:
status: New → Fix Committed
To post a comment you must log in.
This report contains Public information  Edit
Everyone can see this information.

Other bug subscribers