> > >)> .LOAD-CHANNEL)>) (INCHAN ,DEBUG-CHANNEL) (OUTCHAN .INCHAN)) #DECL ((ERR-FRM) FRAME (NAME) STRING (CHAR) CHARACTER (FLOAD-CHAN) (INCHAN OUTCHAN) ) 2> <==? <2 .ARGS> ALREADY-DEFINED-ERRET-NON-FALSE-TO-REDEFINE!-ERRORS>> > )> >> > ) ( .ERR-FRM>) (<==? .CHAR !\^> > .ERR-FRM>) (<==? .CHAR !\*> ) ( ) (<==? .CHAR !\?> * redefine the rest of the functions from this file ^ don't redefine any more functions from this file ? print this cruft Redefine "> ) (ELSE > > >>)>>)>> > )> > )>