;"I(U*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading DEFVST 164pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071DEFVST164VERSIONU*U.UPUSHFUNCTIONLAMBDAXORFILE-EXIT-FUNCTIONS        xFEATURECOMPLRU*U.U*EXPRdefvst-construction|defvst-construction-1|defvst-typchk|*LEXPRdefvst-initialize|xMAPCYU*U*WANDNOTBOUNDPSETSELECTOR-NAMESTRING-STYLECONSTRUCTOR-NAMESTRING-PREFIX-CONS-A-xU;]*uEFVSY 84px xDEFVSY84       xSPECIALW+U*USI:STRUCT=INFO-VERSIONxxSI:EXTENDPSTRUCT=INFOGETSTRUCT-TYPEPSUBRD ,84BZ` B`4B[ $ B`@ 4B `-,/,xhU*U*USELECTOR&REST:WRONG-TYPE-ARGUMENT~%Restriction Violation while U*U*Ucreating a structure. The ~2G~S component ofU*U*U ~S is being set to ~1G~S, which is supposed U*]nUto be of type ~0G~S!!""##$$%%&&''(())**++,,--..p//x/ xCERRORdefvst-typchk|0,8,8,87Bg " (B{Z g04J[(Z (0H+ g-,+& $ `,8[,8ZgZ[ @ 0D + .+Zg[8 8....  $,<Z,\-,[,8  ,$,8,8',8,8',8(Zg{4D!7g{[g{,8,8gz,8g|,8g{",<//0 " Bg+ /+ %jU*U/ ~A is an unknown version of structuU*U*wre definition, current version = ~A01122334455667p77xu7 xSI:VERIFY-DEFVST-VERSION,8,8 =N+ * J` `D`03O+2 ,2,8,8,8,84,84,8,8",</+3 "/u*U,x 7(LISTIFYLISTLENGTHHUNKSIZEU*U*Wdefvst-initialize|STRUCT=INFO-CLSS+INTERNAL-LOSSAGECLASS:VARIABLECLASS-VAR-CLASS>>pw*U*U??x? xSYMBOLCONCEQUALERROR-OUTPUT~%;Warning! IncompaU*U*Utibly redefining the ~S~%; Methods will not U*U*Wbe preserved in the newly-created class.AABBCCDD%%EEFFGGHHIIJJK pw*U*UKKxK xFORMATSI:DEFVST-BARE-INITMACROEXPANDEDFLUSH-MACROMEMOSMACROPUTPROPCONSTRUCTORU@defvst-selection-1|LSUBR-0,8 Z(,8Z(,8Z(,8Z(,8 g~1n+=P Z(+= "8,81n+@Z(+@ "@,81n+CZ(+C ",81n+H ./g|,< "p9/+I "  g g}8,87@g~+O7Bg~ "  (B{Z0B9+P g~:+S * `0 g~ J`:/.,8,8,<  $ g{ B`4B[[ Bg5BZ g{" ( $; ";<+g $< g{ Bg4B`  [ $= Bg~+g6@g~+g $= g{  Bg~5Bg ,f,8,8g{,81",<?  Bg~6@g+h+ 7@`+ `[ g|@2N+ `Z2Bg|+ `Z,8@:/.-, ,8 p2N+ g|@ -,,<,8 p3/g+w "  +.. g-,,87@g}+} .B.p g-,+Zg,8g[` Dgb /,X@4B:p+u "/0(/+ "/5B 6@`D++ , ,8,8@,82,8gz",<LD ..-, B@@g7@g+6@`@+ ,,8,8g{,8g},8gz,8gz,8gz,8gz 0,8gz",<L $ g{ B`[ Bg@4 `Z Bg} M g|M &N $ g|N &O g{ g|N g}:/./. ,<,<,8 w3Np+/..@ .. g|-,Z[ B`4B. M@ M "w-, g{-, & $Q0 `N &N $O `N:w+" "@D]//,x?K0P5ARGSU:U*UP;QQ xCONS-A-STRUCT=INFOCLSSSTRUCT=INFO-CLASSINISSTRUCT=INFO-INISU*U*USIZESTRUCT=INFO-SIZECNSNSTRUCT=INFO-CNSNNAMESTRUCT=INFO-NAMEVERSSTRUCT=INFO-VERSU:U.U**SELF-EVAL**VECTORZ<pFILEPINFILETRUENAME;RRYXYWXVWUUVTTS;SZ@[[\[SxEFVSX 106w:UjU\]p]]x] xDEFVSX106]   ^^   ^^ ^xDEFMAXLOADLISPw+UjU_ _`_x _`xSETVSTM`MxSETVST MACRO`aNxMACROFETCHWrong number args for macroERRORU*U*defvst-xref|SI:XREF*:XREFSI:XSETMACROEXPAND-1* ~1G~S is not recognizable as a structure component selection -- ~S ~:[~% Last expansion resulted in ~S ~]MACROMEMO,8a 5Bf `:1N+9 ,9,8,8g,8g@",<bZ`[Z[,8,8-,~0 g~ Jg g(N{6 8+Z[gD` B`4BZ4BC(B{ an+Z $@  ` Bg4BMZZ5DIZgZ@5FM+KZgZ4FMZgZZ4DM(+Z[g1Bc+Q1Bc+Q0Bd+W g~-,ZgZ[-,Zg[ -, $d-,+d ge Bg"4BZ[ Dg+= ,c,8,8h,8D,8h,8i,8i,8g{,8j gz3Bg{g " `2,8,8g{",</ Bg~+pooxo x,8a5Bh@" `:1N+@ ,@,8,8i,8g",<bZ`[Z[Z [(Z([ ,8,8,8,87@i+W &h $j g0 j &h $k Bg `j B` $ g ,80B+R g4.R `[D`03.+W ,W,8,8,8,80@,8j,8g{",<//7Bg+Y @ @00Bh+c g-, $-,,8`0 g~-, $-,-,,X 2-, `-, g-, $c`-,+f `-, g-,  @ $c-,/ &h $ `f :U/,xbo 9:INCONSISTENT-ARGUMENTSThe structU*U*U selector  is being applied to ~S which isn'tW;@ a ~Spqqr*rssttuuvpvvxv x,8,8,8,87Ji @ +o2Bg+q ..g g~-,@ a+y ,y,8,8z,8,8{,8{ g| -, g}-,,8,8g},8g{,8g{A@D%",<//,x pv 0(jW(forget-macromemos|wxdefvst-xref| SETF-X-ACCESS,8[*,8-,` $ -, $-,,X-, P $(-,/,xx0|defvst-xref| SETF-X-INVERT g}@[ g~-, g-, g~-,2@`] $d-,/,xP`8defvst-xref| SETF-XW(`SETF-XcxyxSETF-STRUCT,8-,[Z[Z [(Z([ ,8Z[,8-,0@ $(-, g-, $ -,0C,X* & $x "w y/jU*U,x ~S isrecognizable as a stre construW;@1ctionzGz{{|3|}}o>p~~x~ x,8a5B*-,~ CZg~[g~ Bg Dg~4B $O Bg4B !@" $ B`5B& ,%,8,8+,8D,8,,8,,8-,8g{,8-",</ Bg~+  g~ g g $ g~f/D%/,x ~  U*U*UFIXNUMCURRENT-CONSTRUCTIONGETL Bad key word wcons' ~S sure.w:U*U*#$qpx xASSQCOMPILEMAKLAPSI:STRUCTS-OUTPUT-TO-FASLMEMQ-CLASSU*U*P:SOURCE-FILEPRATTSTACKSI:EXTSTR-AUTOLOAD-OUTPUT-TO-FASLEXTSTRSI:MAKE-EXTENDNRECONCLET*APPEND,8 2,8,<,< "-, $ ,8 g,85B8 g g~-,0 & $ "< `Z g~8 `Z `[ (,<(,8Z,C"!*-,+f4Fb gx $ "<@d g~/.-, -, $-,  $c-, Bg| g-, $ gy@ Bg{4BmZ[ * D` Jg~7@`P+6@g+p `+yzP:w g-,  $-,,8 g{-, $-,0`-,,X-, `-, ` $0-, Jg|-, g|-,  $`-, B`4B7@g~+ g-,0@ g}-, Bg}+ g}-, Bg} g~/.@@g~ Nw "w Bg~+U/0,8Zg{,87@`+ [` Bg}@ g|:/./.,< p4... g|A-,[2Dg}+ " +>p+ " "/5B ,,8,8u,8A@,8v,8v,8,8gz,8gv",</+  g~ g} Bg}4B gZ-, BgZ`Z B`+/,8)DH zpXii(4B` g1B+%0B+` E0 gz5B` $< gz,8 gy-,2@! $-,,8 g[ $=@5B1 ,1,8,8gx,8w",<?-, 2 $-, gzZ (*-, $0-,,8,8 gz:/./.,80 ,< p5.; `+B/. 0.p 0 gy,< -, `-,,\  B` Np+9//-,  $-, $<,8 gw[ $`1-, $-,-,  0-,,X-, $w-, g 2-,,X-, g-, $Lb-, ,8-, B g1B 1+V g~ `-, Bg~/6B  " +]  _`zn=TT-, B g1B+]A@B ` _`zn=TT-, B` * J  gz -, B ,c,8,8gy,8w",<? @0-, $p-, $-,,8@" 6@g~+i6@g+i+s-, $-,0 -,z g&>C,8 g~ $ g~H ,X-, $ -,-, `0 $ g $-,//0D%,x .W:]*USPLITFILE-HOOK  xM xDEFVST MACRO  NxNO-SELECTOR-MACROSBad name arg - U;]*UDEFVST    px xBad &REST item - DEFW;U*UVSTpx xPRIN1-MACRO-ARGKey name not a U;]*Wsymbol - Dpx xBad key-list -  pw*U*Ux x=:FLONUM BIGNUM0 9n= SYMBOLU*U.wFOOARRAYHUNKSMALL-FLONUMPAIRSTRINGVpx xU*U PRINTNREVERSETO-VECTOR*NCONCEVALEVAL-WHEN,8:0.@ +} ,},8,8H,8g",<bZ`[D1Z,8,8  ,8H-,a ,8(D{6 +Zg~[g~b Bg~ D` " 4B@@g7@g~+ g~@4N(N{ 8`n+ ,,8,8I ,8g}",<b ,,8,8g~,8I",<? !,8 g~:-,~ ,< g} " L B`4B":"`.npZ`[Z`Z [ Bg Dg4B(B{ an+@  5D" ,",8,8J,8g|",<b $ g|D4B* ,',8,8",<~J ,*,8,8g|,8",< ,-,8,8g|,8OA",<? g~ "O B`4B1Z[@@+4 ,4,8,8,8g{",<?,8 ,8,8,<P,8g{,<-,} @ 7@g}+6@g|+[g} Bg(B{7  @+K g0B +D g{ ( Hg| JgZg}C[3Dg{+D gx $ " <+J g@4NJ(N{ 8`n+J ,J,8,8P ,8g~",<b@@g~+{[g Bg4BO4BR(B{ `n+R ,R,8,8Q,8gw@0",<b[g}Z Bg{(B{7 +VP@@g~+{ *V JgZg{5B[[g{-, C $-, Bg{ g{ " Bg~4Bd  (8 HgZ[(B{7 +cZg~ [-,+dZg~[ Bg~ g{ " Bg~4Bk g.. Np "p BgZg~@* [+p7@g~+p~V   9z oTB3[g~5BoZYZ@  z {'Z^@[g~Z Bg~ g4Ns g~-,0 Bg~ .$g g{,<:,\3N+{ ,z,8[g},8,8",<`Q6@gy@+ g-, g|-, Bg|+@"6B+ g+ ,,8,8gw,8,8g~@0",<? B`6@g|+ g~-, g -, g|-, Bg|+ gz-,0@ `-, g-, Bg| wC..3Nw+ &w $ " < w.. `0Zg} Bg} Nw+8// g}  -, $-,-, $-,2@ 2=z k&4*g}-, g{-, $d-,,8 gz-, $-,`*g-, $-,,8 ,&,8@  g~ g}-,,8",< -,2@#  $-,,8 [[4B, [`1\-, $-,-,  0-,,X-, $p-,,X @0-, g-, $;-,,8@ 7@g~+< p.. z 0y74u-, -, ` gz-,z i-Q0-,Zg~[-,2@a  $-,-,+< "*gz -, $-,-, $*gz@ ,X-,,X-, g}-,2AH!_z Pz-, $!-,/@`"/,/,xb "oxd_xOc_ |pOB|qG|'qoC y'b LZGS.) _yexc@|3qI|PbyG|CrOD|?qoIxwc(sB|P`.].Wx'a?0xSI:PRINLEVEL-EXCESS"x#"""xSI:PRINLENGTH-EXCESS#xW*U*U...###xPRINLEVELCLASS-OFSI:PRINT-EXTEND-MAKNUMSI:LISTIFY-STRUCT-FOR-PRINTTYOPRINT-OBJECTU(!PRINLENGTH>:PRINT-SELF->STRUCT-CLASS,=g:p7B$+^ p3.@@+^ ,^,8,8",8g~",<+ g~$[,8 $,85Bd g~ g}@0%+ $Z g8 g~j ` ` g g}%,8,<,87@`+D6@g+p ,p,8,8,8g|",<& ,u,8[g,8 *w,8,8g|,8g{",<'@7B'+~ p3.+~ ,z,8,8 ,8g|D",<& ,},8,8#,8g|",<+ p..@@gZ` D` Np+k// ,,8,8 ,8g}",<&/0 "//,xs0 &".U.U&(P@0WADD-METHOD:PRINT-SELFSTRUCT-CLASS))(*xMNU*U*UOUTFILESGRCHRCTGFLATSIZE*PRIN1*TYOLLINEGRINDFORMCODEUD INDENT-TOSPRINT->STRUCT-CLASS-,p*p+ g~$[  ,8 $,85B + g}%+,` & g g}% `Z,8 g80, /. `,<, p/@b3n+ g}-++`-[`-Z` d 4B* "&-, B+ *..-, D!! B*Z`-,.7B.+* "./!H$1 "//7B.+$ +0+$,!A@`0 "(-//+s0 ]:U P ( SPRINT)10*xSUPPRESSED-COMPONENT-NAMESconstant-p|*EVAL,8,8,8 ` $1 g,8,< "Z,8@:/.-, *g~-,,8^,8 g3/g}+9 `+].. g-,0[Z[Z [ (,8,8,8 ` 4HB $*Z[+C "4BD@0 +E g~/... g{-,,8 " g| g~5BY5JK7@`+Y g2  4BO g2 `@5BY7Bg " (B{ AZ0B9+V[g0D+VZg[D `@5BY g~ g~-, ` Bg~ -, Bg~/ g.. Np "pA@`% Bg+6//,x8X -UASI:COMPONENT-EQUALEQUAL->STRUCT-CLASS g2B`+a " +i,8@ g,87@g+f4Bf3Bg+g "``0+i g g~3//,x_*@8P _)@3*xSI:SUBST-INTO-EXTENDSUBST->STRUCT-CLASS,X,X g/kU* &4HP (jSUBST)54*xj)*aSI:HASH-Q-EXTENDSXHASH->STRUCT-CLASS $5 gujU/$6hP`mSXHASH)76*xSI:DESCRIBE-MAX-LEVEL~%~vTThe nU*U*wamed structure has STRUCT-TYPEP ~S8899::;;<p<<xu*U*U< x~%~vtThese component names areressed: ~Sw:U*U==>>??,@@pAAxA xThe ~D. cont names and contentW;U*U:=AB'BCCD?DpEExE x ~S: ~S ~:[~; [default]~W;U*U]=EFFGGHpHHxH x&REST part hasn't been DeU;] scribed.=IIJJKKLpLLxL xDESCRIBE->STRUCT-CLASS `2o7+<A g~,8 $,84B;Z,8@ :/.-, ,8,< $1 g~1 gZ,8 g~8 ,,8,8g|,8=,8g|,8g|",<L7@`+ ,,8@1,8g|,8>,8g|,8g~",<L , ,8,8g|,8>,8g| g}/.,< *p,8",<L /,8?,8 g2/g~+4.. g~-,[Z[Z [ (,8 @ ..g g}-, $Z[@,84BZ[8 8+ g~/... gz-,,85J4B( g24B!@b g2 `@5B(7Bg " (B{Z20B9+)[g0D+)Zg[ `P@4B) * Jg~ ,0,8,8gz,8?,8gy ..g| gz-,[,8,8g},8g{A@",<L/ g..@@` Np "pA@ Bg+ / gZ4B: ,:,8@,8g|,8@,8g|",<L//`"/+< "/,x<A".xE8HLPP (oDESCRIBE)MM*x;