) (ELSE ">)> >

)>> ) FSP (REDEFINE T)) #DECL ((REDEFINE) ) > )> > > <7 .CHN>>>>)> ;"To hack ugly file names. (TT, 75/10/07)" <8 .CHN> <9 .CHN> <10 .CHN>>>> > .NAM>> ) (NAM .NM) (ELSE >)>) (OC <10 .CHN>>) (FIXERS ()) FUNC BKS TEM TT HOLDANY GRP FIXES) #DECL ((CHN) CHANNEL (NAM) ATOM (OC) (FIXERS) LIST) )> > >> )> >>> !.FIXERS)> )) COMMENT>> COMMENT .TEM> !.FIXERS)>)> > BLOCK >> !.FIXERS)>)> >> > DEFINE> <==? .TEM DEFMAC>> 1> VALUE '<2 .OB>>>> > BREAKS>>> BREAKS> )> >> BREAK> <2 .HOLDANY>>)> >>)> > > 1>> .FIXERS> )>) ( <==? 3> VALUE '<2 .OB>>> ATOM> > RSUBR> RSUBR>>> <==? .NM <2 .TEM>>> CODE> >> .FIXES> !.FIXERS)>) ( CODE> )> >>> 1>> .FIXERS> )> > PCODE> 1 >>> !.FIXERS)>)>)>)>> .GRP> >> .FIXERS) .OC> .NAM>> > > COMMENT .TEM> !.L)>)> >>>> 1>> .L> )>> > COMMENT>> > COMMENT .TEM> !.L)>)> COMMENT>> > COMMENT>>> COMMENT .TEM> !.L)>)>) (> )> .L> (L) LIST) )) 1> > ATOM> > >> CODE> >> .TEM> !.L)>) ( CODE> > )>)> PCODE>> 1 >>>> !.L)>)> 1 >>> !.L)> )>)>> .R> .L> > .O>>