bA.433 ****JMs$ӡ ****** LISP INTERPRETER AND SYSTEM ************* ASSEMBLING MACLISP -- INITIAL SWITCH VALUES (*=EXPERIMENTAL): ITS=E ASc0=0 *OS20=0 S2f=a ENEX=0 * CMU=0 ML=0 BIGNUM=1 OBTSIZ=777HJBQIO=#E AHNKLOG=11 USELESS=1 PDLBUG=0 * DBFLAG=0 * CXFLAG=0 H'AITH=0 * SFA=1 REDEgI3SuT: .INSRTed, end input with ^C ML==1 ITS==1?SFA==1 MACLISP VERSION 2144 ASSEMBLED ON ITS AT MC ==> INSERTED: DEFNS 240 ==> 3ťb:A MACS 80 ***** FOUR "ZERO" (LOW IMPURE) SEGMENTS ***** TWO SEGMENT TABLE SEGMENTS ==> INSERTED: ERROHk P0: 2737 [ERROR HANDLND MEtNjwFA={$ΧERTED: STATUS 265 P1: 15647 [TOPLEVEL, COMMON, AND RANDOM STUFF] P2: 3440 [PRINT,TYO,EXPLODE,FLATC,BAKTPaYETC] ==> INSERTED: PRINT 6 P3: 1371 [UTAPE, LAP, AND AGGLOMERATED SUBRS] ==> INSERTED: ULAP 145 P4: L4piIHMETIC SUBROUTINES] ==> INSERTED: ARITH 93 P5: 17626INUM-ONLY ARITHMETICS] ==> INSERTED: BIGfe7 P6: 2643 [EVAL,hPY, ST g-ODED BY COMPLR] P7: 2423 [GARBAGE COLLECTOWFP10: [2a [MEMANAGEgTASTUFF] }gSRTED:#ÅIB 256 P,] A3552 [HIRSUTE READER, MAKNAM, ETC.] A ==> 3ťTED: 2q2 P, A1505 [ARRAY STUFF] =ISERTED: ARRAY 97 P13: 4a [FASĻ ^A3ťTED: әOA 263 P14: X2sAI/O PACKAGFA={> INSERTED: QIO 757 P1 g713 [INTERRUPT 3 UO HANDLERS] gGH OF PATCH AREA = 50񢄪U*** 6HOTAL) SYSTEM SEGMENTS **J PSH)ŏMENT mڶAUNUSED WORDS] **U* ONE IMPURE SYABLOCK SEGMENT [740 UNUSED҉S] P16: 2363mӳSTEM ATOMS AND u*ƍ] ***** ONE VALUE CELL qc͋NT [617 UNUSED WORDS] ***** TWO S3aO HEADER SEGMENTh-i0 UNUSED WORDS] ***** THREE PURE SYMBOL BLOCK SEGMENTS MC:STRUCT 655 L;BDa5432 3. 25- G##### ##hѣA32=TO&((U#IfA#XST=3200) 2$Ǒ iA3{777 3'׋uN4 NUM=-m**U* FOUH(UE FIXNUM SEGMENƊ*****֋ PURE$ө SEGMSAlZ1AӋ+ϥ**UH-E(U#LNUM SŝTS J*U+A3hU&I)ŏgTٰe UNUSWRDS]BU*U** ON$͡URE F6'U SEGM ٠iʼn WORDwFJ*UEAIMPUR#LNUM Sŝ-o*ΫSED WS񢄪UJ PBAqc͋[o73 UNADE IME T&$Γ`ASTRUCPt1Ag SECS A ==> 3ťTED: Ru6kE U**** 砅IT BL堧EGMENTS ==$ΧERTED: ALLOC 3 Ɗ ***** MACiA****** LISP INTERPRETER AND SYu"A************* INITIAL PURTB&ś6gթ [0=&A1=IMPURE, OhUE, $=BPS/PDL/SCPjC] 11122222 222L2e2eL2e2 222LX1c 22222211 Xa 0A 00000000 0a 0 00000000 00000  A 00000000 00000  00000000 00000000 00000  a 0a00 00000000 00000000 0 0a 0a 0a0 00 0a0a00000 00 0a0a00000 000 0a 0a0000 000 0a 0a0000 00000000 0a000 00000$0$ 0I00$ ***** Fi EZERO" (LOW IMPUQTŝTS *****+Aqc͋NT TABLE SŝTS ==> INSEHES cFP0: 2737 qiRR HAN"ҧ AND iӃGES] ==> Iҩ Au ԫS 265 P1: 15TOPLEVEL, s͟AD RANDOM ScFe: 3440 [PRINT,TYO,EXPLOD#LTC,BAKTRACE,ETC] ==>gSRTED: PRINT 306 P3: 1m؉UTAPE&A, ANDcǙb҃TED SUBRS] ==> 3ťTED: fA 145Bh4u2i4 [AR5$MTIC SUBROUgE] } INSERTED: ғTH 93kH1o62 [BIGNUMLiIHMETIt {=> INqiTD: BIGNUM 27 4:A 2643 [EVAAPLY, u*ƍ OPENċD BY sЙR] AM3q҅1⠇&E] P10: 1620 [MEMORY MANAGEMEN)ԫѮ {ISERTED: GpA256 P11: 355BmȓTԋER, M2A"ԇFA ==> INSERTED: READER 282 4u 150mRAY STUFF] ==> INSERTED: iRY 97Bh1g: 22ۍ4OFA={> INSERTEDHFSLOA 263 4u 5102 [NE$ PACK1 _ NSERTED: QIO 7Ɗ ZA ۱g [INTU Ή UUO HANDLERS] LEN$ (ArAP=AJ*U 62 (OCTAL()٧fEGMENTS J*UEApi ŝ-k6 UNUqb ORDS]񢄪U*** OPIPURE SYMBO!LCK SEGMENT [740 UNUSWQ)Bh1m: 23ۉviԋ ԟMS AN)ԫFF] ****H'΋ VALUE CEL)ŏgTAmAUNUSE+ϥDS] ***** TWO SYMBOL HEADER qc͋NTS [440 Uiʼn WORDS] *****$RE PURE SYMBOL BLOCK SEGME)MC:STUaA655 L; 10543BP3] 25-036 ####hƊ###### 32=TOO MANY PURE F6'US (PFi{l0S HIGHESTIP INUM=777 LOiA$ӡgU=-347񢄪U*** FOUR PURE FIXNUM SEGMS ***** FIVE PUQPLST SEbΩS [14(*ΫSED WORDS] **J ERO PURE FUǛENTS ***** TW$͡URE LIST SEGMEN[g02 UNUSED WORDSE U**** ONE IMPURE؝UM SEGMENT۳ggUED WORDS] ***JOE IMPURE FLONUMǛENT [777 UNUSED҉S] ***** ONE RcΫM SEGMENT [773 Ӌ+ϥDS] 5$͋'AKE INITIAL STR,APASS 2 = 226 SEtƊA ==> INSEHSRUCT 655 ****H*W BIT BLOCK SEGMS ==> INSERT AALLOC 303 Coats arPiclusiFrom TE3k47 36 c0236 10736 260IJm605 li,2i5 33563 33636 36004 36102 40053 40064 42626 42727 45224 45352 47106 47172 52673 52744 5154451 56634 56711 1g-0c3 67563 67726 127610 127776 Run time = 6:48.76 8912 Symbols including initial ones (55:d)