(FCODE-BUFFER) UVECTOR (FCODE-BUFFER-PAGE FCODE-FILE-POINTER MAX-BUFFERS) FIX (FCODE-BUFFER-CHANGED?) BOOLEAN (FCODE-LIST) ]> (FCURRENT-CODE) CODEVEC (FCODE-COUNT FCURRENT-WORD FBYTE-OFFSET FSHIFT) FIX> > > > > > FIX> >) ()>> > >)> > >> >)> T> )> > T> > > > 0> > FIX>>) (ELSE 1>>> > >) (ELSE >)>)> FIX>> > > )> > .OFF> ,MAX-BUFFERS> )) )>> .RLST> > 1>> (.CCODE)>) (ELSE > 1>> (.CCODE)>)> .CCODE> 4> 4>> > 4> 1>>> .VAL> FIX>>) (ELSE 4>> 4> 1>>> UVECTOR> >) ( WRITE>>)> .VAL>> )> >> )> >>)>> 4> 4>> > 4> 1>>>> FIX>) (ELSE 4>> 4> 1>>> UVECTOR> >) ( READ>>)> > FIX>> )> >> )> >>)>> >) (ELSE ,FCODE-BUFFER-CHANGED?> )> >) (ELSE )>)> ,FCODE-BUFFER> >> )>>>