IN: vocabs.prettyprint
: pprint-vocab ( vocab -- )
- [ vocab-name ] [ vocab vocab-style ] bi styled-text ;
+ [ vocab-name ] [ lookup-vocab vocab-style ] bi styled-text ;
: pprint-in ( vocab -- )
[ \ IN: pprint-word pprint-vocab ] with-pprint ;
[ vocab-name ] sort-with ;
: pprint-using ( seq -- )
- [ "syntax" vocab = not ] filter
+ [ "syntax" lookup-vocab = ] reject
sort-vocabs [
\ USING: pprint-word
[ pprint-vocab ] each
] with-pprint ;
: filter-interesting ( seq -- seq' )
- [ [ vocab? ] [ extra-words? ] bi or not ] filter ;
+ [ [ vocab? ] [ extra-words? ] bi or ] reject ;
PRIVATE>
{ inset { 5 5 } }
} [ manifest get pprint-manifest ] with-nesting
nl nl
-] print-use-hook set-global
\ No newline at end of file
+] print-use-hook set-global