$ od -c -N 50000 [phylum]<3-LISP>course>koto>MM.DCOM!5
0000000 ( F I L E C R E A T E D " 2 4
0000020 - J a n - 8 7 1 7 : 0 4 : 4 5
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < 3 - L I S
0000100 P > C O U R S E > K O T O > M M
0000120 . ; 2 ) \r " 1 2 - N o v - 8 5
0000140 1 4 : 5 9 : 2 3 " b c o m p
0000160 l ' d i n " I N T E R L I S
0000200 P - D 1 1 - M a y - 8 6 . .
0000220 . " d a t e d " 1 1 - M a y
0000240 - 8 6 1 5 : 1 9 : 0 8 " ) \r (
0000260 F I L E C R E A T E D " 2 4 -
0000300 J a n - 8 7 1 5 : 4 0 : 0 3 "
0000320 { P H Y L U M } < 3 - L I S P
0000340 > C O U R S E > K O T O > M M .
0000360 ; 2 2 0 5 4 6 c h a n g e s
0000400 t o : ( V A R S M M C O M
0000420 S ) \r p r e v i o u s d a t
0000440 e : " 9 - S e p - 8 5 1 8
0000460 : 1 8 : 0 2 " { P H Y L U M }
0000500 < 3 - L I S P > C O U R S E > K
0000520 O T O > M M . ; 1 ) \r A C T I V
0000540 A T E - N L I S P - S T A C K
0000560 D 1 \r ( P 2 S S S P 1
0000600 N S S P 0 O S S ) \0 4 003
0000620 \0 \0 \0 l \n n u 0 n N 021 003 002 g \0
0000640 \0 \t \0 \0 224 ` \0 \0 263 034 \b \0 \0 277 h 027
0000660 \0 \0 277 H I J \v \0 \0 277 ` \0 \0 I l 200
0000700 333 \n \0 \0 h 020 \0 ( 6 0 Q \ L O C
0000720 K P A G E S 4 5 Q C R E A T
0000740 E - S P A C E S 3 1 Q I N S
0000760 T A L L - S C A N - S P A C E
0001000 2 0 Q B O U N D P ) \r ( 5 1 Q
0001020 N E W - S P A C E 3 6 Q M
0001040 E M O R Y - G A U G E S - W A N
0001060 T E D 2 4 Q U S E R - S P A
0001100 C E S 1 5 Q U S E R - S P A
0001120 C E S ) \r ( ) \r C R E A T E - S
0001140 P A C E D 1 \r ( P 1 S P A
0001160 C E - S I Z E - I N - W O R D S
0001200 P 0 S P A C E I 0 N
0001220 C E L L S ) \0 Q 005 \0 \0 001 021 P 004
0001240 @ l 002 332 Y @ j l 200 \v \0 \0 X I k 331
0001260 j 273 272 K J 363 254 H K 320 j 315 \0 277 K k
0001300 324 [ 260 362 H l 004 317 \0 \a H @ 316 004 H d
0001320 @ k 331 \ 320 L 320 316 \b H d l \f 320 316 002
0001340 H @ l 006 331 316 006 H h 316 \n H 020 \0 ( 1
0001360 6 Q \ A L L O C B L O C K ) \r
0001400 N I L \r ( ) \r C R E A T E - S P
0001420 A C E S D 1 \r ( I 2 N S U
0001440 R V I V O R S I 1 N N E W
0001460 I 0 N O L D ) \0 177 \0 \0 \0
0001500 003 h 027 \0 \0 @ \t \0 \0 027 \0 \0 A \t \0 \0
0001520 027 \0 \0 B \t \0 \0 027 \0 \0 B \t \0 \0 027 \0
0001540 \0 g \0 \0 g \0 \0 ` \0 \0 ` \0 \0 ` \0 \0
0001560 ` \0 \0 h 032 032 032 032 032 \n \0 \0 ` \0 \0 264
0001600 ? ` \0 \0 o \0 \0 \0 j ` \0 \0 311 006 \v \0
0001620 \0 316 \n 277 ` \0 \0 o \0 \0 \0 j ` \0 \0 311
0001640 006 \v \0 \0 316 \n 277 ` \0 \0 o \0 \0 \0 j `
0001660 \0 \0 311 006 \v \0 \0 316 \n 277 \b \0 \0 h 020 \0
0001700 ( 1 7 3 Q R E F R E S H - M E
0001720 M O R Y - G A U G E S 1 6 5 Q
0001740 M A K E - G A U G E 1 4 2 Q
0001760 M A K E - G A U G E 1 1 7 Q
0002000 M A K E - G A U G E 7 2 Q
0002020 A P P L Y 3 4 Q C R E A T E
0002040 - S P A C E 2 5 Q C R E A T
0002060 E - S P A C E 1 6 Q C R E A
0002100 T E - S P A C E 7 C R E A T
0002120 E - S P A C E ) \r ( 1 6 0 Q F
0002140 U T U R E - S U R V I V O R - S
0002160 P A C E 1 5 0 Q F U T U R E
0002200 - S U R V I V O R - S P A C E
0002220 1 3 5 Q P A S T - S U R V I V
0002240 O R - S P A C E 1 2 5 Q P A
0002260 S T - S U R V I V O R - S P A C
0002300 E 1 1 2 Q N E W - S P A C E
0002320 1 0 2 Q N E W - S P A C E
0002340 7 5 Q M E M O R Y - G A U G E
0002360 S - W A N T E D 6 1 Q P A S
0002400 T - S U R V I V O R - S P A C E
0002420 5 6 Q F U T U R E - S U R V
0002440 I V O R - S P A C E 5 3 Q N
0002460 E W - S P A C E 5 0 Q O L D
0002500 - S P A C E 4 5 Q U S E R -
0002520 S P A C E S 4 2 Q A D D T O
0002540 V A R 3 7 Q P A S T - S U R
0002560 V I V O R - S P A C E 3 0 Q
0002600 F U T U R E - S U R V I V O R -
0002620 S P A C E 2 1 Q N E W - S P
0002640 A C E 1 2 Q O L D - S P A C
0002660 E 3 W R A P - A N C H O R )
0002700 \r ( 1 5 4 Q " S S # 2 s p
0002720 a c e l e f t " 1 3 1 Q "
0002740 S S # 1 s p a c e l e f t "
0002760 1 0 6 Q " N e w s p a c e
0003000 l e f t " ) \r D E A C T I V A
0003020 T E - N L I S P - S T A C K D
0003040 1 \r N I L \0 \t \0 \0 \0 \0 \b \0 \0 \b
0003060 \0 \0 h 020 \0 ( 5 D E S T A L L -
0003100 S C A N - S P A C E S 2 R E
0003120 S E T - S P A C E S ) \r N I L \r
0003140 ( ) \r I N - S P A C E ? D 1 \r
0003160 ( L ( 1 P T R 0 S P A C
0003200 E ) ) \0 3 002 \0 \0 002 A 322 @ 322 361 255
0003220 A 322 @ 322 360 264 & A 323 @ 323 361 264 037 A @
0003240 311 \b 021 002 001 H 322 I 322 361 265 016 H 322 I 322
0003260 360 264 \a H 323 I 323 361 022 h 360 020 \0 N I L
0003300 \r N I L \r ( ) \r P A R S E - S P
0003320 A C E D 1 \r ( P 4 N C P
0003340 3 A G E P 2 T A G P
0003360 1 F R E E - P T R P 0
0003400 S C A N - P T R I 1 F N
0003420 I 0 S P A C E ) \0 261 005 \0 \0
0003440 002 021 P 004 @ 311 002 Y @ X I 322 H 322 361 263
0003460 030 I 322 H 322 360 264 003 202 261 \0 227 I 323 H 323
0003500 361 264 003 202 261 \0 214 H 312 \0 \a 272 H 312 001 207
0003520 273 J d l 004 360 262 023 H l 006 K l 004 A 017
0003540 016 277 H l \f 320 270 260 303 l 003 360 262 024 J H
0003560 l 003 K l 004 A 017 016 277 H l 006 320 270 260 254
0003600 J d l 002 360 262 023 H l \a K l 004 A 017 016
0003620 277 H l 016 320 270 260 224 k 360 262 035 H 312 001 \a
0003640 l 003 330 274 J H L K l 004 A 017 016 277 H L
0003660 320 L 320 270 261 377 v J l 005 360 230 H k 320 k
0003700 320 270 261 377 h o \0 \0 \0 \t \0 \0 277 261 377 ]
0003720 020 \0 ( 2 5 2 Q S H O U L D N T
0003740 ) \r N I L \r ( 2 4 7 Q " c a
0003760 n ' t p a r s e s t a c k "
0004000 ) \r P R I N T - O B J E C T D
0004020 1 \r ( P 3 I P 1 A R G
0004040 - P T R P 0 N A R G S I
0004060 3 A G E I 2 N W O R D
0004100 S I 1 O B J I 0 T A
0004120 G ) 002 s 004 \0 \0 004 021 001 o \0 \0 \0
0004140 \t \0 \0 277 o \0 \0 \0 A 322 \n \0 \0 277 o \0
0004160 \0 \0 \t \0 \0 277 o \0 \0 \0 A 323 \n \0 \0 277
0004200 o \0 \0 \0 \t \0 \0 277 C \t \0 \0 277 o \0 \0
0004220 \0 \t \0 \0 A 312 \0 200 j 360 247 o \0 \0 \0 \t
0004240 \0 \0 277 @ d l 004 360 262 v 277 o \0 \0 \0 \t
0004260 \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277
0004300 A 311 004 \t \0 \0 277 h \t \0 \0 277 o \0 \0 \0
0004320 \t \0 \0 277 A 311 002 \t \0 \0 277 h \t \0 \0 277
0004340 o \0 \0 \0 \t \0 \0 277 A 311 006 \t \0 \0 277 h
0004360 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 A 311 \n \t
0004400 \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277
0004420 A 311 \b \t \0 \0 277 h \t \0 \0 261 001 256 l 003
0004440 360 262 9 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 277
0004460 o \0 \0 \0 \t \0 \0 277 A 311 002 \t \0 \0 277 h
0004500 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 A 311 004 \t
0004520 \0 \0 277 h \t \0 \0 261 001 r @ d l 002 360 242
0004540 261 \0 244 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0
0004560 277 o \0 \0 \0 \t \0 \0 277 A 312 \0 240 j 360 h
0004600 360 \t \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0
0004620 \0 277 A 311 002 \t \0 \0 277 h \t \0 \0 277 o \0
0004640 \0 \0 \t \0 \0 277 A 311 004 \t \0 \0 277 h \t \0
0004660 \0 277 o \0 \0 \0 \t \0 \0 277 A 311 006 \t \0 \0
0004700 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 A 311
0004720 \b \t \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0
0004740 \0 277 A 311 \n \t \0 \0 277 h \t \0 \0 277 o \0
0004760 \0 \0 \t \0 \0 277 A 311 \f \t \0 \0 277 h \t \0
0005000 \0 261 \0 310 k 360 242 261 \0 273 A 312 001 \a 270 o
0005020 \0 \0 \0 \t \0 \0 277 H \t \0 \0 277 o \0 \0 \0
0005040 \t \0 \0 277 A 312 \0 220 j 360 h 360 \t \0 \0 277
0005060 o \0 \0 \0 \t \0 \0 277 A 312 \0 260 j 360 h 360
0005100 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 A 312 \0 240
0005120 j 360 h 360 \t \0 \0 277 h \t \0 \0 277 o \0 \0
0005140 \0 \t \0 \0 277 A 311 002 \t \0 \0 277 h \t \0 \0
0005160 277 o \0 \0 \0 \t \0 \0 277 A 311 004 \t \0 \0 277
0005200 h \t \0 \0 277 A l 006 320 271 H k 021 002 003 K
0005220 J 363 263 . o \0 \0 \0 \t \0 \0 277 K \t \0 \0
0005240 277 o \0 \0 \0 \t \0 \0 277 I 311 \0 \t \0 \0 277
0005260 h \t \0 \0 277 I l 002 320 271 K k 324 [ 260 322
0005300 023 206 o \0 \0 \0 \t \0 \0 h 020 \0 ( 1 1 5
0005320 7 Q S H O U L D N T 1 1 3 2
0005340 Q T E R P R I 1 1 2 5 Q P
0005360 R I N 1 1 1 1 6 Q P R I N 1
0005400 1 1 0 6 Q P R I N 1 1 1 0
0005420 1 Q P R I N 1 1 0 5 2 Q T
0005440 E R P R I 1 0 4 5 Q P R I N
0005460 1 1 0 3 6 Q P R I N 1 1 0
0005500 2 6 Q T E R P R I 1 0 2 1 Q
0005520 P R I N 1 1 0 1 2 Q P R I
0005540 N 1 1 0 0 2 Q T E R P R I
0005560 7 7 5 Q P R I N 1 7 6 1 Q
0005600 P R I N 1 7 5 1 Q P R I N 1
0005620 7 3 5 Q P R I N 1 7 2 5 Q
0005640 P R I N 1 7 1 1 Q P R I N
0005660 1 7 0 1 Q P R I N 1 6 7 4
0005700 Q P R I N 1 6 4 7 Q T E R
0005720 P R I 6 4 2 Q P R I N 1 6
0005740 3 3 Q P R I N 1 6 2 3 Q T
0005760 E R P R I 6 1 6 Q P R I N 1
0006000 6 0 7 Q P R I N 1 5 7 7 Q
0006020 T E R P R I 5 7 2 Q P R I
0006040 N 1 5 6 3 Q P R I N 1 5 5
0006060 3 Q T E R P R I 5 4 6 Q P
0006100 R I N 1 5 3 7 Q P R I N 1
0006120 5 2 7 Q T E R P R I 5 2 2 Q
0006140 P R I N 1 5 1 3 Q P R I N
0006160 1 5 0 3 Q T E R P R I 4 7
0006200 6 Q P R I N 1 4 6 7 Q P R
0006220 I N 1 4 5 7 Q T E R P R I
0006240 4 5 2 Q P R I N 1 4 3 6 Q
0006260 P R I N 1 4 2 6 Q T E R P R
0006300 I 4 2 1 Q P R I N 1 3 7 5
0006320 Q T E R P R I 3 7 0 Q P R
0006340 I N 1 3 6 1 Q P R I N 1 3
0006360 5 1 Q T E R P R I 3 4 4 Q
0006400 P R I N 1 3 3 5 Q P R I N 1
0006420 3 2 5 Q T E R P R I 3 2 0
0006440 Q P R I N 1 3 0 1 Q T E R
0006460 P R I 2 7 4 Q P R I N 1 2
0006500 6 5 Q P R I N 1 2 5 5 Q T
0006520 E R P R I 2 5 0 Q P R I N 1
0006540 2 4 1 Q P R I N 1 2 3 1 Q
0006560 T E R P R I 2 2 4 Q P R I
0006600 N 1 2 1 5 Q P R I N 1 2 0
0006620 5 Q T E R P R I 2 0 0 Q P
0006640 R I N 1 1 7 1 Q P R I N 1
0006660 1 6 1 Q T E R P R I 1 5 4 Q
0006700 P R I N 1 1 4 5 Q P R I N
0006720 1 1 3 5 Q T E R P R I 1 3
0006740 0 Q P R I N 1 1 1 0 Q P R
0006760 I N 1 7 2 Q P R I N 1 6 2
0007000 Q P R I N 1 5 5 Q P R I N
0007020 1 4 5 Q P R I N T N U M 3
0007040 3 Q P R I N 1 2 3 Q P R I
0007060 N T N U M 1 1 Q P R I N 1 )
0007100 \r N I L \r ( 1 1 5 4 Q " U n
0007120 k n o w n t a g " 1 1 1 3 Q
0007140 " : " 1 0 7 6 Q " a
0007160 r g " 1 0 3 3 Q " p r o
0007200 c : " 1 0 0 7 Q " e x
0007220 p : " 7 5 6 Q " r e i f
0007240 i e d : " 7 3 2 Q " b a
0007260 c k e d u p : " 7 0 6 Q "
0007300 o b j : " 6 7 1 Q " i
0007320 s a f r a m e , n a r g s
0007340 : " 6 3 0 Q " c o n t
0007360 : " 6 0 4 Q " e s c :
0007400 " 5 6 0 Q " n e x t :
0007420 " 5 3 4 Q " f r a m e
0007440 : " 5 1 0 Q " e n v :
0007460 " 4 6 4 Q " p c : "
0007500 4 3 3 Q " b o g u s :
0007520 " 4 1 6 Q " i s a c o
0007540 n t i n u a t i o n . " 3 5 6
0007560 Q " e n v : " 3 3 2 Q
0007600 " s k e l e t o n : "
0007620 3 1 5 Q " i s a c l o s
0007640 u r e . " 2 6 2 Q " h i
0007660 p t r : " 2 3 6 Q " g
0007700 a u g e : " 2 1 2 Q "
0007720 c e l l s l e f t : " 1 6 6
0007740 Q " f r e e : " 1 4 2
0007760 Q " s i z e : " 1 2 5
0010000 Q " i s a h e a d e r
0010020 b l o c k . " 1 0 5 Q " [
0010040 G o n e ] " 6 7 Q " ) " 5
0010060 2 Q " ( a g e " 4 0 Q
0010100 ( F I X 6 1 0 Q T ) 3 0
0010120 Q " , " 1 6 Q ( F I X 6
0010140 1 0 Q T ) 6 " O b j e c
0010160 t " ) \r R E F R E S H - M E M
0010200 O R Y - G A U G E D 1 \r ( I
0010220 0 S P A C E ) \0 020 \0 \0 \0 001 @
0010240 311 \n 264 \v @ 311 \n @ 311 006 \n \0 \0 020 \0 (
0010260 1 5 Q S E T - G A U G E ) \r N
0010300 I L \r ( ) \r R E F R E S H - M E
0010320 M O R Y - G A U G E S D 1 \r N
0010340 I L \0 026 \0 \0 \0 \0 ` \0 \0 264 021 ` \0
0010360 \0 206 d 001 \t \0 \0 277 002 003 265 370 h 020 \0 (
0010400 1 5 Q R E F R E S H - M E M O
0010420 R Y - G A U G E ) \r ( 7 U S E
0010440 R - S P A C E S 2 M E M O R
0010460 Y - G A U G E S - W A N T E D )
0010500 \r ( ) \r R E S E T - S P A C E
0010520 D 1 \r ( L ( 1 D O N T - Z E
0010540 R O 0 S P A C E ) P 5
0010560 \ I N T E R R U P T A B L E )
0010600 \0 R 006 \0 \0 002 021 P 004 021 020 005 @ 311 004 270
0010620 @ l 004 317 \0 \a 277 @ d H k 331 Z 320 J 320
0010640 316 \b 277 @ l \f 320 271 @ I 316 002 277 @ H l
0010660 006 331 316 006 023 A 263 037 H l 002 332 l \f 331 k
0010700 331 j 274 273 L K 363 254 I L 320 j 315 \0 277 L
0010720 k 324 \ 260 362 @ 020 \0 N I L \r N I L \r
0010740 ( ) \r R E S E T - S P A C E S
0010760 D 1 \r ( P 0 S ) \0 , 001 \0 \0
0011000 \0 ` \0 \0 211 d 001 006 \0 \0 h 024 \0 277 002 003
0011020 265 365 h 027 \0 \0 ` \0 \0 212 d 001 021 001 \0 H
0011040 \t \0 \0 023 002 003 265 364 ` \0 \0 020 \0 ( 4 1
0011060 Q R E S E T - S P A C E ) \r (
0011100 5 1 Q U S E R - S P A C E S
0011120 2 7 Q U S E R - S P A C E S
0011140 2 4 Q W R A P - A N C H O R
0011160 1 0 Q N L I S P - S T A C K -
0011200 O B J E C T 2 W R A P - A N
0011220 C H O R ) \r ( ) \r S H O W - S P
0011240 A C E D 1 \r ( I 0 S P A C
0011260 E ) \0 \t \0 \0 \0 001 @ g \0 \0 \n \0 \0
0011300 020 \0 ( 6 P A R S E - S P A C E
0011320 ) \r ( 3 P R I N T - O B J E C
0011340 T ) \r ( ) \r S H O W - S P A C E
0011360 S D 1 \r N I L \0 W \0 \0 \0 \0 o
0011400 \0 \0 \0 \t \0 \0 277 h \t \0 \0 ` \0 \0 g \0
0011420 \0 \n \0 \0 o \0 \0 \0 \t \0 \0 277 h \t \0 \0
0011440 ` \0 \0 g \0 \0 \n \0 \0 o \0 \0 \0 \t \0 \0
0011460 277 h \t \0 \0 ` \0 \0 g \0 \0 \n \0 \0 o \0
0011500 \0 \0 \t \0 \0 277 h \t \0 \0 ` \0 \0 g \0 \0
0011520 \n \0 \0 h 020 \0 ( 1 2 3 Q P A R S
0011540 E - S P A C E 1 1 2 Q T E R
0011560 P R I 1 0 5 Q P R I N 1 7
0011600 6 Q P A R S E - S P A C E 6
0011620 5 Q T E R P R I 6 0 Q P R
0011640 I N 1 5 1 Q P A R S E - S P
0011660 A C E 4 0 Q T E R P R I 3
0011700 3 Q P R I N 1 2 4 Q P A R
0011720 S E - S P A C E 1 3 Q T E R
0011740 P R I 6 P R I N 1 ) \r ( 1 2
0011760 0 Q P R I N T - O B J E C T
0012000 1 1 5 Q O L D - S P A C E 7
0012020 3 Q P R I N T - O B J E C T
0012040 7 0 Q F U T U R E - S U R V I
0012060 V O R - S P A C E 4 6 Q P R
0012100 I N T - O B J E C T 4 3 Q P
0012120 A S T - S U R V I V O R - S P A
0012140 C E 2 1 Q P R I N T - O B J
0012160 E C T 1 6 Q N E W - S P A C
0012200 E ) \r ( 1 0 2 Q " < < <
0012220 O L D S P A C
0012240 E > > > " 5 5 Q " <
0012260 < < F U T U R E
0012300 S U R V I V O
0012320 R S > > > " 3 0 Q
0012340 " < < < P A S T
0012360 S U R V I V O R
0012400 S > > > " 3 " < <
0012420 < N E W S P A
0012440 C E > > > " ) \r S I G
0012460 N A L - N O - S P A C E D 1 \r
0012500 N I L \0 016 \0 \0 \0 \0 l 5 o \0 \0 \0
0012520 \n \0 \0 \b \0 \0 020 \0 ( 1 3 Q E R R
0012540 O R ! 1 0 Q S E T E R R O R
0012560 N ) \r N I L \r ( 5 " 3 - l i
0012600 s p o u t o f s t a c k
0012620 s p a c e " ) \r ( P R E T T Y C
0012640 O M P R I N T M M C O M S ) \r
0012660 ( R P A Q Q M M C O M S ( (
0012700 P ( C L D I S A B L E ( Q U
0012720 O T E - ) ) ) ( F N S A C
0012740 T I V A T E - N L I S P - S T A
0012760 C K C R E A T E - S P A C E
0013000 C R E A T E - S P A C E S \r D
0013020 E A C T I V A T E - N L I S P -
0013040 S T A C K I N - S P A C E ?
0013060 P A R S E - S P A C E P R I N
0013100 T - O B J E C T R E F R E S H
0013120 - M E M O R Y - G A U G E R E
0013140 F R E S H - M E M O R Y - G A U
0013160 G E S \r R E S E T - S P A C E
0013200 R E S E T - S P A C E S S H
0013220 O W - S P A C E S H O W - S P
0013240 A C E S S I G N A L - N O - S
0013260 P A C E ) ( M A C R O S A L
0013300 L O C A T E - F R O M \r I N -
0013320 F U T U R E - S U R V I V O R -
0013340 S P A C E ? I N - N E W - S P
0013360 A C E ? I N - O L D - S P A C
0013400 E ? I N - P A S T - S U R V I
0013420 V O R - S P A C E ? N C R E A
0013440 T E - C L O S U R E \r N C R E
0013460 A T E - C O N T N C R E A T E
0013500 - F R A M E S T A C K - C L O
0013520 S U R E ? S T A C K - C O N T
0013540 ? S T A C K - F R A M E ? S
0013560 T A C K - O B J E C T ? \r T H
0013600 I S - S T A C K - O B J E C T -
0013620 I S - A - C L O S U R E ? T H
0013640 I S - S T A C K - O B J E C T -
0013660 I S - A - C O N T ? T H I S -
0013700 S T A C K - O B J E C T - I S -
0013720 A - F R A M E ? U N W R A P
0013740 \r U N W R A P - I F - N E C E S
0013760 S A R Y W R A P W R A P - I
0014000 F - N E C E S S A R Y ) ( G L
0014020 O B A L V A R S F U T U R E -
0014040 S U R V I V O R - S P A C E M
0014060 E M O R Y - G A U G E S - W A N
0014100 T E D \r N E W - S P A C E O
0014120 L D - S P A C E P A S T - S U
0014140 R V I V O R - S P A C E U S E
0014160 R - S P A C E S W R A P - A N
0014200 C H O R ) ( R E C O R D S C
0014220 E L L G C - O B J E C T \r N
0014240 L I S P - S T A C K - O B J E C
0014260 T S P A C E - H E A D E R S
0014300 T A C K - C L O S U R E S T A
0014320 C K - C O N T S T A C K - F R
0014340 A M E T Y P E D - O B J E C T
0014360 ) ( C O N S T A N T S ( \r W
0014400 O R D - O F F S E T - T O - P R
0014420 O C - F I E L D 4 ) ( W O R
0014440 D S - P E R - C E L L 2 ) (
0014460 * ( Q U O T E N O B I N D )
0014500 L e t ' s h o p e W O R D
0014520 S P E R C E L L n e v e r \r
0014540 c h a n g e s ! * ) ( C E L
0014560 L S - P E R - S T A C K - F R A
0014600 M E 3 ) ( C E L L S - P E R
0014620 - S T A C K - C L O S U R E 3
0014640 ) ( C E L L S - P E R - S T A
0014660 C K - C O N T 7 ) ( \r C E L
0014700 L S - P E R - S P A C E - H E A
0014720 D E R 6 ) ( H O L E - T A G
0014740 5 ) ( S P A C E - H E A D E
0014760 R - T A G 4 ) ( S T A C K -
0015000 C L O S U R E - T A G 3 ) (
0015020 S T A C K - C O N T - T A G 2
0015040 ) ( \r S T A C K - F R A M E -
0015060 T A G 1 ) ) ( S P E C V A R
0015100 S N I L ) ( L O C A L V A R
0015120 S T ) ) ) \r ( C L D I S A B L
0015140 E ( Q U O T E - ) ) \r ( P U
0015160 T P R O P S A L L O C A T E -
0015200 F R O M M A C R O ( O P E N
0015220 L A M B D A ( S P A C E X N
0015240 C E L L S ) ( P R O G ( X F
0015260 R E E X L E F T ) ( S E T Q
0015300 X F R E E ( f e t c h ( \r
0015320 S P A C E - H E A D E R F R E
0015340 E ) o f S P A C E ) ) ( S
0015360 E T Q X L E F T ( f e t c h
0015400 ( S P A C E - H E A D E R C
0015420 E L L S L E F T ) o f S P A
0015440 C E ) ) ( i f ( I L E S S P
0015460 X L E F T \r X N C E L L S )
0015500 t h e n ( S I G N A L - N O
0015520 - S P A C E ) ) ( r e p l a c
0015540 e ( S P A C E - H E A D E R
0015560 F R E E ) o f S P A C E w
0015600 i t h ( \ A D D B A S E 2 X
0015620 F R E E X N C E L L S ) \r )
0015640 ( r e p l a c e ( S P A C E -
0015660 H E A D E R C E L L S L E F T
0015700 ) o f S P A C E w i t h
0015720 ( I D I F F E R E N C E X L E
0015740 F T X N C E L L S ) ) ( R E
0015760 T U R N X F R E E ) ) ) ) \r (
0016000 P U T P R O P S I N - F U T U
0016020 R E - S U R V I V O R - S P A C
0016040 E ? M A C R O ( O P E N L A
0016060 M B D A ( X ) ( I N - S P A
0016100 C E ? F U T U R E - S U R V I
0016120 V O R - S P A C E X ) ) ) \r (
0016140 P U T P R O P S I N - N E W -
0016160 S P A C E ? M A C R O ( O P
0016200 E N L A M B D A ( X ) ( I N
0016220 - S P A C E ? N E W - S P A C
0016240 E X ) ) ) \r ( P U T P R O P S
0016260 I N - O L D - S P A C E ? M
0016300 A C R O ( O P E N L A M B D A
0016320 ( X ) ( I N - S P A C E ?
0016340 O L D - S P A C E X ) ) ) \r (
0016360 P U T P R O P S I N - P A S T
0016400 - S U R V I V O R - S P A C E ?
0016420 M A C R O ( O P E N L A M B
0016440 D A ( X ) ( I N - S P A C E
0016460 ? P A S T - S U R V I V O R -
0016500 S P A C E X ) ) ) \r ( P U T P
0016520 R O P S N C R E A T E - C L O
0016540 S U R E M A C R O ( O P E N
0016560 L A M B D A ( X S K E L E T O
0016600 N X E N V ) ( U N I N T E R
0016620 R U P T A B L Y ( P R O G (
0016640 X N E W - C L O S U R E ) ( \r
0016660 S E T Q X N E W - C L O S U R
0016700 E ( A L L O C A T E - F R O M
0016720 N E W - S P A C E C E L L S
0016740 - P E R - S T A C K - C L O S U
0016760 R E ) ) ( * S E T A L L
0017000 F L A G S T O N I L . * )
0017020 ( \r P U T B A S E X N E W -
0017040 C L O S U R E 0 0 ) ( P U
0017060 T B A S E X N E W - C L O S U
0017100 R E 1 0 ) ( r e p l a c e
0017120 ( S T A C K - C L O S U R E
0017140 T Y P E T A G ) o f X N E W
0017160 - C L O S U R E \r w i t h S
0017200 T A C K - C L O S U R E - T A G
0017220 ) ( R E P L A C E ( S T A C
0017240 K - C L O S U R E S K E L E T
0017260 O N ) O F X N E W - C L O S
0017300 U R E W I T H X S K E L E T
0017320 O N ) ( R E P L A C E ( \r S
0017340 T A C K - C L O S U R E E N V
0017360 ) O F X N E W - C L O S U R
0017400 E W I T H X E N V ) ( R E
0017420 T U R N X N E W - C L O S U R
0017440 E ) ) ) ) ) \r ( P U T P R O P S
0017460 N C R E A T E - C O N T M A
0017500 C R O ( O P E N L A M B D A
0017520 ( X P C X E N V X F R A M E
0017540 X N E X T X E S C X C O N
0017560 T ) ( U N I N T E R R U P T A
0017600 B L Y ( P R O G ( \r X N E W
0017620 - C O N T ) ( S E T Q X N E
0017640 W - C O N T ( A L L O C A T E
0017660 - F R O M N E W - S P A C E
0017700 C E L L S - P E R - S T A C K -
0017720 C O N T ) ) ( * S E T A L
0017740 L F L A G S T O N I L .
0017760 * ) \r ( P U T B A S E X N E
0020000 W - C O N T 0 0 ) ( P U T
0020020 B A S E X N E W - C O N T 1
0020040 0 ) ( r e p l a c e ( S T
0020060 A C K - C O N T T Y P E T A G
0020100 ) o f X N E W - C O N T w
0020120 i t h \r S T A C K - C O N T -
0020140 T A G ) ( R E P L A C E ( S
0020160 T A C K - C O N T P C ) O F
0020200 X N E W - C O N T W I T H
0020220 X P C ) ( R E P L A C E ( S
0020240 T A C K - C O N T E N V ) O
0020260 F X N E W - C O N T \r W I T
0020300 H X E N V ) ( R E P L A C E
0020320 ( S T A C K - C O N T F R A
0020340 M E ) O F X N E W - C O N T
0020360 W I T H X F R A M E ) ( R
0020400 E P L A C E ( S T A C K - C O
0020420 N T N E X T ) O F \r X N E
0020440 W - C O N T W I T H X N E X
0020460 T ) ( R E P L A C E ( S T A
0020500 C K - C O N T E S C ) O F
0020520 X N E W - C O N T W I T H X
0020540 E S C ) ( R E P L A C E ( S
0020560 T A C K - C O N T C O N T )
0020600 O F \r X N E W - C O N T W I
0020620 T H X C O N T ) ( R E T U R
0020640 N X N E W - C O N T ) ) ) ) )
0020660 \r ( P U T P R O P S N C R E A
0020700 T E - F R A M E M A C R O (
0020720 O P E N L A M B D A ( X N A R
0020740 G S X O B J E C T I F I E D
0020760 X E X P ) ( U N I N T E R R U
0021000 P T A B L Y ( P R O G ( \r X
0021020 N E W - F R A M E X A R G - P
0021040 T R ) ( S E T Q X N E W - F
0021060 R A M E ( A L L O C A T E - F
0021100 R O M N E W - S P A C E ( I
0021120 P L U S C E L L S - P E R - S
0021140 T A C K - F R A M E X N A R G
0021160 S ) ) ) \r ( * S E T A L L
0021200 F L A G S T O N I L . *
0021220 ) ( P U T B A S E X N E W -
0021240 F R A M E 0 0 ) ( P U T B
0021260 A S E X N E W - F R A M E 1
0021300 0 ) ( r e p l a c e ( S T
0021320 A C K - F R A M E \r T Y P E T
0021340 A G ) o f X N E W - F R A M
0021360 E w i t h S T A C K - F R A
0021400 M E - T A G ) ( R E P L A C E
0021420 ( S T A C K - F R A M E N A
0021440 R G S ) O F X N E W - F R A
0021460 M E W I T H X N A R G S )
0021500 ( \r R E P L A C E ( S T A C K
0021520 - F R A M E O B J E C T I F I
0021540 E D ) O F X N E W - F R A M
0021560 E W I T H X O B J E C T I F
0021600 I E D ) ( R E P L A C E ( S
0021620 T A C K - F R A M E E X P )
0021640 O F \r X N E W - F R A M E W
0021660 I T H X E X P ) ( r e p l a
0021700 c e ( S T A C K - F R A M E
0021720 P R O C ) o f X N E W - F R
0021740 A M E w i t h ( Q U O T E
0021760 N O T . U S E D ) ) ( S E T Q
0022000 X A R G - P T R \r ( L O C F
0022020 ( F E T C H ( S T A C K - F
0022040 R A M E A R G 1 ) O F X N
0022060 E W - F R A M E ) ) ) ( F O R
0022100 I F R O M 1 T O X N A
0022120 R G S d o ( * T H E S L
0022140 O T S A R E F I L L E D \r
0022160 W I T H A D I S T I N G U I
0022200 S H I N G M A R K T O P E
0022220 R M I T L A T E R R E I F I
0022240 C A T I O N O F C O N T I N
0022260 U A T I O N S R E F E R R I N
0022300 G T O T H I S F R A M E .
0022320 * ) ( \r r e p l a c e ( C
0022340 E L L C O N T E N T S ) o f
0022360 X A R G - P T R w i t h (
0022400 Q U O T E N O T . U S E D ) )
0022420 ( S E T Q X A R G - P T R
0022440 ( L O C F ( f e t c h ( C E
0022460 L L S U C C E S S O R \r ) o
0022500 f X A R G - P T R ) ) ) ) (
0022520 R E T U R N X N E W - F R A M
0022540 E ) ) ) ) ) \r ( P U T P R O P S
0022560 S T A C K - C L O S U R E ?
0022600 M A C R O ( O P E N L A M B D
0022620 A ( X ) ( A N D ( S T A C
0022640 K - O B J E C T ? X ) ( T H
0022660 I S - S T A C K - O B J E C T -
0022700 I S - A - C L O S U R E ? \r X
0022720 ) ) ) ) \r ( P U T P R O P S S
0022740 T A C K - C O N T ? M A C R O
0022760 ( O P E N L A M B D A ( X )
0023000 ( A N D ( S T A C K - O B J
0023020 E C T ? X ) ( T H I S - S T
0023040 A C K - O B J E C T - I S - A -
0023060 C O N T ? X ) ) ) ) \r ( P U T
0023100 P R O P S S T A C K - F R A M
0023120 E ? M A C R O ( O P E N L A
0023140 M B D A ( X ) ( A N D ( S
0023160 T A C K - O B J E C T ? X )
0023200 ( T H I S - S T A C K - O B J E
0023220 C T - I S - A - F R A M E ? X
0023240 ) ) \r ) ) \r ( P U T P R O P S
0023260 S T A C K - O B J E C T ? M A
0023300 C R O ( O P E N L A M B D A
0023320 ( X ) ( \ B L O C K D A T A P
0023340 X ) ) ) \r ( P U T P R O P S
0023360 T H I S - S T A C K - O B J E C
0023400 T - I S - A - C L O S U R E ?
0023420 M A C R O ( O P E N L A M B D
0023440 A ( X ) ( E Q S T A C K -
0023460 C L O S U R E - T A G ( F E T
0023500 C H ( \r T Y P E D - O B J E C
0023520 T T Y P E T A G ) O F X )
0023540 ) ) ) \r ( P U T P R O P S T H
0023560 I S - S T A C K - O B J E C T -
0023600 I S - A - C O N T ? M A C R O
0023620 ( O P E N L A M B D A ( X )
0023640 ( E Q S T A C K - C O N T -
0023660 T A G ( F E T C H ( T Y P E
0023700 D - O B J E C T \r T Y P E T A
0023720 G ) O F X ) ) ) ) \r ( P U T
0023740 P R O P S T H I S - S T A C K
0023760 - O B J E C T - I S - A - F R A
0024000 M E ? M A C R O ( O P E N L
0024020 A M B D A ( X ) ( E Q S T
0024040 A C K - F R A M E - T A G ( F
0024060 E T C H ( T Y P E D - O B J E
0024100 C T \r T Y P E T A G ) O F
0024120 X ) ) ) ) \r ( P U T P R O P S
0024140 U N W R A P M A C R O ( O P
0024160 E N L A M B D A ( X ) ( F E
0024200 T C H ( N L I S P - S T A C K
0024220 - O B J E C T U G L Y A D D R
0024240 ) O F X ) ) ) \r ( P U T P R
0024260 O P S U N W R A P - I F - N E
0024300 C E S S A R Y M A C R O ( O
0024320 P E N L A M B D A ( X ) ( I
0024340 F ( T Y P E ? N L I S P - S
0024360 T A C K - O B J E C T X ) T
0024400 H E N ( U N W R A P X ) \r
0024420 E L S E X ) ) ) \r ( P U T P R
0024440 O P S W R A P M A C R O (
0024460 O P E N L A M B D A ( X ) (
0024500 C A R ( S E T Q W R A P - A
0024520 N C H O R ( C O N S ( C R E
0024540 A T E N L I S P - S T A C K -
0024560 O B J E C T U G L Y A D D R
0024600 \r _ X ) W R A P - A N C H O
0024620 R ) ) ) ) ) \r ( P U T P R O P S
0024640 W R A P - I F - N E C E S S A
0024660 R Y M A C R O ( O P E N L A
0024700 M B D A ( X ) ( I F ( S T
0024720 A C K - O B J E C T ? X ) T
0024740 H E N ( W R A P X ) E L S
0024760 E X ) ) ) \r ( B L O C K R E C
0025000 O R D C E L L ( ( C O N T E
0025020 N T S F U L L X P O I N T E R
0025040 ) ( S U C C E S S O R W O R
0025060 D ) ) ) \r ( B L O C K R E C O R
0025100 D G C - O B J E C T ( ( T Y
0025120 P E T A G B Y T E ) ( G O N
0025140 E F L A G ) ( S P A R E 1
0025160 B I T S 7 ) ( S P A R E 2
0025200 B Y T E ) ( A G E B Y T E )
0025220 ( S N A K E \r F U L L X P O
0025240 I N T E R ) ( T E M P F U L
0025260 L X P O I N T E R ) ) ) \r ( D A
0025300 T A T Y P E N L I S P - S T A
0025320 C K - O B J E C T ( U G L Y A
0025340 D D R ) ) \r ( B L O C K R E C O
0025360 R D S P A C E - H E A D E R
0025400 ( ( T Y P E T A G B Y T E )
0025420 ( G O N E F L A G ) ( S P A
0025440 R E 1 B I T S 7 ) ( S P A
0025460 R E 2 B Y T E ) ( A G E B
0025500 Y T E ) ( F R E E \r F U L L
0025520 X P O I N T E R ) ( S I Z E
0025540 F U L L X P O I N T E R ) ( C
0025560 E L L S L E F T F U L L X P O
0025600 I N T E R ) ( H I P T R F U
0025620 L L X P O I N T E R ) ( G A U
0025640 G E F U L L X P O I N T E R )
0025660 ( \r S U C C E S S O R W O R
0025700 D ) ) ) \r ( B L O C K R E C O R
0025720 D S T A C K - C L O S U R E
0025740 ( ( T Y P E T A G B Y T E )
0025760 ( G O N E F L A G ) ( S P A
0026000 R E 1 B I T S 7 ) ( S P A
0026020 R E 2 B Y T E ) ( A G E B
0026040 Y T E ) ( \r S K E L E T O N
0026060 F U L L X P O I N T E R ) ( E
0026100 N V F U L L X P O I N T E R )
0026120 ( S U C C E S S O R W O R D
0026140 ) ) ) \r ( B L O C K R E C O R D
0026160 S T A C K - C O N T ( ( T Y
0026200 P E T A G B Y T E ) ( G O N
0026220 E F L A G ) ( R E T U R N E
0026240 D T O F L A G ) ( B O G U S
0026260 F L A G ) ( S P A R E 1 B
0026300 I T S 5 ) ( \r S P A R E 2
0026320 B Y T E ) ( A G E B Y T E )
0026340 ( P C F U L L X P O I N T E
0026360 R ) ( E N V F U L L X P O I
0026400 N T E R ) ( F R A M E F U L
0026420 L X P O I N T E R ) ( N E X T
0026440 F U L L X P O I N T E R ) \r
0026460 ( E S C F U L L X P O I N T E
0026500 R ) ( C O N T F U L L X P O
0026520 I N T E R ) ( S U C C E S S O
0026540 R W O R D ) ) ) \r ( B L O C K
0026560 R E C O R D S T A C K - F R A
0026600 M E ( ( T Y P E T A G B Y T
0026620 E ) ( G O N E F L A G ) (
0026640 O B J E C T I F I E D F L A G
0026660 ) ( R E I F I E D F L A G )
0026700 ( B A C K E D U P F L A G )
0026720 \r ( S P A R E 1 B I T S 4
0026740 ) ( N A R G S B Y T E ) (
0026760 A G E B Y T E ) ( E X P F
0027000 U L L X P O I N T E R ) ( P R
0027020 O C F U L L X P O I N T E R )
0027040 ( A R G 1 F U L L X P O I N
0027060 T E R ) ( \r A R G 2 F U L L
0027100 X P O I N T E R ) ( A R G 3
0027120 F U L L X P O I N T E R ) ( A
0027140 R G 4 F U L L X P O I N T E R
0027160 ) ( A R G 5 F U L L X P O I
0027200 N T E R ) ( A R G 6 F U L L
0027220 X P O I N T E R ) ( \r A R G 7
0027240 F U L L X P O I N T E R ) ) )
0027260 \r ( B L O C K R E C O R D T Y
0027300 P E D - O B J E C T ( ( T Y P
0027320 E T A G B Y T E ) ( G O N E
0027340 F L A G ) ( S P A R E 1 B
0027360 I T S 7 ) ( S P A R E 2 B
0027400 Y T E ) ( A G E B Y T E )
0027420 ( \r S U C C E S S O R W O R D
0027440 ) ) ) \r ( / D E C L A R E D A T
0027460 A T Y P E ( Q U O T E N L I
0027500 S P - S T A C K - O B J E C T )
0027520 ( Q U O T E ( P O I N T E R
0027540 ) ) ( Q U O T E ( ( N L I S
0027560 P - S T A C K - O B J E C T 0
0027600 P O I N T E R ) ) \r ) ( Q U
0027620 O T E 2 ) ) \r ( R P A Q Q W
0027640 O R D - O F F S E T - T O - P R
0027660 O C - F I E L D 4 ) \r ( R P A
0027700 Q Q W O R D S - P E R - C E L
0027720 L 2 ) \r ( R P A Q Q C E L L
0027740 S - P E R - S T A C K - F R A M
0027760 E 3 ) \r ( R P A Q Q C E L L
0030000 S - P E R - S T A C K - C L O S
0030020 U R E 3 ) \r ( R P A Q Q C E
0030040 L L S - P E R - S T A C K - C O
0030060 N T 7 ) \r ( R P A Q Q C E L
0030100 L S - P E R - S P A C E - H E A
0030120 D E R 6 ) \r ( R P A Q Q H O
0030140 L E - T A G 5 ) \r ( R P A Q Q
0030160 S P A C E - H E A D E R - T A
0030200 G 4 ) \r ( R P A Q Q S T A C
0030220 K - C L O S U R E - T A G 3 )
0030240 \r ( R P A Q Q S T A C K - C O
0030260 N T - T A G 2 ) \r ( R P A Q Q
0030300 S T A C K - F R A M E - T A G
0030320 1 ) \r ( C O N S T A N T S (
0030340 W O R D - O F F S E T - T O - P
0030360 R O C - F I E L D 4 ) ( W O
0030400 R D S - P E R - C E L L 2 )
0030420 ( C E L L S - P E R - S T A C K
0030440 - F R A M E 3 ) ( \r C E L L
0030460 S - P E R - S T A C K - C L O S
0030500 U R E 3 ) ( C E L L S - P E
0030520 R - S T A C K - C O N T 7 )
0030540 ( C E L L S - P E R - S P A C E
0030560 - H E A D E R 6 ) ( H O L E
0030600 - T A G 5 ) ( \r S P A C E -
0030620 H E A D E R - T A G 4 ) ( S
0030640 T A C K - C L O S U R E - T A G
0030660 3 ) ( S T A C K - C O N T -
0030700 T A G 2 ) ( S T A C K - F R
0030720 A M E - T A G 1 ) ) \r ( P U T
0030740 P R O P S M M C O P Y R I G
0030760 H T ( " T h e K n i g h t s
0031000 o f t h e L a m b d a C
0031020 a l c u l u s " 1 9 8 4 1 9
0031040 8 5 1 9 8 7 ) ) \r N I L \r
0031056