classes.struct.prettyprint: fix pprint-;
parent
6b8d0daf04
commit
28ed878543
|
@ -52,7 +52,7 @@ PRIVATE>
|
||||||
M: struct-class see-class*
|
M: struct-class see-class*
|
||||||
<colon dup struct-definer-word pprint-word dup pprint-word
|
<colon dup struct-definer-word pprint-word dup pprint-word
|
||||||
<block struct-slots [ pprint-struct-slot ] each
|
<block struct-slots [ pprint-struct-slot ] each
|
||||||
block> pprint-; block> ;
|
block> pprint-semi block> ;
|
||||||
|
|
||||||
M: struct pprint-delims
|
M: struct pprint-delims
|
||||||
drop \ S{ \ } ;
|
drop \ S{ \ } ;
|
||||||
|
|
Loading…
Reference in New Issue