; RHQU*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading EXTBAS 38   pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071EXTBAS38VERSIONU*U.UPUSHFUNCTIONLAMBDAXORFILE-EXIT-FUNCTIONS      xSI:NON-NEG-FIXNUMPSUBR@ an+ `5. P P " ` ",x!SI:MAX-EXTEND-SIZEP an+ `4. 0. P U " ` ",x! ANDFEATUREU*U.UCOMPLRGETEXTHUKLOADLISPFASL#%')'xSQUIDCXRPSI:XREF ..A "p@#nT,x!0x! RPLACXSI:XSET ..AA@[U "p,,x!0x! CLASSPSI:CHECK-TYPERU*U FBOUNDPSI:MAKE-EXTENDBad args to SI:MAKE-EXTENDERRORMAKHUNK**SELF-EVAL**,8  an+4.0n "1D5B)14B$ 3 $a1" 3 $ `a1 B`+) ,),8@a g-,3-,7",0o5.. "p-,0XC`7QC`/.T,x! -SI:MAKE-RANDOM-EXTENDLSUBR-0 0 @;+6Z(`m "0.. "p-,0XC`7QC`jUjU,x91ARGS;x*RSETEXTENDPSI:EXTEND-LENGTH!1CNot an EXTENDHUNKSIZE=`1  ? $ `a1 B`` ,8`0,8K,8g",o5A/.-,.U*U,x !}PUTPROPEXTEND-LENGTHCADRCARGETLEXPRu@!C"E#?G!xSI:EXTEND-0  A@++Q @` " p`0.. "p-,XC` 7QC`,< p@ k+\ `+b.. p.0.@0Z@ "-,A `-,/:p x`/,x 9;