>
) (T FIX] ADECL>)>> >) (T >)>> <- ,MAX-PSTACK-SIZE 1>>) (T 0>)>> )) )) )> > > >> > >) (T > >> )> < PRINTN <- ,MAX-PSTACK-SIZE .TMP>> )>> < ZPUT .S .TMP .OBJ> .S>)> >) (T .N>>> )> .S>)> ) (T )>>) (T )) > < FLUSH-PSTACK .S .N>)> .OBJ>)> > > > 0> )>> > 0> ) (T )>> .VAL>) (T .OFFS>>>) >