(FILECREATED "24-Sep-86 18:01:46" ("compiled on " {ERIS}<LISPCORE>SOURCES>LLBASIC.;57) 
"16-Sep-86 11:57:30" in "Xerox Lisp 16-Sep-86 ..." dated "16-Sep-86 12:29:41")
(FILECREATED "24-Sep-86 18:00:26" {ERIS}<LISPCORE>SOURCES>LLBASIC.;57 66171 changes to: (VARS 
LLBASICCOMS) previous date: "16-Sep-86 17:46:37" {ERIS}<LISPCORE>SOURCES>LLBASIC.;56)
(RPAQQ LLBASICCOMS ((FNS LISTP LITATOM FIXP STRINGP SMALLP NLISTP ARRAYP ATOM FLOATP NUMBERP STACKP) (
DECLARE: DONTCOPY (EXPORT (MACROS CHECK \StatsZero \StatsAdd1 IPLUS16 SMALLPOSP SETXVAR SETQ.NOREF IEQ
) (TEMPLATES SPREADAPPLY* SPREADAPPLY SETQ.NOREF) (CONSTANTS WordsPerPage))) (COMS (* "atoms") (FNS 
GETTOPVAL SETTOPVAL FSETVAL \SETGLOBALVAL.UFN \SETFVAR.UFN GETPROPLIST \ATOMCELL SETPROPLIST) (COMS (
MACROS \PROPCELL) (OPTIMIZERS \ATOMCELL GETPROPLIST SETPROPLIST)) (FNS \MKATOM \CREATE.SYMBOL 
\MKATOM.FULL \INITATOMPAGE) (FNS MAPATOMS ATOMHASH#PROBES) (FNS INITATOMS COPYATOM UNCOPYATOM) (COMS (
* "See \PNAMELIMIT comment below") (VARS (\PNAMELIMIT 255)) (INITVARS (\PNAMES.IN.BLOCKS?))) (FNS 
\DEFINEDP PUTD \PUTD GETD PUTDEFN GETDEFN) (VARS (COMPILEATPUTDFLG)) (INITVARS (*PACKAGE-FROM-INDEX*))
 (DECLARE: DONTCOPY (EXPORT (RECORDS LITATOM SYMBOL VALINDEX VCELL DEFINITIONCELL FNHEADER PNAMECELL 
PACKAGEINDEX PNAMEBASE PNAMEINDEX) (MACROS \DEFCELL \VALCELL \PNAMECELL) (MACROS \ATOMVALINDEX 
\ATOMDEFINDEX \ATOMPNAMEINDEX \ATOMPROPINDEX \INDEXATOMPNAME \INDEXATOMVAL \INDEXATOMDEF) (GLOBALVARS 
\NxtPnByte \CurPnPage \NxtAtomPage \AtomFrLst \OneCharAtomBase \PNAMES.IN.BLOCKS? \SCRATCHSTRING 
COMPILEATPUTDFLG *PACKAGE-FROM-INDEX*) (CONSTANTS (\PNAMELIMIT 255) (\CharsPerPnPage 512)) (* 
"\PNAMELIMIT is exported but needs to also be a VARS on this file to get it copied.  Note that both commands must be edited together.  "
))) (DECLARE: EVAL@COMPILE DONTCOPY (MACROS COMPUTE.ATOM.HASH ATOM.HASH.REPROBE) (ADDVARS (
DONTCOMPILEFNS INITATOMS COPYATOM UNCOPYATOM GETDEFN PUTDEFN FSETVAL)))) (COMS (* 
"for executing boot expressions when first run") (FNS \RESETSYSTEMSTATE INITIALEVALQT SIMPLEPRINT) (
GLOBALVARS RESETFORMS BOOTFILES)) (COMS (* "stats") (FNS PAGEFAULTS \SETTOTALTIME \SERIALNUMBER)) (
COMS (* "Fast functions for moving and clearing storage") (FNS \BLT \MOVEBYTES \CLEARWORDS \CLEARBYTES
 \CLEARCELLS) (DECLARE: EVAL@COMPILE DONTCOPY (MACROS .CLEARNWORDS.)) (* "Obsolete:") (DECLARE: 
EVAL@COMPILE DONTCOPY (EXPORT (MACROS \MOVEWORDS))) (FNS \MOVEWORDS \ZEROBYTES \ZEROWORDS)) (LOCALVARS
 . T) (DECLARE: DONTCOPY (ADDVARS (INITVALUES (\AtomFrLst 0)) (INITPTRS (\OneCharAtomBase NIL) (
\SCRATCHSTRING)) (INEWCOMS (FNS FSETVAL SETPROPLIST PUTDEFN \BLT \ATOMCELL) (FNS \MKATOM 
\CREATE.SYMBOL \INITATOMPAGE \MOVEBYTES) (FNS COPYATOM INITATOMS)) (EXPANDMACROFNS SMALLPOSP 
COMPUTE.ATOM.HASH ATOM.HASH.REPROBE \DEFCELL \VALCELL \PNAMECELL \PROPCELL \INDEXATOMPNAME) (
MKI.SUBFNS (\PARSE.NUMBER . NILL) (\MKATOM.FULL . NILL) (\ATOMDEFINDEX . I.ATOMNUMBER) (\ATOMVALINDEX
 . I.ATOMNUMBER) (\ATOMPROPINDEX . I.ATOMNUMBER) (\ATOMPNAMEINDEX . I.ATOMNUMBER) (SETQ.NOREF . SETQ) 
(SETTOPVAL . I.FSETVAL)) (RD.SUBFNS (\PARSE.NUMBER . NILL) (\ATOMDEFINDEX . VATOMNUMBER) (
\ATOMPROPINDEX . VATOMNUMBER) (\ATOMVALINDEX . VATOMNUMBER) (SETQ.NOREF . SETQ) (\INDEXATOMPNAME . 
VATOM) (\INDEXATOMVAL . VATOM) (\INDEXATOMDEF . VATOM) (\CREATE.SYMBOL . VNOSUCHATOM)) (RDCOMS (FNS 
COPYATOM UNCOPYATOM \MKATOM GETTOPVAL GETPROPLIST SETTOPVAL GETDEFN \ATOMCELL) (FNS LISTP) (VARS (
COPYATOMSTR))) (RD.SUBFNS (\RPLPTR . VPUTBASEPTR)) (RDVALS (\AtomFrLst)))) (PROP FILETYPE LLBASIC)))
LISTP D1
(L (0 X)) ����
@lð´@Ólÿåjðhð´@�NIL
NIL
()
LITATOM D1
(L (0 X)) ����
@lð�NIL
NIL
()
FIXP D1
(L (0 X)) ����
@3 �NIL
NIL
()
STRINGP D1
(L (0 X)) �
���
@lð´@�NIL
NIL
()
SMALLP D1
(L (0 X)) �	���
@kð´@�NIL
NIL
()
NLISTP D1
(L (0 X)) ����
@hð�NIL
NIL
()
ARRAYP D1
(L (0 X)) �
���
@lð´@�NIL
NIL
()
ATOM D1
(L (0 X)) �
���
@hðµ@3´i�NIL
NIL
()
FLOATP D1
(L (0 X)) �
���
@lð´@�NIL
NIL
()
NUMBERP D1
(L (0 X)) ����
@3�NIL
NIL
()
STACKP D1
(L (0 X)) �
���
@lð´@�NIL
NIL
()
GETTOPVAL D1
(L (0 X)) ����
@ÁÉ��NIL
NIL
()
SETTOPVAL D1
(L (1 VAL 0 ATM)) �%���@µAd²l
��ið›AiðµAl
��@ÁA�A�(32Q \LISPERROR 13Q \LISPERROR)
NIL
()
FSETVAL D1
(L (1 VAL 0 ATM)) �	���@ÁA�A�NIL
NIL
()
\SETGLOBALVAL.UFN D1
(L (1 A 0 V)) �
���`��AÐAÐ@�@�NIL
(2 \VALSPACE)
()
\SETFVAR.UFN D1
(L (1 VCELL 0 V)) ����A@�@�NIL
NIL
()
GETPROPLIST D1
(L (0 ATM)) ����
@ÁÉ��NIL
NIL
()
\ATOMCELL D1
(L (1 N 0 X)) �=
��Adl
ð—¿@��Ó°'lð–@��Ó°Adlð–¿@��ÓŒlð•@��Ó‚��
�AHÑHÐ�(62Q SHOULDNT)
(55Q LITATOM 43Q LITATOM 25Q LITATOM 12Q LITATOM)
()
SETPROPLIST D1
(L (1 LST 0 ATM)) �	���@ÁA�A�NIL
NIL
()
(PUTPROPS \PROPCELL MACRO ((ATOM) (\ATOMCELL ATOM (CONSTANT \PLIST.HI))))
optimize-\ATOMCELL D1
(L (2 $$CTX 1 $$ENV 0 $$WHOLE)) �%��@
H
	��Y²g��g��I
hH
hg���(12Q CONSTANTEXPRESSIONP)
(42Q IGNOREMACRO 23Q ATOMCELL.N 20Q OPCODES)
()
(PUTPROP (QUOTE \ATOMCELL) (QUOTE COMPILER:OPTIMIZER-LIST) (UNION (GETPROP (QUOTE \ATOMCELL) (QUOTE 
COMPILER:OPTIMIZER-LIST)) (LIST (QUOTE optimize-\ATOMCELL))))
optimize-GETPROPLIST D1
(L (2 $$CTX 1 $$ENV 0 $$WHOLE)) �
��@

�g��g��Hho����NIL
(13Q \PROPCELL 10Q \GETBASEPTR)
( 23Q (0))
(PUTPROP (QUOTE GETPROPLIST) (QUOTE COMPILER:OPTIMIZER-LIST) (UNION (GETPROP (QUOTE GETPROPLIST) (
QUOTE COMPILER:OPTIMIZER-LIST)) (LIST (QUOTE optimize-GETPROPLIST))))
optimize-SETPROPLIST D1
(L (2 $$CTX 1 $$ENV 0 $$WHOLE)) ���@!H
¹H
ºg��g��IhjJh�NIL
(21Q \PROPCELL 16Q \RPLPTR)
()
(PUTPROP (QUOTE SETPROPLIST) (QUOTE COMPILER:OPTIMIZER-LIST) (UNION (GETPROP (QUOTE SETPROPLIST) (
QUOTE COMPILER:OPTIMIZER-LIST)) (LIST (QUOTE optimize-SETPROPLIST))))
\MKATOM D1
(L (4 NONNUMERICP 3 FATP 2 LEN 1 OFFST 0 BASE) P 25Q \INTERRUPTABLE F 26Q \ORIGREADTABLE) 
õ
�C´*ABØkÙA
IHó³@IÐÈ�lÿñ”Iµi†IkÔY°êhhðhð±Bjð—j¹lÿ¾±
2C•@AÐÈ�‚@A½Bkð²+Mlÿñ³%`��² Ml9ñ˜`��Ml
ÙÐl0Mñ¤Ml0Ù`��MÐD³Mdl9ñ³¿@ABCl
W,
��Zµ‚±
dMlÿå^á¹ABØkÙAkØ_¿_¿OOó’±�¼IdnÿåààÐÓdlÿåáÐÓC™@OÐÈ�lÿåƒ@OÂÐÓ¹OkÔ_°ÏO&kÔ_&¿O(kÔ_(¿±�Ëi°aC²2BkAOOó³!LOÂ@OÐÈ�ð¢h°OkÔ_¿OkÔ_¿°Üi°.BkAO Oó³LO Â@O"Âð¢h°O kÔ_ ¿O"kÔ_"¿°Þi•`��KÐIOµNIækäl?å_ÐÓ¹`��IÐÈ�Zjð³`JkÙ[_¿lOÓÑOÓÐÉ�\Ê�Bð²ÉHLÊ�‡jð´`��KÐÁÊ� jðhðð²¯H¢±ÿEBkAO&O$ó’±ÿ2LO&ÐÈ�@O(ÐÈ�ð’±ÿh±ÿ@ABCH
��_¿`��IÐO��ÓkØÍ�O�(736Q \CREATE.SYMBOL 212Q \PARSE.NUMBER)
(753Q LITATOM 744Q \AtomHashTable 633Q \ATOMSPACE 553Q \AtomHashTable 523Q \ATOMSPACE 160Q \OneCharAtomBase 135Q \OneCharAtomBase 123Q \OneCharAtomBase)
()
\CREATE.SYMBOL D1
(L (4 FATCHARSEENP 3 FATP 2 LEN 1 OFFSET 0 BASE) P 4 \INTERRUPTABLE) �À��D”BlØ„BlØââ	��1`��Ydn
ÿåjð²ãºlþJñ£��¿Jnˆ
��¿J	��nÿÿð™lo���
��¿lIÓÑIÓлKkHÒlÿåÇ¿KHÓÍ
D™HkÐ@AÐBÄ°2C²&BAkOMó³HO@NÐÈ�Ç¿NkÔ¾OkÔ_°è‰@AHkB
��¿HBÏ�H�¿IkØ��`��IÐYD–dÁkÏ� I�(235Q \MOVEBYTES 105Q \MP.ERROR 66Q \INITATOMPAGE 61Q \MAKEMDSENTRY 51Q \MKATOM.FULL 17Q \ALLOCBLOCK)
(260Q \ATOMSPACE 255Q \AtomFrLst 25Q \AtomFrLst)
( 102Q "No more atoms left")
\MKATOM.FULL D1
NIL �����`��³i��¿`��kÏ�`¿i��h�NIL
(25Q \PENDINGINTERRUPT 14Q \INTERRUPTSTATE 10Q \STORAGEFULL 2 \STORAGEFULL)
()
\INITATOMPAGE D1
(L (0 PN)) �H��
@á
`��HÐHÐ	��`��HÐHÐ	��`��HÐHÐ	��`��HÐHÐY	��n�djñ´Ig��Î�¿IlйkÙ°í�(55Q \NEW4PAGE 42Q \NEW4PAGE 30Q \NEW4PAGE 16Q \NEW4PAGE)
(71Q NOBIND 45Q \VALSPACE 33Q \PLISTSPACE 21Q \DEFSPACE 7 \PNPSPACE)
()
MAPATOMS D1
(L (0 FN)) �
��
j
�jHÑk@¿HkØX`��ð²ðh�NIL
(22Q \AtomFrLst)
()
ATOMHASH#PROBES D1
(L (0 STRING)) 
�
ð@dlð²/ÁÉ�¹kº@ÁÉ�Ê�»@ÁÊ� jðhð__¿@Ó¸O²jIJÐÈ�°f	��b�É�¹@Ⱥ@È»@Ê�Cjð‘h€i_²=@1OÈkÙ_"¿OÉ�_$¿O"OÈØ_ ¿O"kØ_"O ñ­O$O"ÐÈ�lÿñ²ìi€h_¿Klÿñ²˜hIJÂdlÿå\dá½JKØkÙJkØ_¿_¿OOó³/MdnÿåààÐÓdlÿåáÐÓO™IOÐÈ�lÿåƒIOÂÐÓ½OkÔ_°Ðk_¿`��MÐÈ�^jð³£HµKNkÙ_¿lOÓÑOÓÐÉ�_Ê�Kð¢±�¾O`��NkÙÐÁÊ� jðhðð¢±�§O²<KkJO Oó›i±�ŽNkÙð±�‡OO ÐÈ�IO"ÐÈ�ð¢h°åO kÔ_ ¿O"kÔ_"¿°ÎO²3KkJO Oó³"OO ÂIO"ÐÈ�ð¢h°O kÔ_ ¿O"kÔ_"¿°Ûi°/KkJO Oó³ OO ÂIO"Âð¢h°O kÔ_ ¿O"kÔ_"¿°Ýi’OMOµLMækäl?å_ÐÓ½OkÔ±ÿ��(72Q MKSTRING)
(432Q \ATOMSPACE 354Q \AtomHashTable)
()
INITATOMS D1
NIL �¤���`��n
�
��lÿ	����dÉ�`��È"h	��g��	��lÿj»ºKJó³l0Kñ¤l:Kñ«HIKÇ¿HIk��¿KkÔ[°â`��lÐ��g��	��g��	��g��	��g��	��g��	��g��	��g��	��g��	��g��	��g����Ón
�ðµg��o���
���(241Q HELP 212Q COPYATOM 204Q COPYATOM 176Q COPYATOM 170Q COPYATOM 162Q COPYATOM 154Q COPYATOM 146Q COPYATOM 140Q COPYATOM 132Q COPYATOM 104Q \MKATOM 45Q COPYATOM 37Q COPYATOM 15Q ALLOCSTRING 10Q CREATEPAGES)
(232Q \INTERPRETER 220Q LITATOM 215Q \INTERPRETER 207Q \INTERPRETER 201Q \GCMAPTABLE 173Q \SETFVAR.UFN 165Q \SETGLOBAL.UFN 157Q \MAKENUMBER 151Q \OVERFLOWMAKENUMBER 143Q \DTEST.UFN 135Q \GC.HANDLEOVERFLOW 127Q \EVALFORM 124Q \OneCharAtomBase 116Q \ATOMSPACE 42Q NOBIND 26Q \SCRATCHSTRING 20Q \SCRATCHSTRING 2 \AtomHashTable)
( 236Q " not atom 400Q")
COPYATOM D1
(L (0 X)) �9��
@	��`��É�`��È#Hk¼»LKó³IJLkÙØ@L
��Ç¿LkÔ\°ëIJH����Ó�(62Q \MKATOM 44Q NTHCHARCODE 3 NCHARS)
(65Q LITATOM 13Q \SCRATCHSTRING 6 \SCRATCHSTRING)
()
UNCOPYATOM D1
(L (0 N) F 5 COPYATOMSTR) �`
�
`��@Ð@ÐÉ�U§lÿ	��c
¿AHjÂYdk¼»LKó³7ULHLÂZdlÿñ”	��°l9ñ—`��Jl
ٍl0Jñ¤Jl0Ù„`��JÐ��¿LkÔ\°ÉUkI���(135Q SUBATOM 120Q RPLSTRING 60Q CHARACTER 17Q ALLOCSTRING)
(113Q \OneCharAtomBase 71Q \OneCharAtomBase 2 \PNPSPACE)
()
(RPAQQ \PNAMELIMIT 255)
(RPAQ? \PNAMES.IN.BLOCKS?)
\DEFINEDP D1
(L (0 A)) ����
@lð´
@Á
É�´i�NIL
NIL
()
PUTD D1
(L (2 FLG 1 DEF 0 FN)) �&���AB³dl
ð²d��É�É@ð§A@
��b¿@A
��¿�(42Q \PUTD 32Q \RENAMEDFN)
(16Q COMPILED-CLOSURE)
()
\PUTD D1
(L (1 DEF 0 FN) P 3 \INTERRUPTABLE) �˜��@Á
!AYdl
ð² ��É�ºHjÏ�@¿I��É–HjÏ��°OJY°C²I��Ê�ClðžI��É�YºHjÏ�@°%`��™I–I@
��µHjÏ�¿HI�AZ¹HkÏ�@¿k¿HkÏ��¿k¿HJÊ!Ï�!¿HJÈjð‘k€jÏ�¿HI�A�(131Q \MAKEPSEUDOCODE)
(120Q COMPILEATPUTDFLG 102Q ARRAYP 67Q ARRAYP 41Q COMPILED-CLOSURE 24Q COMPILED-CLOSURE)
()
GETD D1
(L (0 A)) �3��
@lð´,@Á

HdÊ��jð’É�Ê�@jð¦HÉ�	��l
HÉ�¹dI�¿�(43Q \PSEUDOCODE.REALDEF)
NIL
()
PUTDEFN D1
(L (2 SIZE 1 CA 0 FN) F 4 LOCKEDFNS F 5 RESETPTR F 6 RESETPC F 7 OUTX) 
�@Á
BlØââA��É�A��ÈlØÂáA��É�A��Èl
ØÂälØ
����HJ�HA��É�A��ÈlØÂââââlåÏ�!HA��É�A��ÈlØÂáA��É�A��Èl
ØÂäjð‘k€j[Ï�¿KjðhðHkÏ��¿kjðhðHjÏ�@¿jdðhð@dT²¿Hk
��¿JdÓlÿåBkØâlÿØØã
��¿@g��ð²-��c
¿A��É�A��ÈlØÂáA��É�A��ÈlØÂäc¿AjBWg��
��lBkÙlåÙ	��I	��h�(414Q FILEBLOCKTRAILER 410Q BOUTZEROS 374Q AOUT 310Q FILEARRAYBASE 275Q \LOCKCELL 252Q \LOCKCELL 63Q FILEARRAYBASE 60Q FILECODEBLOCK)
(370Q CODE 346Q ARRAYP 340Q ARRAYP 325Q ARRAYP 317Q ARRAYP 302Q \RESETSTACK 161Q ARRAYP 153Q ARRAYP 140Q ARRAYP 132Q ARRAYP 105Q ARRAYP 77Q ARRAYP 43Q ARRAYP 35Q ARRAYP 22Q ARRAYP 14Q ARRAYP)
()
GETDEFN D1
(L (0 A)) ����
@Á
��NIL
NIL
()
(RPAQQ COMPILEATPUTDFLG NIL)
(RPAQ? *PACKAGE-FROM-INDEX*)
\RESETSYSTEMSTATE D1
NIL �	����i	�����(6 \RESETTERMINAL 3 \KEYBOARDON)
NIL
()
INITIALEVALQT D1
NIL �`�����`��!H²So���	��¿H
I¹HXµùI
	��Z²*I
	��¿l
	��¿J
I
JZ
��¿	��¿JµðI
g��
��¿IY´°Ê��¿��i�(134Q INTERPRET.REM.CM 115Q SETTOPVAL 100Q EVAL 74Q SETTOPVAL 61Q DSPBOUT 53Q SIMPLEPRINT 42Q GETTOPVAL 22Q SIMPLEPRINT 2 \SETIOPOINTERS)
(130Q BOOTFILES 112Q NOBIND 5 BOOTFILES)
( 17Q "evaluating initial expressions:
")
SIMPLEPRINT D1
(L (1 N 0 X)) �”��@dlð¨¿@d² ¿@	��k
IHó‘h@I
��	��¿IkÔY°î´[Ajð›o���hb¿b�°Äl(	��@
A
—jAñ£Akفlb
��¿Ajð•o���°"@b�µo���°³o���	��¿@	��¿o���	��ho���	��¿°³�(217Q SIMPLEPRINT 206Q SIMPLEPRINT 176Q SIMPLEPRINT 171Q SIMPLEPRINT 130Q SIMPLEPRINT 103Q DSPBOUT 44Q DSPBOUT 41Q NTHCHARCODE 22Q NCHARS)
NIL
( 214Q " " 203Q ")" 166Q " . " 155Q ")" 141Q " --)" 66Q "&")
PAGEFAULTS D1
NIL �
����`��l
���(7 \GETBASEFIXP)
(2 \MISCSTATS)
()
\SETTOTALTIME D1
NIL �����`��lÐ`��j
��	��ö�(17Q CLOCKDIFFERENCE 14Q \GETBASEFIXP)
(10Q \MISCSTATS 2 \MISCSTATS)
()
\SERIALNUMBER D1
NIL �����`���NIL
(2 \InterfacePage)
()
\BLT D1
(L (2 NWORDS 1 SBASE 0 DBASE)) �?��Bn@�ó²@n@�ÐAn@�ÐBn@�ÕÄ@An@�ÄjBkÙ
HIó³@IÐAIÐÈ�Í�¿ImÿÔ¹°ë@�NIL
NIL
()
\MOVEBYTES D1
(L (4 NBYTES 3 DBYTE 2 DBASE 1 SBYTE 0 SBASE)) �j��Djñ´L@AâÐBCâÐ2AkåZCkå[ð²7Jkð²IkHkÂÇ¿IkйHkиDmÿÔb¿IHDâ\Ä¿Dkåkð´
ILÐjHLÐjÂÇhDdjñ´ûIKdkÔ»HJdkÔºÂÇ¿kÙ°ê�NIL
NIL
()
\CLEARWORDS D1
(L (1 NWORDS 0 BASE)) �H���@Anÿñ²%@nÿÐjÍ�¿@dkÐnÿÄ¿@n€�Ðb�¿An€�Ùb°ÙAjñ²@AkÙÐjÍ�¿Akð¨@dkÐAkÙÄ¿�NIL
NIL
()
\CLEARBYTES D1
(L (2 NBYTES 1 OFFST 0 BASE)) �9���Bjñ´4Akåjð³@AjÇ¿AkÔb¿BmÿÔb¿@AâÐb�Bkåjð¦dBkÙjÇ¿@Bâ
���(66Q \CLEARWORDS)
NIL
()
\CLEARCELLS D1
(L (1 NCELLS 0 BASE)) �K���n?ÿAñ³&@nÿÐjÍ�¿@dkÐnÿÄ¿@n€�Ðb�¿An@�Ùb¿°×Ajñ´Aàb@AkÙÐjÍ�Akð§@dkÐAkÙÄh�NIL
NIL
()
\MOVEWORDS D1
(L (4 NWORDS 3 DOFFSET 2 DBASE 1 SOFFSET 0 SBASE)) �
���BCÐ@AÐDÄ�NIL
NIL
()
\ZEROBYTES D1
(L (2 LAST 1 FIRST 0 BASE)) ����@ABAÙkØ���(11Q \CLEARBYTES)
NIL
()
\ZEROWORDS D1
(L (1 ENDBASE 0 BASE)) �B
��AÒ@Òñ²"@nÿÿ@ÓÙ
��¿@ÒnÿÿÑjÍ�¿@ÒkØjÑb�¿°ÛAÓ@ÓÙ
�jHñ«@jÍ�¿@kÐH
��h�(76Q \CLEARWORDS 20Q \CLEARWORDS)
NIL
()
(PUTPROPS LLBASIC FILETYPE COMPILE-FILE)
(PUTPROPS LLBASIC COPYRIGHT ("Xerox Corporation" 1981 1982 1983 1984 1985 1986))
NIL