1MAINGET-COMMAND-STRING	PARSE-COMMAND-STRINGLISPSCANTABLE*FASTBINDCURRENTREADMACROINDICATOR*CURRENTSCANTABLE**USERMODE*REDEFMSGPERFORM-PROGRAM-COMMANDCOPYDFASTUNBINDORIGINAL-MAINLISPREADMACROSTRING-UPCASEINTERNGETFASTAPPLYPROGRAM-COMMANDCOMPILE-PROGRAM-COMMANDLIST2*BREAKERRORSET*WRITINGFASLFILEFASLENDPRINTFQUITCOMPILE-FILESTRINGIFYCONCAT*QUIET_FASLOUTFILEPFASLOUTDSKINCOMMONCOMPILEREVLOADFLUID1FUNBOUNDPPUTENTRYPUTCOMPILEEXPRi,, 
    -4*"
 ,  ,-4,,~xxx,>3B+ 60V+,, ,3B+  x ,+ + + >,~>x	%n ***** Error during compilation of %w.%n>  Bx  x L6<0V+&  +&  B6<1V+) +;  >,
 B~ -4

  * ~,6=1V+10v+43@+3,  =,-4   B6=0V+9 +:  B+',
>~,~>>x
%nDone compiling %w%n%n
%n----- Compiling %w%nUnable to open source file: %w%n.SL.B> Bx, B e,  , B x, B d,  ,   * D F~-4
 ,2B+[ ~ d+`  ~ c, x, ~,, ~ c,-4>~,~>ADHIx$gxx@x$hxx@ , , , , , , ,3B+s  ,Z&  ,Z&
  ,   , , ,Z&   ,Z&K  +x
xxxx	x	xxxxxxxx$e$f (UD?UDD A
""P" A(DP(E
@~UU*Q**U"QW