) "RESTORED"> > ) (ELSE )> )>> (NM2) (L) (OLD) ) > >> > >)> >>) (ELSE > >) (ELSE )>> 10> ".BAK">>>)>)>) (ELSE >)>) (TOPS-20 >)> > >> >)> > > ".MUD"> > > >) (ELSE )>) (ELSE )>)>)> > > T) (ELSE .L)>) (ELSE .OLDCHAN)>) (ELSE )>) (ELSE )>> > > <>> (CMPDATE OLDDATE NEWDATE) FIX) > >> > ".*">> > ) (> .OLDDATE> > > ) (ELSE >)>>>) (ELSE .CMPFILE)>> ]>> (OUTCHAN) CHANNEL) > >) ( ) (ELSE ) 'N==?> "Changed ") (<==? <3 .V> '+> "Added ") (<==? <3 .V> '-> "Removed ")>> > > > .L>)>> ) (OLDNAME )) #DECL ((NEW OLD) (NEWNAME OLDNAME) STRING) > >> FALSE>) ) (ELSE > > ) (ELSE )>)>) (ELSE > > ) (ELSE )>)>>>) (.NEW ) (ELSE )>> (OL) LIST) )) #DECL ((OL) LIST (O) >) <1 .O>>> > <2 .O>> <==? <3 .N> <3 .O>>> >) (ELSE )>) (> )>> .OL>> > 1000>> > ) (STR? <>) (BLANK? <>) (WAS-BLANK? <>) (BRACKETS ,BRACKETS) LEFT (BUFFER ,BUFFER) (LEVEL 0) (HASH? <>) CHR) #DECL ((BUFFER BLANKS BRACKETS) STRING (CHAN) (FIL) (ITEM-LIST) LIST (LEFT) CHARACTER (ITEM) (QUOTE? STR? BLANK?) (LEVEL) FIX (HASH?) (CHR) ) ) (ELSE .FIL)>> >> > > 0>) (ELSE >>)>) (<0? .N> >>)> > > >> > .ITEM) FALSE>) (.STR? .ITEM) FALSE>) (ELSE .ITEM-LIST)>>)> > ) (ELSE )>) (ELSE >)> >>)> >) (<==? .CHR %> ) (<==? .CHR !\"> >) (.STR?) ( >> <==? .CHR !\<>> > )>) (> >>)> >) (])}"> >) (ELSE >>>)> <==? .CHR !\>>> <==? .CHR !\]>> <==? .CHR !\)>> <==? .CHR !\}>>>) (ELSE >)> > >>)> > 0> )> >)>)>>)>> ) BUF NAM) #DECL ((TYP) (BUF) (NAM) ) > ) (> ) (> ) (> ) (> )> >> )>> > > > > 0> >) (ELSE >)>)> >>> >> .N)>>> ) (M ,N) (BUFFER ,BUFFER) BUF BLANKS) #DECL ((BUF BUFFER BLANKS) STRING (START?) (M O N) FIX) > > > 0> >)>) (ELSE )> > > ) (ELSE )>) (> ) (ELSE )>> .BUF>>> ,==? .STR .BUF>>