classes.struct.prettprint: Fix pprint-; rename

modern-harvey3
Doug Coleman 2019-10-20 14:20:00 -05:00
parent c4cd8991be
commit aa47ba1df7
1 changed files with 1 additions and 1 deletions

View File

@ -53,7 +53,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{ \ \} ;