fix pretty-print bug for transparent structs that span lines
This commit is contained in:
parent
625c35f892
commit
0b9370bc5e
|
@ -910,7 +910,7 @@
|
|||
(when pf? (out "s")))
|
||||
(pp-list (let ([l (vector->list v)])
|
||||
(if (and qd (not pf?))
|
||||
(cons (make-unquoted (object-name v))
|
||||
(cons (make-unquoted (object-name obj))
|
||||
(cdr l))
|
||||
l))
|
||||
extra pp-expr #f depth
|
||||
|
|
Loading…
Reference in New Issue
Block a user