> > 7>) PREHASH:FIX ATM (EXP-MACROS ,EXPAND-FLAG)) .EXP-MACROS > > ATOM> > <==? .ATM LVAL>> >> ATOM>> .ATM>> ) (<==? > MANIFEST> >>) ( <+ .POS ,ONE-IN-LH>>>)>)> >) (,PSTRING <+ .POS ,ONE-IN-LH>>>) (,PLIST <+ .POS ,ONE-IN-LH>>>) (,PRECORD >> <==? > MANIFEST>> >>) ( <==? ATOM>> <+ .POS ,ONE-IN-LH>>>)>) (,PBYTES <+ .POS ,ONE-IN-LH>>>) (,PVECTOR <+ .POS ,ONE-IN-LH>>>) (,PUVECTOR <+ .POS ,ONE-IN-LH>>>) DEFAULT ( HASH>)> > FIX> 13> <+ .POS ,ONE-IN-LH>> >>) (ELSE >>)> .PREHASH>>)> > ) (ELSE <+ .POS ,ONE-IN-LH>> 17> <+ .POS ,ONE-IN-LH>>>)>> .POS .CH>> >> .STR> .HASH> ;> FIX>> > .POS>> >> .LIST> .HASH> > .POS>> >> .VEC> .HASH> .ELEM .POS>> >> .UVEC> .HASH> .ELEM .POS>> >> .BYT> .HASH> -6> ,OLD-TYPES>>