;.UU*UjUORBOUNDPQUOTE*SHARING-FILE-LISTSETQx*SUSPEND-DEFAULT-ARGUMENTCONDEQU*U.USTATUSHACTRNDDT:PDUMPED Tx*LISP-PURE-PAGESDOU*U*UI1+L=ANDPLUSPCARU*]*SYSCALLCORTYPCONS        xPURE-SUSPENDSUBR,8,8 `NAMELIST B`Z[*1D+RH>1D+<1D+ZZ[ P(1F+1F+1F+[[ 1H+[ Z ([ (0J+ ,,8,8BFQ,8,8",ERROR< B`+PAGEBPORGR2BPORG & $ " PURIFY  `-,1 B ,,8 g5B ,8,8gF@0",SUSPEND<COMMUNIZE "/,xR)*Unspecified filename component - SUSPEND et alWRNG-TYPE-ARGp*SUSPENDLSUBR-0,8 5N# ,+,=N( ,',81 Z(,8",<+, ,,,8 Z(,8Z(,8",</1l  ` ,1,8,8,8:,8; ",*ARRAY<,8,87@`+6[` gQ@COMMUNIZE-SINGLE-FILEZ` B`+2/ ,9,8(`d,8g",*REARRAY</ ",xFIXNUM",# H-,8,8PROBEF5BC~JF  ,B,8 gNAMESTRING,8MSGFILES,8",QEPRIN1<~L "+I ,F,8,8g,8S #",OPEN< `,8MAP-IN-PURE-PAGES-FROM-FILE,XCLOSE/,x}5X x(C|'qOBxOd`|;qJy'b ya-}5XI|#pI|'qoCy?b?x`G|?r@%Xx(G|CrOD|7pFINSINGLExeHx;,8D"Q,84N\~v ,Z,8 gTRUENAME ,8,8",<~x~| "+u(`a g `FILLARRAY,<,8,<,< w1N+t g ( Np4nnH1(Nx=Nn  "wMEMBER5Bn ,j,8@0,8,8 *w,8",< [ 84.nF ` $w gMAP-IN-PAGE-FROM-FILE p4ns(NxA. 4ns `.. Nw "w B`:w+` "@`///,x}5X x(C|'qOBxOd`|;qJxOc@a-\|qI|7pJ66cx/cx(D|Lcyb?x8C|KqI|OqOL"` 8S,8,<,8 , ,8D ,8,8,8,8,8,8,8",< A@,84B-, $p-, g-,0E$%-,ARGS(SYSCALL 'CORBLK) lost $ "*BREAK  ,//,x R)KxCORBLK!!"p ;