; P@QU*U*UPROG2CONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading UMLMAC 24   pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071PUTPROPUMLMAC24U*U.UVERSIONPUSHLAMBDAXORFILE-EXIT-FUNCTIONS    xANDFEATUREU*U*UCOMPLREVALDEFMACROBIT-TESTYLISTNOTLIST*=U+TBOOLE!#%')'+-xSUBR,8 A U1N " /,x(BIT-SETp U!#/'+x G-,,xx BIT-CLEARp U!#1'+x B-,,x FLUSH-MACROMEMOSWHENW*]*UMACROEXPANDED35xWHEN MACROMACRO7xMACROFETCHLENGTHWrong number args for macroERROR0MACROMEMO+ `90.+ ,@,8-,8g",o;Z`[ZA @2@-,-,1 $-, & ] $ `,x0UNLESSu83=5xUNLESS MACRO=7xK `90.@ `; ;,8M,8g",o;Z`[HZ*-,1 $-, $-,0d-,1 $-, = $ ` :u,xpMSETQ-CALL3?5xMSETQ-CALL MACROub? 7xMULTIPLE-VALUE5B-Z`,8`3A00-,3 ? $,x1'MSETQ-RETURN3!5xMSETQ-RETURN MACRO!C7xVALUES5B4dZ`,8`3 ""-,3 &! $.W,x.DOLIST3E5xDOLIST MACROE#7xU*U*UDECLAREFIXNUM1+GENTEMP:LOCAL-VARCDRNULLCAR*APPEND0DO5Bq `90.`w w@,8,8r,8g",o;Z`Z[[Z [(Z([,8,8aA[6 `[[G`@Z Bg[Z+I "4FS@ 0-,1 $$-, $-, B``2 g-,1 I-,-,1 - -, g-,-,1 Bg7@` ` `G-,-,1 B` ,2% K $ a `-,1 $&@-,-,13-, `-,0 0-,1 g~-,,Xd-,-,1 M-, @0-,1@-,1 $'-,-,0H13-, $-,3-,0` $*gaO3-,,X-,2@d $(-,/ E $ ` :u,x05DOTIMES3Q3xDOTIMES MACROu*U*PQ)7x*RSETMust be a variable -- DOTIMESWRNG-TYPE-ARGMACROEXPANDconstant-p|Must be FIXNUM -- DOTIMES<05B> `90.+y ,y,8,8? ,8g",o;Z`Z[[Z [ ( 4 ,8,85H ,% K $ 0aS` 8`n@ ` ,83,8@Ko; + `+,8`W)d " Z1B$+ ,,803,8AKo;``7 ,%"` K $ B`a-,1 `-,0-,1 ` B`7@`+ -,1`= " g-, $$-,a7@g~`S[g~6 `S [g~[G`SZg~,8g~[`Z3 +* ",X-, G-,0 @0-,1 I-,-,2@1 --,3-,3-,0@ *g-,13-, Y-,0`0-,1 $-,-,1 g~`*`-,,X-,3-,@ $(-,/ Q $ ``DDK,x*U,UU*U.xGETLLSUBRAUTOLOADLISPMACAIDFASL-%[.%]/_.x;