 prettyprint.config splitting classes continuations
 accessors sets vocabs.parser combinators vocabs
 classes.maybe ;
+FROM: sets => members ;
 FROM: namespaces => set ;
 IN: prettyprint.sections
 

: make-pprint ( obj quot -- block manifest )
    [
        0 position ,,
        H{ } clone pprinter-use ,,
        V{ } clone recursion-check ,,
        V{ } clone pprinter-stack ,,
    ] H{ } make [


: pprinter-manifest ( -- manifest )
    <manifest>
    [ [ pprinter-use get members >vector ] dip search-vocabs<< ]
    [ [ pprinter-in get ] dip current-vocab<< ]
    [ ]
    tri ;
