vocabs.prettyprint: lookup syntax vocab only once in pprint-using.
parent
bcc78ab220
commit
8a4a86db64
|
@ -19,7 +19,7 @@ IN: vocabs.prettyprint
|
|||
[ vocab-name ] sort-with ;
|
||||
|
||||
: pprint-using ( seq -- )
|
||||
[ "syntax" lookup-vocab = ] reject
|
||||
"syntax" lookup-vocab '[ _ = ] reject
|
||||
sort-vocabs [
|
||||
\ USING: pprint-word
|
||||
[ pprint-vocab ] each
|
||||
|
|
Loading…
Reference in New Issue