(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") (FILECREATED " 2-Dec-93 13:38:53" ("compiled on " |{DSK}export>lispcore>sources>CLTL2>I-NEW.;3|) "11-Nov-93 16:58:33" |brecompiled| ALL |in| "Medley 11-Nov-93 ..." |dated| "11-Nov-93 17:07:44") (FILECREATED " 2-Dec-93 13:37:18" |{DSK}export>lispcore>sources>CLTL2>I-NEW.;3|) I.MAKEINITBFS :D8 (P 5 I P 3 PREV P 1 FIRSTCB F 6 I.MAINDISK F 7 I.FREEPAGEFID F 8 I.SWAPDSK1 F 9 I.SWAPDSK2 F 10 I.SWAPREQUESTBLOCK F 11 I.DISKREQUESTBLOCK) l Hjh Hc l$ Vlg l Hjh Hcl$ l Hjh Hcl$ l*lDdGGboHYjIdd hGG HGlԸhbDdj6ojZjJdd hHGdGb HlԸkٰHlj*oj[jKdd hHh HlԸihoH\jLdd hjn 2oH]jMdd h^jNj nn oH_jOdd hk@ Hlbo@_jOdd h_jOj ln o@_jOdd h_jOj n o@_jOdd hlH o@_jOdd hkAl k o@_jOdd hl Bl o@_jOdd hlF o@_ jO dd hlE @l XGOFl dnnkk_$j2oj_"jO"dd hHn HlԸO$kٰo@_&jO&dd hlHlX HCH @(741 I.\\MAKEFREEBLOCK 732 I.PUTBASE 717 \\FZEROP 681 I.PUTBASE 669 \\FZEROP 624 I.GETBASE 607 I.PUTBASE 596 \\FZEROP 572 I.PUTBASEPTR 561 \\FZEROP 537 I.PUTBASE 523 \\FZEROP 499 I.PUTBASE 484 \\FZEROP 460 I.PUTBASE 449 \\FZEROP 424 I.PUTBASE 415 I.GETBASE 401 \\FZEROP 376 I.PUTBASE 364 I.GETBASE 350 \\FZEROP 320 I.PUTBASE 310 \\FZEROP 285 I.PUTBASE 272 I.GETBASE 260 \\FZEROP 235 I.PUTBASE 223 \\FZEROP 192 I.PUTBASEPTR 182 \\FZEROP 142 I.PUTBASEPTR 122 \\FZEROP 81 I.\\BLT 68 \\FZEROP 13 I.GETBASE) NIL ( 698 65536 650 65536 577 65536 542 65536 504 65536 465 65536 430 65536 382 65536 331 65536 291 65536 243 65536 206 65536 165 65536 105 65536 51 65536) I.\\SETUPGUARDBLOCK :D8 (I 1 LEN I 0 STKP) Mo@HjHdd hjn o@HjHdd hkA @(73 I.PUTBASE 62 \\FZEROP 37 I.PUTBASE 24 \\FZEROP) NIL ( 42 65536 4 65536) I.\\MAKEFREEBLOCK :D8 (I 1 SIZE I 0 STK) Lo@HjHdd hkA o@HjHdd hjn (73 I.PUTBASE 60 \\FZEROP 35 I.PUTBASE 24 \\FZEROP) NIL ( 40 65536 4 65536) I.INITGC :D8 NIL !ojHjHdd holid ojHjHdd hkid onHjHdd hki ojHjHdd hkhi ojHjHdd h`nolki ojHjHdd hjd ojHjHdd hld (286 I.PUTBASEFIXP 274 \\FZEROP 249 I.PUTBASEFIXP 238 \\FZEROP 213 I.CREATEPAGES 181 \\FZEROP 156 I.CREATEPAGES 144 \\FZEROP 119 I.CREATEPAGES 108 \\FZEROP 81 I.CREATEPAGES 69 \\FZEROP 44 I.CREATEPAGES 24 \\FZEROP) (192 PTRNIL) ( 254 655360 218 655360 201 262144 161 655360 124 655360 86 1114112 49 1114112 33 65536 4 1048576) I.NTYPX :D8 (I 0 X) BojHjHdd h@`@`n n(59 I.GETBASE 24 \\FZEROP) (47 PTRNIL 36 PTRNIL) ( 4 1310720) I.\\ALLOCMDSPAGE :D8 (P 6 NXT P 1 VPTR P 0 VP I 0 TYP F 7 I.MDSFREELISTPAGE F 8 |I.NxtMDSPage|) `WXSWXjHl H]Ml\jLdd hY `n H@ I[KlZjJdd hYj NdloWhc ic(152 \\MP.ERROR 123 I.GETBASEPTR 113 \\FZEROP 86 I.\\MAKEMDSENTRY 78 MKI.NEWPAGE 62 MKI.NEWPAGE 53 \\FZEROP 26 I.PUTBASEFIXP 12 NILL) (69 PTRNIL) ( 141 "MDS Free Page link bad. ^N to continue") I.\\MAKEMDSENTRY :D8 (I 1 V I 0 VP) 3ojHjHdd h@AnA (48 I.PUTBASE 35 NILL 24 \\FZEROP) NIL ( 4 1310720) I.\\INITMDSPAGE :D8 (P 5 DISP P 2 LIMIT P 1 NPAGES P 0 SLOP I 2 PREV I 1 SIZE I 0 BASE) jnAAHjHAnAlnknIk\K;jMA]J@jB @b`Ab@`HbLk԰B(65 I.PUTBASEPTR) (92 PTRNIL 76 PTRNIL) () I.\\ASSIGNDATATYPE1A0001 :D8 (I 0 PAGE F 0 NEWTYPEENTRY F 1 FOUNDSOME) @P ic(6 I.\\MAKEMDSENTRY) NIL () I.\\ASSIGNDATATYPE1 :D8 (P 9 FOUNDSOME P 8 NEWTYPEENTRY P 5 NEWDTD P 4 NEWTYPENUM P 3 REDECLARED P 2 DTD P 1 SUPERTYPENUMBER P 0 I.NTYPX I 5 SUPERTYPE I 4 PTRFIELDS I 3 SPECS I 2 SIZE I 1 DESCRIPTORS I 0 NAME F 10 |I.MaxTypeNumber| F 11 |I.MaxSysTypeNum|) Y @ E`jbHon^jNdd h`HlغDJl 7BJl +JlA JlI H Eo Jl j]`i`9l`gggBoo@h gHWi[o@ BqWnHKo@ HKWkcon_jOdd h`LlؽnM`llM`li KLJl o Hg OWmcmJlh Jlh MJl Ml MjMj nkd MlO Mjo@ Jlh LMZj@ BjHJlB JlA JlC Jl D JlI JlH HK$(592 I.PUTBASE 582 I.PUTBASE 572 I.PUTBASEPTR 562 I.PUTBASEPTR 557 I.\\COPY 547 I.PUTBASEPTR 542 I.\\COPY 532 I.PUTBASE 517 I.PUTBASEPTR 504 I.PUTBASEPTR 494 I.PUTBASEPTR 489 PACK* 475 I.PUTBASE 464 I.PUTBASE 445 I.GETBASE 435 I.GETBASEPTR 426 I.\\BLT 416 I.PUTBASEPTR 406 I.PUTBASEPTR 384 \\MAPMDS 363 I.GETBASE 348 MKI.NEWPAGE 295 \\FZEROP 254 LISPERROR 224 ERROR 197 ASKUSER 130 I.GETBASE 120 ERROR 107 I.\\TYPENUMBERFROMNAME 100 I.PUTBASE 90 I.PUTBASEPTR 78 I.GETBASE 66 I.GETBASEPTR 41 \\FZEROP 5 I.\\TYPENUMBERFROMNAME) (379 I.\\ASSIGNDATATYPE1A0001 339 PTRNIL 322 PTRNIL 305 PTRNIL 202 Y 175 N 169 Y 162 Y 157 CROSSCOMPILING 148 CROSSCOMPILING 139 CROSSCOMPILING 51 PTRNIL) ( 483 "Obsolete-" 368 -2048 274 393216 248 "DATA TYPES FULL" 218 "ILLEGAL DATA TYPE" 188 "OK to deallocate DATATYPE " 182 "OK TO REDECLARE DATATYPE " 115 ":INCLUDEd datatype but not currently declared" 22 393216) I.\\TYPENUMBERFROMNAME :D8 (P 2 INDEX P 1 I I 0 TYPE F 4 |I.MaxTypeNumber|) H@?Tk@IHhJon[jKdd h`Ilj IIkY(60 I.GETBASEPTR 39 \\FZEROP) (49 PTRNIL) ( 20 393216) I.\\CREATECELL :D8 (P 3 CNT P 2 NEWCELL P 1 DTD I 0 TYP) @lo onHjHdd h`@lIl jo@ Il Z:IlJj Il kJKj Jd`kK JIlIl Il Il @ (207 I.\\CREATECELL 201 I.PUTBASEPTR 196 I.\\INITMDSPAGE 191 I.GETBASEPTR 183 I.GETBASE 175 I.\\ALLOCMDSPAGE 170 I.GETBASE 157 I.\\BLT 139 I.PUTBASE 126 I.GETBASE 118 I.PUTBASEPTR 113 I.GETBASEPTR 100 I.GETBASEPTR 89 ERROR 84 \\TYPENAMEFROMNUMBER 69 I.GETBASE 42 \\FZEROP 14 HELP) (149 PTRNIL 53 PTRNIL) ( 78 "Attempt to CREATE a type not declared yet" 20 393216 9 "CREATECELL \\LISTP") I.\\NEW2PAGE :D8 (I 0 BASE) @ `n (21 MKI.NEWPAGE 5 MKI.NEWPAGE) (12 PTRNIL) () I.CREATEMDSTYPETABLE :D8 (P 8 PAGE P 5 PAGE P 3 SEGMENT P 1 VP)  ojHjHdd hnhi  jodj-ojZjJdd hIn IkԹkٰҿllhGdljN!Nj1NN %jNlMMlMKn Ml^Խlj O'OjnK5oj\jLdd hll Kؽ`Mص`MK`ljg 'Kdljl K Kn O K3 0nK)oj^jNdd h`jl K؈K`j_jOj nH`n OjkH`n DH`k@`AB ?C1BAk OO"HO@O Ok_Ok_@AHkB HjHj lB WkcK3 #jd_jOdd h`KػD*Kl _lOl nkd K(494 I.PUTBASE 475 I.GETBASE 462 I.\\ATOMCELL 438 \\FZEROP 406 I.PUTBASE 395 I.GETBASE 385 I.\\MOVEBYTES 356 I.\\PUTBASEBYTE 351 I.GETBASE 322 I.\\BLT 292 I.PUTBASE 269 I.PUTBASE 245 I.GETBASE 207 \\FZEROP 172 I.\\INITATOMPAGE 164 I.\\MAKEMDSENTRY 133 I.PUTBASEPTR 82 \\FZEROP 46 I.\\CREATECELL 20 I.\\ALLOCBLOCK) (448 PTRNIL 314 PTRNIL 304 PTRNIL 283 PTRNIL 257 PTRNIL 232 PTRNIL 217 PTRNIL 128 NOBIND 119 PTRNIL 109 PTRNIL 100 PTRNIL) ( 190 524288 65 524288) I.\\INITATOMPAGE :D8 (P 7 OFF P 6 I P 2 VALBASE P 1 ATM P 0 OFFSET I 0 PN) @@l 2l jHNMljHNM mx<~3d>") I.COPYATOM :D8 (P 8 I P 6 OFFST P 5 BASE P 4 N P 3 SYM P 2 WHERE P 1 A0101 P 0 PKG I 0 X F 9 I.SCRATCHSTRING F 10 *COMMON-LISP-PACKAGE*)  @ H`4Ho@ b `@d o@ b@ H !IIZdgogoo@ Hd`o[Wo[H o o[rH o o[YH o o[@H o o['H o o[o@ KJ@ b@ Wl kjW Wj Wl kjW Wl LkOO MNOm@O Ok_MNL (465 I.ATOMNUMBER 460 I.\\MKATOM 442 I.\\PUTBASEBYTE 437 NTHCHARCODE 406 I.GETBASE 396 %ARRAY-OFFSET 377 I.GETBASE 368 I.GETBASEPTR 359 %ARRAY-BASE 340 I.GETBASE 331 NCHARS 321 CONCAT 316 CL:SYMBOL-NAME 307 HELP 288 CL::SIMPLE-STRING= 278 CL:PACKAGE-NAME 263 CL::SIMPLE-STRING= 253 CL:PACKAGE-NAME 238 CL::SIMPLE-STRING= 228 CL:PACKAGE-NAME 213 CL::SIMPLE-STRING= 203 CL:PACKAGE-NAME 188 CL::SIMPLE-STRING= 178 CL:PACKAGE-NAME 139 ERROR 89 \\MVLIST 84 CL:FIND-SYMBOL 78 CL:SYMBOL-NAME 66 CONCAT 54 MKI.DSET 33 CONCAT 5 CL:SYMBOL-PACKAGE) (147 *LISP-PACKAGE* 120 :EXTERNAL 105 :INTERNAL 44 *KEYWORD-PACKAGE* 14 *INTERLISP-PACKAGE*) ( 301 "Can only translate symbols in IL, CL, XCL, CONDITIONS, SI, COMPILER, FASL and keywords" 294 "FASL" 283 "FASL" 269 "COMPILER" 258 "COMPILER" 244 "XCL" 233 "XEROX-COMMON-LISP" 219 "CONDITIONS" 208 "CONDITIONS" 194 "SI" 183 "SYSTEM" 168 "CL" 155 "LISP" 133 "Where is this symbol?" 127 ":" 113 "::" 60 ":" 27 "") I.INITATOMS :D8 (P 1 C F 2 I.SCRATCHSTRING F 3 |I.OneCharAtomBase|) ojHjHdd hn l ch g ljIH l0IIdl9I IkYjdHjHdd h`lcg g g g g g g g g g ngo (261 HELP 240 I.ATOMNUMBER 230 I.COPYATOM 220 I.COPYATOM 210 I.COPYATOM 200 I.COPYATOM 190 I.COPYATOM 180 I.COPYATOM 170 I.COPYATOM 160 I.COPYATOM 150 I.COPYATOM 124 \\FZEROP 95 I.COPYATOM 90 CHARACTER 61 I.COPYATOM 51 I.COPYATOM 43 I.ALLOCSTRING 36 I.CREATEPAGES 24 \\FZEROP) (251 \\INTERPRETER 235 \\INTERPRETER 225 \\INTERPRETER 215 \\GCMAPTABLE 205 \\SETFVAR.UFN 195 \\SETGLOBAL.UFN 185 \\MAKENUMBER 175 \\OVERFLOWMAKENUMBER 165 \\DTEST.UFN 155 \\GC.HANDLEOVERFLOW 145 \\EVALFORM 135 PTRNIL 56 NOBIND) ( 256 " not atom 400Q" 4 458752) I.MAKEINITFIRST :D8 NIL SojHjHdd hhi (80 MKI.NEWPAGE 69 \\FZEROP 44 I.INITGC 39 I.INITUFNTABLE 34 I.INITDATATYPENAMES 29 I.INITATOMS 24 I.\\TURN.ON.HUNKING 19 I.PREINITARRAYS 14 I.INITDATATYPES 9 I.\\SETUP.HUNK.TYPENUMBERS 4 I.CREATEMDSTYPETABLE) NIL ( 49 393216) I.\\COPY :D8 (P 4 VAL P 1 V P 0 R I 0 X) @ dgdg@ dg1@ @  HH I HXIdgdg0j@2@oUojZjJdd h`@no@%oj[jKdd h`@l Ydjd@nj@n Ik@n Idg@ dg@ dg$l Lj@ Lk@ Lg&o@JjJdd h@o (380 ERROR 365 \\FZEROP 323 I.PUTBASE 312 I.PUTBASE 299 I.\\CREATECELL 281 I.%COPY-STRING-TO-ARRAY 266 I.%COPY-ONED-ARRAY 249 I.PUTBASE 237 I.PUTBASE 212 I.\\CREATECELL 192 \\FZEROP 144 \\FZEROP 77 I.\\CONS.UFN 71 I.\\COPY 57 I.\\COPY 51 LAST 45 REVERSE 28 MKI.ATOM 5 TYPENAME) (344 CHARACTER 330 CHARACTER 288 FLOATP 273 STRINGP 257 ONED-ARRAY 202 PTRNIL 154 PTRNIL 99 SMALLP 91 FIXP 35 LISTP 19 NEW-ATOM 11 LITATOM) ( 375 "can't be copied to remote file" 338 458752 175 917504 166 65536 127 983040 119 -65537) I.MAKEINITLASTA0001 :D8 (I 1 A I 0 P) A@ (11 I.SETPROPLIST 6 I.\\COPY) NIL () I.MAKEINITLASTA0002 :D8 (I 1 A I 0 V) A@ (12 I.FSETVAL 7 I.\\COPY) NIL () I.MAKEINITLAST :D8 (P 6 A P 5 X P 2 X P 0 AFL I 0 VERSIONS F 7 MKI.CODELASTPAGE F 8 MKI.CODESTARTOFFSET F 9 INITVALUES F 10 INITPTRS F 11 MKI.PLHA F 12 MKI.TVHA F 13 MKI.PTRS F 14 LOCKEDVARS F 15 MKI.VALUES F 16 MKI.ATOMARRAY) i i Wg Wg lnH`n Y`I`ncHnWW WW dJ WW"LKWW"LCG^ MNdid3 oNNnN  LKKWXMN LKdJW J (oi Ji oi i nWW@ (358 I.DUMPINITPAGES 344 I.SETUPPAGEMAP 334 TERPRI 327 PRIN1 315 PRIN1 307 PRIN1 294 I.\\LOCKVAR 287 GETHASH 265 I.FSETVAL 260 \\EVALV1 230 I.FSETVAL 225 SHOULDNT 219 I.\\COPY 183 \\EVALV1 139 I.ATOMNUMBER 126 \\APPEND2 116 I.POSTINITARRAYS 74 I.FILEARRAYBASE 68 BOUTZEROS 40 I.FILEARRAYBASE 35 MAPHASH 22 MAPHASH 10 I.MAKEINITBFS 5 I.SETUPSTACK) (93 PTRNIL 82 PTRNIL 57 PTRNIL 30 I.MAKEINITLASTA0002 17 I.MAKEINITLASTA0001) ( 321 " does not exist, proceeding anyway." 301 "***Note: Locked var " 204 -65536) I.\\CONS.UFN :D8 (P 27 PRIORPRIOR P 26 PRIOR P 25 CELL P 24 OFFSET P 23 PRIORPRIOR P 22 PRIOR P 21 CELL P 20 OFFSET P 19 CPG P 18 CELL P 17 PG P 16 PRIOR P 15 CELL P 14 OFFSET P 13 CDROFFSET P 12 .MK.NEWCELL P 1 CELL P 0 CNS.PAGE I 1 Y I 0 X F 28 I.LISTPDTD)  AW8l [KlZjJdd hXHj jH`Hj l HjHj nOj l HjHj lHj m Oj@ OjOj nn O ldA`A`n\jLdd hXj j-A`lHj l"OdjhYW8l !O"jrO$_j l1lOj hdO(j[O,3O(O,(O(O,lO.O`O._jOj lO`O(_*j xOOdOlO 0H`O ]jMj lH`O_j &HjHj nH`O_j l HjHj lHj m Oj@ OjOj nOOl OO_ H`Oj _oO"_Ol^jNdd h_&_j l1lOj hO0j O4O0O4O0O4lO64O`O6_jOj lO`O0_2j )OjOj nO`O0_2j l OjOj lOj m O`O4jA O2j@ O2jO2j nO4O0 O2%O4_6O0_4O`O0j _0h_$O&l _"!OjOj nO`O(_*j l OjOj lOj m O`O,jA O*j@ O*jO*j nO,O( O*O,_.O(_,O`O(j _(h(1220 I.GETBASE 1189 I.PUTBASE 1168 I.GETBASE 1156 I.PUTBASEPTR 1146 I.PUTBASEPTR 1126 I.PUTBASE 1115 I.GETBASE 1104 I.GETBASE 1092 I.PUTBASE 1082 I.GETBASE 1058 I.GETBASE 1042 I.GETBASEFIXP 1017 I.GETBASE 984 I.PUTBASE 963 I.GETBASE 951 I.PUTBASEPTR 941 I.PUTBASEPTR 921 I.PUTBASE 910 I.GETBASE 899 I.GETBASE 887 I.PUTBASE 877 I.GETBASE 853 I.GETBASE 838 I.GETBASE 815 I.GETBASE 740 I.GETBASE 724 I.GETBASE 711 \\FZEROP 676 I.GETBASE 648 I.PUTBASE 624 I.GETBASE 612 I.PUTBASEPTR 602 I.PUTBASE 591 I.GETBASE 581 I.GETBASE 571 I.PUTBASE 561 I.GETBASE 538 I.GETBASE 525 I.GETBASE 503 I.GETBASE 452 I.GETBASE 429 I.GETBASE 352 I.GETBASE 336 I.GETBASE 328 I.\\NEXTCONSPAGE 304 I.GETBASEFIXP 270 I.GETBASE 247 I.GETBASE 237 \\FZEROP 192 I.NTYPX 184 I.PUTBASE 171 I.GETBASE 159 I.PUTBASEPTR 149 I.PUTBASE 138 I.GETBASE 128 I.GETBASE 118 I.PUTBASE 108 I.GETBASE 96 I.GETBASE 80 I.GETBASE 64 I.\\NEXTCONSPAGE 55 I.GETBASE 43 \\FZEROP 18 I.GETBASEFIXP) (1211 PTRNIL 1136 PTRNIL 1071 PTRNIL 1008 PTRNIL 931 PTRNIL 866 PTRNIL 827 PTRNIL 801 PTRNIL 667 PTRNIL 550 PTRNIL 514 PTRNIL 491 PTRNIL 441 PTRNIL 415 PTRNIL 260 PTRNIL 217 PTRNIL 205 PTRNIL 73 PTRNIL) () I.\\MAIKO.CONS.UFN :D8 (P 5 .MK.NEWCELL P 0 CNS.PAGE I 1 Y I 0 X)  A lA`A`nYjIdd hXj jH@lA`lJ`Jj lJjJj nMj l JjJj lJj m MjK MjMj nL MX@AljH`Hj lHjHj nMj l HjHj lHj m MjA MjMj n M`lJ`Jj lJjJj nMj l JjJj lJj m MjK MjMj nL M(474 I.PUTBASE 458 I.GETBASE 448 I.PUTBASEPTR 439 I.PUTBASE 428 I.GETBASE 418 I.GETBASE 408 I.PUTBASE 398 I.GETBASE 387 I.GETBASE 371 I.GETBASE 338 I.PUTBASE 329 I.GETBASE 319 I.PUTBASEPTR 310 I.PUTBASE 299 I.GETBASE 289 I.GETBASE 279 I.PUTBASE 269 I.GETBASE 258 I.GETBASE 242 I.GETBASE 217 I.\\NEXTCONSPAGE 210 I.PUTBASE 194 I.GETBASE 184 I.PUTBASEPTR 175 I.PUTBASE 164 I.GETBASE 154 I.GETBASE 144 I.PUTBASE 134 I.GETBASE 123 I.GETBASE 107 I.GETBASE 65 I.GETBASE 55 \\FZEROP 8 I.NTYPX) (364 PTRNIL 348 PTRNIL 235 PTRNIL 100 PTRNIL 84 PTRNIL 35 PTRNIL 23 PTRNIL) () I.\\INITCONSPAGE :D8 (P 1 CELL P 0 J I 1 LINK I 0 BASE) @j@j nl lHl0@`HYjh IjIj lHlX @j@j ln~ @lA`A`n @(133 I.PUTBASEFIXP 99 I.PUTBASE 87 I.GETBASE 75 I.PUTBASE 60 I.GETBASE 50 I.PUTBASEPTR 20 I.PUTBASE 8 I.GETBASE) (122 PTRNIL 111 PTRNIL 40 PTRNIL) () I.\\NEXTCONSPAGE :D8 (P 1 PG P 0 N F 4 I.LISTPDTD) qTl 1Tl Ydd`nH[KlZjJdd h TlI`I`n I(109 I.PUTBASEFIXP 76 I.\\INITCONSPAGE 71 I.\\INITCONSPAGE 63 \\FZEROP 23 I.\\ALLOCMDSPAGE 18 I.GETBASE 7 I.GETBASEFIXP) (98 PTRNIL 87 PTRNIL 33 PTRNIL) () I.\\GETBASEBYTE :D8 (I 1 N I 0 PTR) Akj@A @A l(23 I.GETBASE 13 I.GETBASE) NIL () I.\\PUTBASEBYTE :D8 (I 2 BYTE I 1 DISP I 0 PTR) :B@AbAkj@A BHl@A B B(54 I.PUTBASE 45 I.GETBASE 25 I.GETBASE) (7 SMALLP) () I.CREATEPAGES :D8 (P 1 I I 3 LOCKFLG I 2 BLANKFLG I 1 N I 0 VA) (AkjIH@@`IhCB IkY(31 MKI.NEWPAGE) (20 PTRNIL) () I.\\NEW4PAGE :D8 (I 0 PTR) 8@ `n `n `n (53 MKI.NEWPAGE 37 MKI.NEWPAGE 21 MKI.NEWPAGE 5 MKI.NEWPAGE) (44 PTRNIL 28 PTRNIL 12 PTRNIL) () I.ALLOCSTRING :D8 (P 17 I P 15 %NEW-TYPE-NUMBER P 1 STRINGBASE P 0 FATP I 3 FATFLG I 2 OLD I 1 INITCHAR I 0 N) -@jbj@dno@ AjjAA bCAlH@k؄@l B hBlBl nj BlBl njk Bjh BHkjKdjlCklDo Jdl kjJO lJl nOl B@\lM LlM LLlMh Bl kjBj Blj BlBl njk BlBl njk BlBl njk BlBl njk B^lNl njk NjI __l djh _dlOl nj _dlOl nkd _dlOl njk HkjklDlC__dlOl nOl dlj @__dlO dlO _dlOl njk OjI bAj%H$@kjO"O IO"A O"k_"B@kjO"O IO"A O"k_"(802 I.\\PUTBASEBYTE 768 I.PUTBASE 733 I.PUTBASEPTR 723 I.PUTBASE 703 I.GETBASE 688 I.PUTBASEFIXP 677 I.PUTBASEFIXP 660 I.PUTBASE 650 I.PUTBASE 635 I.GETBASE 604 I.PUTBASE 588 I.GETBASE 573 I.PUTBASE 555 I.GETBASE 540 I.PUTBASE 521 I.GETBASE 506 I.PUTBASEPTR 498 I.\\CREATECELL 483 I.PUTBASEPTR 474 I.PUTBASE 454 I.GETBASE 441 I.PUTBASE 427 I.GETBASE 415 I.PUTBASE 400 I.GETBASE 388 I.PUTBASE 372 I.GETBASE 360 I.PUTBASE 343 I.GETBASE 331 I.PUTBASE 321 %SET-ARRAY-OFFSET 302 I.GETBASE 293 I.PUTBASEPTR 277 I.PUTBASEFIXP 267 I.PUTBASEFIXP 254 I.PUTBASE 239 I.GETBASE 227 %SET-ARRAY-TYPE-NUMBER 206 I.GETBASE 194 SHOULDNT 160 I.PUTBASEPTR 151 I.PUTBASE 131 I.GETBASE 119 I.PUTBASE 100 I.GETBASE 81 STRINGP 74 I.\\ALLOCBLOCK 44 CHCON1 25 LISPERROR) NIL ( 189 "Unknown typ value" 19 "ILLEGAL ARG") I.%COPY-ONED-ARRAY :D8 (P 17 I P 15 ECASE0104 P 14 ECASE0103 P 6 REMOTE-BASE P 5 REMOTE-ARRAY P 4 NCELLS P 3 TYPENUMBER P 2 OFFSET P 1 BASE P 0 SIZE I 0 LOCAL-ARRAY) @l @@@ Jjo KOdlCjblDj[Odl&kPlVjIOdl6j>jj8Odlj-lj&OdljljgOo ko HJKOdlCljlDlbOdl&l VlVl NOdl6l BjkOF!_HOF kkm_JO>OJ_>O>O.lm_lkkm _BdO>O.H O,llO8)OL_RORmOBONORm OBONOPORdgn(dgODON_DngjOR OR_RONl_NOFOBO4lMmKlOH,OT_XOX4OBOVOXm OBOVOJjOX OX_XOVl_VO6n\MZJl lKǿLlkMl/OZOZl O\O^OBO0O2kkn__O_^Nl lOǿOlkOl2O`O`l ObOdOBO>__Ol lOǿOBlkO>l5OfOfl OhOjOBdOBl llO4l__Ol lOǿOBl O: OBO8__Ol l OǿOBl kO8l8OlOll OnOpOBOBl lO0ǿOBODj_"_ O l lO"ǿOBd _*_(O*_&_$O$l jO&ǿO(jkO*l;OrOrl OtOvdOxm d=OBOzO>Ozm d>OBO|O>O| @OBO>O. h(1181 I.PUTDEFN 1162 I.FIXUPPTR 1157 I.\\COPY 1134 READ 1123 I.FIXUPSYM 1098 READ 1087 I.FIXUPSYM 1062 READ 1050 \\GETBASEFIXP 1008 \\GETBASEFIXP 974 I.\\STKMIN 959 \\GETBASEFIXP 919 \\GETBASEFIXP 889 \\GETBASEFIXP 845 \\GETBASEFIXP 813 I.FIXUPPTR 808 I.\\COPY 790 \\GETBASEFIXP 747 \\GETBASEFIXP 716 \\GETBASEFIXP 672 \\GETBASEFIXP 634 \\GETBASEFIXP 590 \\GETBASEFIXP 535 \\GETBASEFIXP 494 \\GETBASEFIXP 441 I.SETSTKNTOFFSET 424 I.FIXUPSYM 354 I.SETSTKNTOFFSET 345 SHOULDNT 282 I.FIXUPSYM 243 AIN 230 SCRATCHARRAY 175 FLENGTH 44 READC 39 READ 15 GETSTREAM 4 READC) (1043 ARRAYP 1034 ARRAYP 1001 ARRAYP 992 ARRAYP 952 ARRAYP 943 ARRAYP 912 ARRAYP 903 ARRAYP 882 ARRAYP 873 ARRAYP 838 ARRAYP 829 ARRAYP 783 ARRAYP 774 ARRAYP 740 ARRAYP 731 ARRAYP 709 ARRAYP 700 ARRAYP 665 ARRAYP 656 ARRAYP 627 ARRAYP 618 ARRAYP 583 ARRAYP 575 ARRAYP 528 ARRAYP 519 ARRAYP 487 ARRAYP 479 ARRAYP 336 I 313 F 299 P 92 L 73 NAME 23 FILERDTBL 10 INPUT) () I.INITUFNTABLE :D8 (P 3 X P 1 I) on HjHdd hlhi ljIdH`Jhgjd IkY[dudKKKkKjjkKKdjj3dkk+dll!dlldllll JZf(210 I.\\SETUFNENTRY 205 SHOULDNT 77 I.\\SETUFNENTRY 39 I.CREATEPAGES 26 \\FZEROP) (70 \\UNKNOWN.UFN 56 \\OPCODES) ( 4 393216) I.\\SETUFNENTRY :D8 (I 3 NEXTRA I 2 NARGS I 1 FN I 0 INDEX) qon HjHdd h`@ص`@bdjA @k@k lC @k@k nBl l(107 I.PUTBASE 93 I.GETBASE 83 I.PUTBASE 72 I.GETBASE 63 I.PUTBASE 58 I.ATOMNUMBER 26 \\FZEROP) (46 PTRNIL 37 PTRNIL) ( 4 393216) (PRETTYCOMPRINT I-NEWCOMS) (RPAQQ I-NEWCOMS ((ADDVARS (LOCKEDFNS \\CLOCK0 \\GETINTERNALCLOCK \\BOXIDIFFERENCE \\BOXIPLUS \\BLT \\SLOWIQUOTIENT) (LOCKEDVARS \\RCLKSECOND \\RCLKMILLISECOND \\MISCSTATS)) (ADDVARS (LOCKEDFNS ERROR RAID \\M44ACTONVMEMFILE \\ACTONVMEMFILESUBR \\ACTONVMEMPAGES \\CLEANUPDISKQUEUE \\CLEARCB \\DISKERROR \\DOACTONDISKPAGES \\DODISKCOMMAND \\EXTENDISFMAP \\M44DOEXTENDVMEMFILE \\GETDISKCB \\INITBFS \\INSUREVMEMFILE \\LISPERROR \\LOOKUPFMAP \\REALDISKDA \\VIRTUALDISKDA \\CLEARWORDS \\TESTPARTITION \\EXTENDEDVMEMINIT \\WHICHPART \\INITIALIZESWAPDISK \\SWAPDISKERROR) (LOCKEDVARS \\DISKREQUESTBLOCK \\SWAPREQUESTBLOCK \\MAINDISK \\SWAPDSK1 \\SWAPDSK2 \\ISFCHUNKSIZE \\EMUSCRATCH \\EMUDISKBUFFERS \\EMUSWAPBUFFERS \\EMUDISKBUFEND \\MAXSWAPBUFFERS \\#DISKBUFFERS |\\InterfacePage| \\ISFMAP \\ISFSCRATCHCAS \\ISFSCRATCHDAS \\SYSDISK \\#SWAPBUFFERS \\MAXDISKDA\s \\DISKDEBUG \\SPAREDISKWRITEBUFFER \\#EMUBUFFERS \\EMUBUFFERS \\LASTVMEMFILEPAGE |\\XVmem| |\\XVmemFmapBase| |\\XVmemFmapHighBase| |\\XVmemDiskBase|)) (FNS I.MAKEINITBFS) (ADDVARS (LOCKEDFNS FLIPCURSORBAR \\SETIOPOINTERS \\KEYHANDLER \\KEYHANDLER1 \\CONTEXTAPPLY \\LOCKPAGES \\DECODETRANSITION \\SMASHLINK \\INCUSECOUNT LLSH \\MAKEFREEBLOCK \\DECUSECOUNT \\MAKENUMBER \\ADDBASE \\PERIODIC.INTERRUPTFRAME \\DOBUFFEREDTRANSITIONS \\TIMER.INTERRUPTFRAME \\CAUSEINTERRUPT \\DOMOUSECHORDING \\KEYBOARDOFF \\TRACKCURSOR \\HARDCURSORUP \\HARDCURSORPOSITION \\HARDCURSORDOWN \\SOFTCURSORUP \\SOFTCURSORUPCURRENT \\SOFTCURSORPOSITION \\SOFTCURSORDOWN \\SOFTCURSORPILOTBITBLT) (LOCKEDVARS |\\InterfacePage| \\CURSORHOTSPOTX \\CURSORHOTSPOTY \\CURRENTCURSOR \\SOFTCURSORWIDTH \\SOFTCURSORHEIGHT \\SOFTCURSORP \\SOFTCURSORUPP \\SOFTCURSORUPBM \\SOFTCURSORDOWNBM \\SOFTCURSORBBT1 \\SOFTCURSORBBT2 \\SOFTCURSORBBT3 \\SOFTCURSORBBT4 \\SOFTCURSORBBT5 \\SOFTCURSORBBT6 \\CURSORDESTINATION \\CURSORDESTHEIGHT \\CURSORDESTWIDTH \\CURSORDESTRASTERWIDTH \\CURSORDESTLINE \\CURSORDESTLINEBASE \\PENDINGINTERRUPT \\PERIODIC.INTERRUPT \\PERIODIC.INTERRUPT.FREQUENCY \\LASTUSERACTION \\MOUSECHORDTICKS \\KEYBOARDEVENTQUEUE \\KEYBUFFERING SCREENWIDTH SCREENHEIGHT \\TIMER.INTERRUPT.PENDING \\EM.MOUSEX \\EM.MOUSEY \\EM.CURSORX \\EM.CURSORY \\EM.UTILIN \\EM.REALUTILIN \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.DISPINTERRUPT \\EM.CURSORBITMAP \\EM.KBDAD4 \\EM.KBDAD5 \\MISCSTATS \\RCLKSECOND)) (FNS I.\\LOCKFN I.\\LOCKVAR I.\\LOCKCELL I.\\LOCKWORDS I.\\LOCKCODE) (ADDVARS (LOCKEDFNS \\FAULTHANDLER \\FAULTINIT \\DOVE.FAULTINIT \\D01.FAULTINIT \\DL.FAULTINIT \\CHAIN.UP.RPT \\MAKESPACEFORLOCKEDPAGE \\PAGEFAULT \\WRITEMAP \\LOOKUPPAGEMAP \\LOCKEDPAGEP \\LOADVMEMPAGE \\MOVEREALPAGE \\INVALIDADDR \\INVALIDVP \\SELECTREALPAGE \\TRANSFERPAGE \\SPECIALRP \\UPDATECHAIN \\MARKPAGEVACANT \\FLUSHPAGE \\CLEARWORDS \\FLUSHVM \\DONEWPAGE \\ASSURE.FPTOVP.PAGE \\DONEWEPHEMERALPAGE \\WRITEDIRTYPAGE1 \\COPYSYS0 \\COPYSYS0SUBR \\RELEASEWORKINGSET \\DOFLUSHVM \\DOLOCKPAGES \\DOTEMPLOCKPAGES \\TEMPUNLOCKPAGES \\MP.ERROR RAID \\DL.NEWFAULTINIT \\DL.MARK.PAGES.UNAVAILABLE \\DL.UNMAPPAGES \\DL.ASSIGNBUFFERS \\D01.ASSIGNBUFFERS \\DOCOMPRESSVMEM \\MOVEVMEMFILEPAGE \\SET.VMEM.FULL.STATE \\HINUM \\LONUM \\ATOMCELL SETTOPVAL) ( LOCKEDVARS \\REALPAGETABLE \\RPTLAST \\PAGEFAULTCOUNTER \\UPDATECHAINFREQ \\RPOFFSET \\RPTSIZE \\LOCKEDPAGETABLE \\EMBUFBASE \\EMBUFVP \\EMBUFRP \\LASTACCESSEDVMEMPAGE \\MAXSHORTSEEK \\MAXCLEANPROBES \\MINSHORTSEEK \\DIRTYPAGECOUNTER \\DIRTYPAGEHINT \\VMEM.INHIBIT.WRITE \\VMEM.PURE.LIMIT \\VMEM.FULL.STATE \\GUARDVMEMFULL VMEM.COMPRESS.FLG \\KBDSTACKBASE \\MISCSTACKBASE \\DOFAULTINIT \\FPTOVP \\MACHINETYPE \\VMEMACCESSFN \\TELERAIDBUFFER \\EMUDISKBUFFERS \\EMUDISKBUFEND \\MAXSWAPBUFFERS \\EMUBUFFERS \\#EMUBUFFERS \\#SWAPBUFFERS \\#DISKBUFFERS \\RCLKSECOND \\RCLKMILLISECOND \\VALSPACE \\EMUSWAPBUFFERS \\EM.CURSORBITMAP \\PAGEMAP |\\PageMapTBL| \\IOCBPAGE \\IOPAGE \\MISCSTATS \\DEFSPACE |\\InterfacePage| \\LASTVMEMFILEPAGE |\\DoveIORegion| |\\MaxScreenPage| \\NEWVMEMPAGEADDED)) (FNS I.DUMPINITPAGES) (VARS INITCONSTANTS) (FNS I.SETUPPAGEMAP I.ADDPME I.MAKEROOMFORPME I.MAPPAGES) (FNS I.SETUPSTACK I.\\SETUPSTACK1 I.\\SETUPGUARDBLOCK I.\\MAKEFREEBLOCK) (ADDVARS (LOCKEDFNS \\RESETSTACK0 \\MAKEFRAME \\SETUPSTACK1 \\MAKEFREEBLOCK \\FAULTHANDLER \\KEYHANDLER \\DUMMYKEYHANDLER \\DOTELERAID \\DUMMYTELERAID \\DOHARDRETURN \\DOGC \\CAUSEINTERRUPT \\INTERRUPTFRAME \\CODEFORTFRAME \\DOSTACKOVERFLOW \\UNLOCKPAGES \\DOMISCAPPLY) ( LOCKEDVARS |\\InterfacePage| \\DEFSPACE \\STACKSPACE \\KBDSTACKBASE \\MISCSTACKBASE \\SAVED.USER.CONTEXT \\RUNNING.PROCESS \\NEED.HARDRESET.CLEANUP)) (FNS I.INITGC) (FNS I.NTYPX I.\\ALLOCMDSPAGE I.\\MAKEMDSENTRY I.\\INITMDSPAGE I.\\ASSIGNDATATYPE1 I.\\TYPENUMBERFROMNAME I.\\CREATECELL I.\\NEW2PAGE) (FNS I.CREATEMDSTYPETABLE I.INITDATATYPES I.INITDATATYPENAMES) (VARS \\BUILT-IN-SYSTEM-TYPES) (FNS I.FSETVAL I.SETPROPLIST I.PUTDEFN I.\\BLT) (FNS I.\\MKATOM I.\\CREATE.SYMBOL I.\\INITATOMPAGE I.\\MOVEBYTES I.\\STKMIN) (FNS I.COPYATOM I.INITATOMS) (FNS I.MAKEINITFIRST I.\\COPY I.MAKEINITLAST) (FNS I.\\CONS.UFN I.\\MAIKO.CONS.UFN I.\\INITCONSPAGE I.\\NEXTCONSPAGE) (FNS I.\\GETBASEBYTE I.\\PUTBASEBYTE I.CREATEPAGES I.\\NEW4PAGE) (FILES (SYSLOAD FROM VALUEOF DIRECTORIES) CMLARRAY-SUPPORT) (FNS I.ALLOCSTRING I.%COPY-ONED-ARRAY I.%COPY-STRING-TO-ARRAY) (FNS I.\\#BLOCKDATACELLS I.\\PREFIXALIGNMENT? I.\\ALLOCBLOCK I.\\MAIKO.ALLOCBLOCK I.\\ALLOCBLOCK.NEW I.\\MAKEFREEARRAYBLOCK I.\\MERGEBACKWARD I.\\LINKBLOCK I.\\ALLOCHUNK) (FNS I.PREINITARRAYS I.POSTINITARRAYS I.FILEARRAYBASE I.FILEBLOCKTRAILER I.FILECODEBLOCK I.FILEPATCHBLOCK) (FNS I.\\SETUP.HUNK.TYPENUMBERS I.\\COMPUTE.HUNK.TYPEDECLS I.\\TURN.ON.HUNKING I.\\SETUP.TYPENUM.TABLE) (FNS I.DCODERD) (VARS \\OPCODES (I.CODERDTBL ( COPYREADTABLE (QUOTE ORIG)))) (P (SETSYNTAX (CHARCODE ^Y) (QUOTE (MACRO (LAMBDA (FILE RDTBL) ( EVALFORMAKEINIT (READ FILE RDTBL))))) I.CODERDTBL) (SETSYNTAX (CHARCODE \|) (QUOTE (MACRO ALWAYS READVBAR)) I.CODERDTBL) (READTABLEPROP I.CODERDTBL (QUOTE USESILPACKAGE) NIL)) (FNS I.INITUFNTABLE I.\\SETUFNENTRY) (VARS INITPTRS INITVALUES) (DECLARE\: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) MAKEINIT)))) (ADDTOVAR LOCKEDFNS \\CLOCK0 \\GETINTERNALCLOCK \\BOXIDIFFERENCE \\BOXIPLUS \\BLT \\SLOWIQUOTIENT) (ADDTOVAR LOCKEDVARS \\RCLKSECOND \\RCLKMILLISECOND \\MISCSTATS) (ADDTOVAR LOCKEDFNS ERROR RAID \\M44ACTONVMEMFILE \\ACTONVMEMFILESUBR \\ACTONVMEMPAGES \\CLEANUPDISKQUEUE \\CLEARCB \\DISKERROR \\DOACTONDISKPAGES \\DODISKCOMMAND \\EXTENDISFMAP \\M44DOEXTENDVMEMFILE \\GETDISKCB \\INITBFS \\INSUREVMEMFILE \\LISPERROR \\LOOKUPFMAP \\REALDISKDA \\VIRTUALDISKDA \\CLEARWORDS \\TESTPARTITION \\EXTENDEDVMEMINIT \\WHICHPART \\INITIALIZESWAPDISK \\SWAPDISKERROR) (ADDTOVAR LOCKEDVARS \\DISKREQUESTBLOCK \\SWAPREQUESTBLOCK \\MAINDISK \\SWAPDSK1 \\SWAPDSK2 \\ISFCHUNKSIZE \\EMUSCRATCH \\EMUDISKBUFFERS \\EMUSWAPBUFFERS \\EMUDISKBUFEND \\MAXSWAPBUFFERS \\#DISKBUFFERS |\\InterfacePage| \\ISFMAP \\ISFSCRATCHCAS \\ISFSCRATCHDAS \\SYSDISK \\#SWAPBUFFERS \\MAXDISKDA\s \\DISKDEBUG \\SPAREDISKWRITEBUFFER \\#EMUBUFFERS \\EMUBUFFERS \\LASTVMEMFILEPAGE |\\XVmem| |\\XVmemFmapBase| |\\XVmemFmapHighBase| |\\XVmemDiskBase|) (ADDTOVAR LOCKEDFNS FLIPCURSORBAR \\SETIOPOINTERS \\KEYHANDLER \\KEYHANDLER1 \\CONTEXTAPPLY \\LOCKPAGES \\DECODETRANSITION \\SMASHLINK \\INCUSECOUNT LLSH \\MAKEFREEBLOCK \\DECUSECOUNT \\MAKENUMBER \\ADDBASE \\PERIODIC.INTERRUPTFRAME \\DOBUFFEREDTRANSITIONS \\TIMER.INTERRUPTFRAME \\CAUSEINTERRUPT \\DOMOUSECHORDING \\KEYBOARDOFF \\TRACKCURSOR \\HARDCURSORUP \\HARDCURSORPOSITION \\HARDCURSORDOWN \\SOFTCURSORUP \\SOFTCURSORUPCURRENT \\SOFTCURSORPOSITION \\SOFTCURSORDOWN \\SOFTCURSORPILOTBITBLT) (ADDTOVAR LOCKEDVARS |\\InterfacePage| \\CURSORHOTSPOTX \\CURSORHOTSPOTY \\CURRENTCURSOR \\SOFTCURSORWIDTH \\SOFTCURSORHEIGHT \\SOFTCURSORP \\SOFTCURSORUPP \\SOFTCURSORUPBM \\SOFTCURSORDOWNBM \\SOFTCURSORBBT1 \\SOFTCURSORBBT2 \\SOFTCURSORBBT3 \\SOFTCURSORBBT4 \\SOFTCURSORBBT5 \\SOFTCURSORBBT6 \\CURSORDESTINATION \\CURSORDESTHEIGHT \\CURSORDESTWIDTH \\CURSORDESTRASTERWIDTH \\CURSORDESTLINE \\CURSORDESTLINEBASE \\PENDINGINTERRUPT \\PERIODIC.INTERRUPT \\PERIODIC.INTERRUPT.FREQUENCY \\LASTUSERACTION \\MOUSECHORDTICKS \\KEYBOARDEVENTQUEUE \\KEYBUFFERING SCREENWIDTH SCREENHEIGHT \\TIMER.INTERRUPT.PENDING \\EM.MOUSEX \\EM.MOUSEY \\EM.CURSORX \\EM.CURSORY \\EM.UTILIN \\EM.REALUTILIN \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.DISPINTERRUPT \\EM.CURSORBITMAP \\EM.KBDAD4 \\EM.KBDAD5 \\MISCSTATS \\RCLKSECOND) (ADDTOVAR LOCKEDFNS \\FAULTHANDLER \\FAULTINIT \\DOVE.FAULTINIT \\D01.FAULTINIT \\DL.FAULTINIT \\CHAIN.UP.RPT \\MAKESPACEFORLOCKEDPAGE \\PAGEFAULT \\WRITEMAP \\LOOKUPPAGEMAP \\LOCKEDPAGEP \\LOADVMEMPAGE \\MOVEREALPAGE \\INVALIDADDR \\INVALIDVP \\SELECTREALPAGE \\TRANSFERPAGE \\SPECIALRP \\UPDATECHAIN \\MARKPAGEVACANT \\FLUSHPAGE \\CLEARWORDS \\FLUSHVM \\DONEWPAGE \\ASSURE.FPTOVP.PAGE \\DONEWEPHEMERALPAGE \\WRITEDIRTYPAGE1 \\COPYSYS0 \\COPYSYS0SUBR \\RELEASEWORKINGSET \\DOFLUSHVM \\DOLOCKPAGES \\DOTEMPLOCKPAGES \\TEMPUNLOCKPAGES \\MP.ERROR RAID \\DL.NEWFAULTINIT \\DL.MARK.PAGES.UNAVAILABLE \\DL.UNMAPPAGES \\DL.ASSIGNBUFFERS \\D01.ASSIGNBUFFERS \\DOCOMPRESSVMEM \\MOVEVMEMFILEPAGE \\SET.VMEM.FULL.STATE \\HINUM \\LONUM \\ATOMCELL SETTOPVAL) (ADDTOVAR LOCKEDVARS \\REALPAGETABLE \\RPTLAST \\PAGEFAULTCOUNTER \\UPDATECHAINFREQ \\RPOFFSET \\RPTSIZE \\LOCKEDPAGETABLE \\EMBUFBASE \\EMBUFVP \\EMBUFRP \\LASTACCESSEDVMEMPAGE \\MAXSHORTSEEK \\MAXCLEANPROBES \\MINSHORTSEEK \\DIRTYPAGECOUNTER \\DIRTYPAGEHINT \\VMEM.INHIBIT.WRITE \\VMEM.PURE.LIMIT \\VMEM.FULL.STATE \\GUARDVMEMFULL VMEM.COMPRESS.FLG \\KBDSTACKBASE \\MISCSTACKBASE \\DOFAULTINIT \\FPTOVP \\MACHINETYPE \\VMEMACCESSFN \\TELERAIDBUFFER \\EMUDISKBUFFERS \\EMUDISKBUFEND \\MAXSWAPBUFFERS \\EMUBUFFERS \\#EMUBUFFERS \\#SWAPBUFFERS \\#DISKBUFFERS \\RCLKSECOND \\RCLKMILLISECOND \\VALSPACE \\EMUSWAPBUFFERS \\EM.CURSORBITMAP \\PAGEMAP |\\PageMapTBL| \\IOCBPAGE \\IOPAGE \\MISCSTATS \\DEFSPACE |\\InterfacePage| \\LASTVMEMFILEPAGE |\\DoveIORegion| |\\MaxScreenPage| \\NEWVMEMPAGEADDED) (RPAQQ INITCONSTANTS ((* |;;;| "(LISPNAME VALUE BCPLNAME UCODENAME)") (CDRCODING 1 T T) (* \; "IF CDRCODING=0, CDR CODING IS OFF, OTHERWISE ON") (* |;;| "type numbers -- repeated on LLBASIC too") (\\SMALLP 1 SMALLTYPE |SmallType|) (\\FIXP 2 INTEGERTYPE |FixpType|) (\\FLOATP 3 FLTPTTYPE |FloatpType|) (\\LITATOM 4 ATOMTYPE |AtomType|) (\\LISTP 5 LISTTYPE |ListType|) (\\ARRAYP 6 ARRAYPTRTYPE |ArrayType|) (\\STRINGP 7 STRINGPTRTYPE) (\\STACKP 8) (\\CHARACTERP 9) (\\VMEMPAGEP 10 NIL |VMemPagePType|) (\\STREAM 11 NIL STREAMTYPE) (* |;;| "TYPE TABLE CONSTANTS") (\\TT.TYPEMASK 2047 |TTTypeMask| T) (\\TT.NOREF 32768 NIL T) (\\TT.SYMBOLP 16384 NIL T) (\\TT.FIXP 8192) (\\TT.NUMBERP 4096) (\\TT.ATOM 2048) (* |;;| "page map") (|\\PMblockSize| 32 PMBLOCKSIZE) (|\\STATSsize| 8 T) ( |\\NumPMTpages| 8) (|\\EmptyPMTEntry| 65535 T) (|\\FirstVmemBlock| 2 T) (\\MAXVMPAGE 65533) ( \\MAXVMSEGMENT 255) (* |;;| "interface page") (|\\IFPValidKey| 5603 T) (* |;;| "MDS") ( |\\FirstMDSPage| 16382) (|\\MaxMDSPage| 65533) (|\\DefaultSecondMDSPage| 65532) (|\\MDSIncrement| 512) (|\\PagesPerMDSUnit| 2) (* \; "(FOLDLO \\MDSIncrement WORDSPERPAGE)") (* |;;| "arrays") (\\ARRAYSPACE (23 0)) (|\\FirstArraySegment| 23) (|\\FirstArrayPage| 5888) (\\ARRAYSPACE2 (64 0)) ( |\\DefaultSecondArrayPage| 16384) (* |;;| "stack block constants") (|\\StackMask| 57344 T T) ( |\\FxtnBlock| 49152 T T) (|\\GuardBlock| 57344 T T) (|\\BFBlock| 32768 T T) (|\\FreeStackBlock| 40960 T T) (|\\NotStackBlock| 0) (* \; "none of the above") (|\\MinExtraStackWords| 32 T T) (* |;;| "backspace kludge") (ERASECHARCODE 0 T) (* |;;| "GC constants") (\\HT1CNT 1024 NIL T) (\\HTSTKBIT 512 NIL T) (\\HTCNTMASK 64512 NIL T) (\\HTMAINSIZE 65536 NIL T) (\\HTCOLLSIZE 262144 NIL T) (\\HTENDFREE 1 NIL T) (\\HTFREEPTR 0 NIL T) (* |;;| "pointers and lengths of various data spaces") (\\ATOMSPACE (0 0 ) (|ATOMspace| NIL) (|atomHiVal| NIL)) (|\\AtomHI| 0) (\\CHARHI 7) (* \; "overlap character space and the atom hash table space") (|\\AtomHashTable| (7 0) (|AHTspace| |AHTbase|)) (|\\AtomHTpages| 256 AHTSIZE) (|\\LastAtomPage| 255) (|\\MaxAtomFrLst| 65535) ( \\SMALLPOSPSPACE (14 0)) (|\\SmallPosHi| 14 |SMALLPOSspace| |smallpl|) (\\SMALLNEGSPACE (15 0)) ( |\\SmallNegHi| 15 |SMALLNEGspace| |smallneg|) (|\\NumSmallPages| 512) (\\PNPSPACE (8 0) (|PNPspace| |PNPbase|)) (\\PNAME.HI 8) (\\DEFSPACE (10 0) (|DEFspace| |DEFbase|) (|DEFspace| |DEFbase|)) (\\DEF.HI 10) (\\VALSPACE (12 0) (|TOPVALspace| |TOPVALbase|) (|VALspace| |VALbase|)) (\\VAL.HI 12) ( \\PLISTSPACE (2 0) (|PLISTspace| |PLISTbase|)) (\\PLIST.HI 2) (\\PAGEMAP (5 0) (|PAGEMAPspace| |PAGEMAPbase|)) (|\\NumPageMapPages| 256) (|\\PageMapTBL| (6 512) (|PMTspace| |PMTbase|)) ( |\\InterfacePage| (6 0) (|INTERFACEspace| |INTERFACEbase|) (|INTERFACEspace| |INTERFACEbase|)) ( \\IOPAGE (0 65280)) (|\\DoveIORegion| (0 16384)) (\\IOCBPAGE (0 256)) (\\FPTOVP (2 0)) ( |\\MDSTypeTable| (20 0) (|MDSTYPEspace| |MDSTYPEbase|) (|MDSTYPEspace| |MDSTYPEbase|)) (|\\MDSTTsize| 256 T) (\\MISCSTATS (6 2560) (|STATSspace| |MISCSTATSbase|)) (|\\UFNTable| (6 3072) NIL (|STATSspace| |UFNTablebase|)) (|\\UFNTableSize| 2) (|\\DTDSpaceBase| (6 4096) (|DTDspace| |DTDbase|) (|DTDspace| |DTDbase|)) (|\\DTDSize| 18 T) (\\LISTPDTD (6 4186)) (|\\EndTypeNumber| 2047) (\\LOCKEDPAGETABLE (6 28672)) (|\\NumLPTPages| 16) (\\STACKSPACE (1 0) (|STACKspace| NIL) (|STACKspace| NIL)) ( |\\GuardStackAddr| 61440) (|\\LastStackAddr| 65534) (\\STACKHI 1 T T) (\\HTMAIN (16 0) (|HTMAINspace| |HTMAINbase|) (|HTMAINspace| |HTMAINbase|)) (|\\HTMAINnpages| 256 T) (\\HTOVERFLOW (17 0) NIL (NIL |HTOVERFLOWbase|)) (\\HTBIGCOUNT (17 32768)) (\\HTCOLL (10 0) NIL (|HTCOLLspace| |HTCOLLbase|)) ( \\DISPLAYREGION (18 0)) (|\\D1BCPLspace| 0 T |LEmubrHiVal|) (|\\D0BCPLspace| 0 T) (* |;;| "Interface Page locations") (|\\CurrentFXP| 0 T T) (|\\ResetFXP| 1 T T) (|\\SubovFXP| 2 T T) ( |\\KbdFXP| 3 T T) (|\\HardReturnFXP| 4 T T) (\\GCFXP 5) (\\FAULTFXP 6 T T) (|\\MiscFXP| 14 T T) ( |\\TeleRaidFXP| 24 T T) (* |;;| "emulator segment locations") (DCB.EM 272) (DISPINTERRUPT.EM 273) ( CURSORBITMAP.EM 281) (KBDAD0.EM 65052) (KBDAD1.EM 65053) (KBDAD2.EM 65054) (KBDAD3.EM 65055) ( UTILIN.EM 65048) (CURSORX.EM 278) (CURSORY.EM 279) (MOUSEX.EM 276) (MOUSEY.EM 277) (|\\LispKeyMask| 8192 T T) (|\\BcplKeyMask| 4352 T T) (* \; "Machine types") (\\MAIKO 3) (\\DOLPHIN 4) (\\DORADO 5) ( \\DANDELION 6) (\\DAYBREAK 8) (* |;;| "FOR DLION (AND DAYBREAK)") (\\VP.DISPLAY 4608) (\\NP.DISPLAY 202) (* \; "for Dorado display 1024x808 pixels / (16 pixels/word x 256 words/page)") ( \\NP.WIDEDOVEDISPLAY 243) (* \; "Wide Dove display 1152x864 pixels") (\\WIDEDOVEDISPLAYWIDTH 1152) ( \\RP.AFTERDISPLAY 206) (* \; "Includes 4 pages for cursor") (\\RP.AFTERDOVEDISPLAY 243) (* \; "if big screen") (\\RP.DISPLAY 0) (\\RP.TEMPDISPLAY 2561) (\\RP.MISCLOCKED 2804) (* \; "(+ \\RP.TEMPDISPLAY \\NP.WIDEDOVEDISPLAY)") (\\RP.STACK 768) (\\VP.STACK 256) (\\RP.MAP 256) ( \\NP.MAP 256) (\\RP.IOPAGE 512) (* \; "The DOVE IOCBPAGE can go anywhere, but should be under the 1mbyte range") (\\RP.DOVEIOCBPAGE 543) ( \\RP.DOVEIORGN 544) (\\VP.DOVEIORGN 64) (\\DOVEIORGNSIZE 64) (\\VP.IOPAGE 255) (\\VP.IFPAGE 1536) ( \\VP.FPTOVP 512) (\\NP.FPTOVP 1024) (\\RP.FPTOVP 1024) (\\RP.STARTBUFFERS 640) (\\VP.TYPETABLE 5120) ( \\NP.TYPETABLE 256) (\\RP.TYPETABLE 2048) (\\VP.GCTABLE 4096) (\\NP.GCTABLE 256) (\\RP.GCTABLE 2304) ( \\VP.GCOVERFLOW 4352) (\\NP.GCOVERFLOW 1) (\\RP.GCOVERFLOW 2560) (\\FP.IFPAGE 2) (\\VP.IOCBS 1) ( \\VP.PRIMARYMAP 1538) (\\VP.SECONDARYMAP 1280) (\\VP.LPT 1648) (\\VP.INITSCRATCH 8) (\\VP.RPT 128) ( \\VP.BUFFERS 218) (* \; "DLion processor commands") (\\DL.PROCESSORBUSY 32768) (\\DL.SETTOD 32769) ( \\DL.READTOD 32770) (\\DL.READPID 32771) (\\DL.BOOTBUTTON 32772))) (ADDTOVAR LOCKEDFNS \\RESETSTACK0 \\MAKEFRAME \\SETUPSTACK1 \\MAKEFREEBLOCK \\FAULTHANDLER \\KEYHANDLER \\DUMMYKEYHANDLER \\DOTELERAID \\DUMMYTELERAID \\DOHARDRETURN \\DOGC \\CAUSEINTERRUPT \\INTERRUPTFRAME \\CODEFORTFRAME \\DOSTACKOVERFLOW \\UNLOCKPAGES \\DOMISCAPPLY) (ADDTOVAR LOCKEDVARS |\\InterfacePage| \\DEFSPACE \\STACKSPACE \\KBDSTACKBASE \\MISCSTACKBASE \\SAVED.USER.CONTEXT \\RUNNING.PROCESS \\NEED.HARDRESET.CLEANUP) (RPAQQ \\BUILT-IN-SYSTEM-TYPES ((SMALLP) (FIXP 2) (FLOATP 2) (LITATOM) (LISTP 4 (0 2)) (ARRAYP 6 (0)) (STRINGP 6 (0)) (STACKP 2 NIL \\RECLAIMSTACKP) (CHARACTER) (VMEMPAGEP 256 NIL RELEASINGVMEMPAGE) ( STREAM) (BITMAP) (COMPILED-CLOSURE 4 (0 2)) (ONED-ARRAY 8 (0)) (TWOD-ARRAY 10 (0)) (GENERAL-ARRAY 10 ( 0 8)) (BIGNUM) (RATIO) (COMPLEX) (PATHNAME) (NEW-ATOM 10 (2 4 6)) (FILLER22) (FILLER23) (FILLER24) ( FILLER25) (FILLER26) (FILLER27) (FILLER28) (FILLER29) (FILLER30))) (FILESLOAD (SYSLOAD FROM VALUEOF DIRECTORIES) CMLARRAY-SUPPORT) (RPAQQ \\OPCODES ((0 -X- 0) (1 CAR 0 T 0 \\CAR.UFN) (2 CDR 0 T 0 \\CDR.UFN) (3 LISTP 0 T 0 LISTP) (4 NTYPX 0 T 0 NTYPX) (5 TYPEP 1 TYPEP 0 \\TYPEP.UFN) (6 DTEST 4 ATOM 0 \\DTEST.UFN) (7 UNWIND 2 T ( UNWIND 1) \\UNWIND.UFN) (8 FN0 4 FN 1) (9 FN1 4 FN 0) (10 FN2 4 FN -1) (11 FN3 4 FN -2) (12 FN4 4 FN -3) (13 FNX 5 FNX FNX) (14 APPLYFN 0 T -1) (15 CHECKAPPLY* 0 T 0 \\CHECKAPPLY* (4K 12K)) (16 RETURN 0 T (JUMP 1) \\HARDRETURN) (17 BIND 2) (18 UNBIND 0) (19 DUNBIND 0) (20 RPLPTR.N 1 T -1 \\RPLPTR.UFN (4K )) (21 GCREF 1 T 0 \\HTFIND) (22 ASSOC 0 T -1 ASSOC (4K DORADO)) (23 GVAR_ 4 ATOM 0 \\SETGLOBALVAL.UFN ) (24 RPLACA 0 T -1 \\RPLACA.UFN 4K) (25 RPLACD 0 T -1 \\RPLACD.UFN 4K) (26 CONS 0 T -1 \\CONS.UFN) ( 27 CMLASSOC 0 T -1 CL::%SIMPLE-ASSOC (4K DORADO)) (28 FMEMB 0 T -1 FMEMB (4K DORADO)) (29 CMLMEMBER 0 T -1 CL::%SIMPLE-MEMBER (4K DORADO)) (30 FINDKEY 1 T 0 \\FINDKEY.UFN) (31 CREATECELL 0 T 0 \\CREATECELL 4K) (32 BIN 0 T 0 \\BIN 4K) (33 BOUT 0 T -1 \\BOUT (4K DORADO)) (34 POPDISP 0 T 0 \\POPDISP.UFN (4K DORADO)) (35 RESTLIST 1 T -1 \\RESTLIST.UFN) (36 MISCN 2 T 1 \\MISCN.UFN (DORADO DLION DBREAK)) (37 |unused|) (38 RPLCONS 0 T -1 \\RPLCONS (4K DORADO)) (39 LISTGET 0 T -1 LISTGET (4K DORADO)) (40 |unused|) (41 |unused|) (42 |unused|) (43 |unused|) (44 EVAL 0 T 0 \\EVAL) (45 ENVCALL 0 T (JUMP 0) \\ENVCALL.UFN) (46 TYPECHECK 0 T 0 \\TYPECHECK.UFN) (47 STKSCAN 0 T 0 \\STKSCAN) (48 BUSBLT 1 (WORDSOUT BYTESOUT BYTESOUTSWAPPED NYBBLESOUT WORDSIN BYTESIN BYTESINSWAPPED NYBBLESINSWAPPED) -3 \\BUSBLT.UFN (4K DORADO)) (49 MISC8 1 (IBLT1 IBLT2) -7 \\MISC8.UFN (4K DORADO)) (50 UBFLOAT3 1 (POLY MATRIX.3X3 MATRIX.4X4 MATRIX.133 MATRIX.331 MATRIX.144 MATRIX.441 UBASET1) (-2 1) \\UNBOXFLOAT3 (4K DORADO)) (51 TYPEMASK.N 1 T 0 \\TYPEMASK.UFN) (52 RDPROLOGPTR 0 T 0 RAID (4K DORADO)) (53 RDPROLOGTAG 0 T 0 RAID (4K DORADO)) (54 WRTPTR&TAG 0 T -2 RAID (4K DORADO)) (55 WRTPTR&0TAG 0 T -1 RAID (4K DORADO )) (56 MISC7 1 (PSEUDOCOLOR \\FASTBITMAPBIT) -6 \\MISC7.UFN (4K DORADO)) (57 DOVEMISC 1 (READIW WRITEIO WRITEMP RDTIMER BYTESWAP LOCKMEM NOTIFYIOP SETWP) (0 -1 0 0 0 -3 0 0)) (58 EQL 0 T -1 EQL) (59 DRAWLINE 0 T -8 \\DRAWLINE.UFN (4K DORADO)) (60 STORE.N 1 T 0 \\STORE.N.UFN) (61 COPY.N 1 T 1 \\COPY.N.UFN) (62 RAID 0 T 0 RAID T) (63 \\RETURN 0 T 0 \\RETURN) ((64 70) IVAR 0 IVAR 1) (71 IVARX 1 IVAR 1) ((72 78) PVAR 0 PVAR 1) (79 PVARX 1 PVAR 1) ((80 86) FVAR 0 FVAR 1) (87 FVARX 1 FVAR 1) ((88 94) PVAR_ 0 PVAR 0) (95 PVARX_ 1 PVAR 0) (96 GVAR 4 ATOM 1) (97 ARG0 0 T 0 \\ARG0 T) (98 IVARX_ 1 IVAR 0) (99 FVARX_ 1 FVAR 0) (100 COPY 0 T 1) (101 MYARGCOUNT 0 T 1 \\MYARGCOUNT T) (102 MYALINK 0 T 1) ( 103 ACONST 4 ATOM 1) (104 \'NIL 0 T 1) (105 \'T 0 T 1) (106 \'0 0 T 1) (107 \'1 0 T 1) (108 SIC 1 SIC 1) (109 SNIC 1 SNIC 1) (110 SICX 2 SICX 1) (111 GCONST 4 GCONST 1) (112 |unused|) (113 READFLAGS 0 T 0 \\READFLAGS) (114 READRP 0 T 0 \\READRP) (115 WRITEMAP 0 T -2 \\WRITEMAP DORADO) (116 READPRINTERPORT 0 T 1 \\READPRINTERPORT.UFN 4K) (117 WRITEPRINTERPORT 0 T 0 \\WRITEPRINTERPORT.UFN 4K) (118 PILOTBITBLT 0 T -1 \\PILOTBITBLT) (119 RCLK 0 T 0 \\RCLKSUBR) (120 MISC1 1 (|error| INPUT OUTPUT |error| |error| |error| |error| |error| |error| RWMUFMAN) 0 \\MISC1.UFN) (121 MISC2 1 (?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?10) -1 \\MISC2.UFN) (122 RECLAIMCELL 0 T 0 \\GCRECLAIMCELL DORADO) (123 GCSCAN1 0 T 0 \\GCSCAN1) (124 GCSCAN2 0 T 0 \\GCSCAN2) (125 SUBRCALL 2 SUBRCALL) (126 CONTEXTSWITCH 0 T 0 \\CONTEXTSWITCH) (127 RETCALL 4 FNX (JUMP 1) \\RETCALL) ((128 143) JUMP 0 JUMP JUMP NIL) ((144 159) FJUMP 0 JUMP CJUMP NIL) ((160 175) TJUMP 0 JUMP CJUMP NIL) (176 JUMPX 1 JUMPX JUMP) (177 JUMPXX 2 JUMPXX JUMP) (178 FJUMPX 1 JUMPX CJUMP) (179 TJUMPX 1 JUMPX CJUMP) (180 NFJUMPX 1 JUMPX NCJUMP) (181 NTJUMPX 1 JUMPX NCJUMP) (182 AREF1 0 T -1 %AREF1 (4K DORADO)) (183 ASET1 0 T -2 %ASET1 (4K DORADO)) (( 184 190) PVAR_^ 0 PVAR -1 NIL) (191 POP 0 T -1) (192 POP.N 1 T (POP.N 1) \\POP.N.UFN) (193 ATOMCELL.N 1 T 0 \\ATOMCELL) (194 GETBASEBYTE 0 T -1 \\GETBASEBYTE) (195 INSTANCEP 4 ATOM 0 \\INSTANCEP.UFN NIL) (196 BLT 0 T -2 \\BLT) (197 MISC10 1 T -9 \\MISC10.UFN (4K DORADO)) (198 P-MISC2 1 (GET-NEXT-RUN) -1 \\P-MISC2.UFN) (199 PUTBASEBYTE 0 T -2 \\PUTBASEBYTE) (200 GETBASE.N 1 T 0) (201 GETBASEPTR.N 1 T 0) ( 202 GETBITS.N.FD 2 T 0) (203 |unused|) (204 CMLEQUAL 0 T -1 CL:EQUAL (4K 12K DORADO)) (205 PUTBASE.N 1 T -1 \\PUTBASE.UFN) (206 PUTBASEPTR.N 1 T -1 \\PUTBASEPTR.UFN) (207 PUTBITS.N.FD 2 T -1 \\PUTBITS.UFN ) (208 ADDBASE 0 T -1 \\ADDBASE) (209 VAG2 0 T -1 \\VAG2) (210 HILOC 0 T 0) (211 LOLOC 0 T 0) (212 PLUS2 0 T -1 \\SLOWPLUS2 *) (213 DIFFERENCE 0 T -1 \\SLOWDIFFERENCE *) (214 TIMES2 0 T -1 \\SLOWTIMES2 *) (215 QUOTIENT 0 T -1 \\SLOWQUOTIENT *) (216 IPLUS2 0 T -1 \\SLOWIPLUS2) (217 IDIFFERENCE 0 T -1 \\SLOWIDIFFERENCE) (218 ITIMES2 0 T -1 \\SLOWITIMES2) (219 IQUOTIENT 0 T -1 \\SLOWIQUOTIENT) (220 IREMAINDER 0 T -1 IREMAINDER) (221 IPLUS.N 1 T 0 \\SLOWIPLUS2 (4K 12K)) (222 IDIFFERENCE.N 1 T 0 \\SLOWIDIFFERENCE (4K 12K)) (223 BASE-< 0 T -1 \\BASE-<.UFN (4K 12K DORADO)) (224 LLSH1 0 T 0 \\SLOWLLSH1) (225 LLSH8 0 T 0 \\SLOWLLSH8) (226 LRSH1 0 T 0 \\SLOWLRSH1) (227 LRSH8 0 T 0 \\SLOWLRSH8) (228 LOGOR2 0 T -1 \\SLOWLOGOR2) (229 LOGAND2 0 T -1 \\SLOWLOGAND2) (230 LOGXOR2 0 T -1 \\SLOWLOGXOR2 ) (231 LSH 0 T -1 LSH T) (232 FPLUS2 0 T -1 \\SLOWFPLUS2 4K) (233 FDIFFERENCE 0 T -1 \\SLOWFDIFFERENCE 4K) (234 FTIMES2 0 T -1 \\SLOWFTIMES2 4K) (235 FQUOTIENT 0 T -1 \\SLOWFQUOTIENT 4K) (236 UBFLOAT2 1 ( UFADD UFSUB UFISUB UFMULT UFDIV UFGREAT UFMAX UFMIN UFREM UBAREF1) (-1 1) \\UNBOXFLOAT2 (4K DORADO)) ( 237 UBFLOAT1 1 (BOX UNBOX UFABS UFNEGATE UFIX) (0 1) \\UNBOXFLOAT1 (4K DORADO)) (238 AREF2 0 T -2 %AREF2 (4K DORADO)) (239 ASET2 0 T -3 %ASET2 (4K DORADO)) (240 EQ 0 T -1) (241 IGREATERP 0 T -1 \\SLOWIGREATERP) (242 FGREATERP 0 T -1 \\SLOWFGREATERP) (243 GREATERP 0 T -1 GREATERP) (244 EQUAL 0 T -1 EQUAL) (245 MAKENUMBER 0 T -1 \\MAKENUMBER 4K) (246 BOXIPLUS 0 T -1 \\BOXIPLUS 4K) (247 BOXIDIFFERENCE 0 T -1 \\BOXIDIFFERENCE 4K) (248 FLOATBLT 1 (FLOATWRAP FLOATUNWRAP FLOAT FIX FPLUS FDIFFERENCE FDIFFERENCE FPLUSABS ABSDIFFERENCE ABSFPLUS FTIMES) -3 \\FLOATBLT (4K DORADO)) (249 FFTSTEP 0 T -1 \\FFTSTEP (4K DORADO)) (250 MISC3 1 (EXPONENT MAGNITUDE FLOAT COMP BLKFMAX BLKFMIN BLKFABSMAX BLKFABSMIN FLOATTOBYTE ARRAYREAD LINES-EQUAL-P) -2 \\MISC3.UFN (4K DORADO)) (251 MISC4 1 ( ARRAY.TIMES ARRAY.PERM ARRAY.PLUS ARRAY.DIFFERENCE ARRAY.MAGIC 3MATCH BMBIT ARRAYWRITE) -3 \\MISC4.UFN ) (252 UPCTRACE 0 T 0 NILL (4K 12K)) (253 SWAP 0 T 0) (254 NOP 0 T 0) (255 = 0 T -1 CL::%= (4K DORADO) ))) (RPAQ I.CODERDTBL (COPYREADTABLE (QUOTE ORIG))) (SETSYNTAX (CHARCODE ^Y) (QUOTE (MACRO (LAMBDA (FILE RDTBL) (EVALFORMAKEINIT (READ FILE RDTBL))))) I.CODERDTBL) (SETSYNTAX (CHARCODE \|) (QUOTE (MACRO ALWAYS READVBAR)) I.CODERDTBL) (READTABLEPROP I.CODERDTBL (QUOTE USESILPACKAGE) NIL) (RPAQQ INITPTRS ((\\MAINDISK) (\\SWAPDSK1) (\\SWAPDSK2) (\\SWAPREQUESTBLOCK) (\\DISKREQUESTBLOCK) ( \\FREEPAGEFID) (\\FINALIZATION.FUNCTIONS) (|\\OneCharAtomBase| NIL) (\\SCRATCHSTRING) (\\LISTPDTD) ( \\FREEBLOCKBUCKETS) (|\\ArrayFrLst|) (|\\ArrayFrLst2|) (\\UNBOXEDHUNK.TYPENUM.TABLE) ( \\CODEHUNK.TYPENUM.TABLE) (\\PTRHUNK.TYPENUM.TABLE))) (RPAQQ INITVALUES ((|\\NxtMDSPage| |\\FirstMDSPage|) (|\\LeastMDSPage| |\\FirstMDSPage|) ( |\\SecondMDSPage| |\\DefaultSecondMDSPage|) (|\\SecondArrayPage| |\\DefaultSecondArrayPage|) ( \\MDSFREELISTPAGE) (|\\MaxSysTypeNum| 0) (|\\MaxTypeNumber|) (|\\AtomFrLst| 0) (|\\NxtArrayPage|) ( \\HUNKING?))) NIL