$ od -c -N 50000 [eris]<Lisp>JCAI>library>UPCSTATS.DCOM!1
0000000 ( F I L E C R E A T E D " 1 1
0000020 - O c t - 8 4 1 4 : 3 4 : 3 4
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > L I B R A R Y > U P C S T A
0000120 T S . ; 3 ) \r " 3 - O c t -
0000140 8 4 1 7 : 1 8 : 0 4 " r e c
0000160 o m p i l e d c h a n g e s :
0000200 U P C S T A T S i n " I N
0000220 T E R L I S P - D 3 - O c t
0000240 - 8 4 . . . " d a t e d \r
0000260 " 3 - O c t - 8 4 1 7 : 4 5
0000300 : 4 5 " ) \r ( F I L E C R E A T
0000320 E D " 1 1 - O c t - 8 4 1 4
0000340 : 3 4 : 1 6 " { E R I S } < L
0000360 I S P C O R E > L I B R A R Y >
0000400 U P C S T A T S . ; 3 9 1 5 7
0000420 c h a n g e s t o : ( F N
0000440 S U P C S T A T S ) \r p r e
0000460 v i o u s d a t e : " 1 2 -
0000500 N O V - 8 2 1 2 : 4 7 : 4 9 "
0000520 { E R I S } < L I S P C O R E
0000540 > L I B R A R Y > U P C S T A T
0000560 S . ; 1 ) \r G A T H E R U P C S
0000600 T A T S A 0 0 0 1 D 1 \r ( N A
0000620 M E E R R O R S E T L ( 2
0000640 E R R O R S E T . W 1 E R
0000660 R O R S E T . V 0 E R R O R
0000700 S E T . U ) F 0 S T R F
0000720 F 1 L C F I L F 2 F O
0000740 R M ) \0 % \0 003 \0 003 i c \0 277 h c
0000760 002 277 g \0 \0 g \0 \0 h o \0 \0 \0 R o \0
0001000 \0 \0 032 032 032 032 \n \0 \0 277 h h 032 020 \0 (
0001020 3 6 Q C O M P I L E 1 ) \r ( 1
0001040 5 Q L A M B D A 1 2 Q S T
0001060 A T S D U M M Y F U N C T I O N
0001100 ) \r ( 2 7 Q ( ( ( O P C O D
0001120 E S U P C T R A C E ) N I L
0001140 ) ) 2 2 Q ( ( O P C O D E S
0001160 U P C T R A C E ) S T A T S
0001200 B U F F E R ) ) \r G A T H E R U
0001220 P C S T A T S D 1 \r ( P 1
0001240 M A C R O Y P 0 M A C R O
0001260 X I 0 F O R M F 2 R
0001300 E S E T V A R S L S T F 3
0001320 I M S I Z E F 4 S T R F
0001340 F 5 L C F I L ) \0 h 002 004 \0
0001360 001 ` \0 \0 265 \t S \t \0 \0 027 \0 \0 d S l
0001400 002 332 k 331 320 \n \0 \0 g \0 \0 T 032 g \0 \0
0001420 U 032 R 032 032 c 004 021 021 001 R 271 o \0 \0 \0
0001440 g \0 \0 \n \0 \0 H 001 002 c \b 277 H 002 X 001
0001460 002 c \n 277 I d R 360 225 277 H 002 c 004 215 R
0001500 \n \0 \0 231 R k I \v \0 \0 H 002 031 277 243 \b
0001520 \0 \0 277 023 \b \0 \0 020 \0 ( 1 4 5 Q S
0001540 T A T S D U M M Y F U N C T I O
0001560 N 1 4 0 Q E R R O R ! 1 3
0001600 0 Q N L E F T 1 2 1 Q T A
0001620 I L P 6 4 Q G A T H E R U P
0001640 C S T A T S A 0 0 0 1 2 6 Q
0001660 \ Z E R O W O R D S 1 0 Q \
0001700 A L L O C L O C K E D ) \r ( 6 1
0001720 Q I N T E R N A L 3 6 Q L
0001740 C F I L 3 1 Q S T R F 1 3
0001760 Q S T A T S B U F F E R 2
0002000 S T A T S B U F F E R ) \r ( 5
0002020 6 Q ( D U M M Y . F O R . E R
0002040 R O R S E T ) ) \r P R I N T C U
0002060 M U L A T I V E P E R C E N T
0002100 D 1 \r ( F 0 C U H I F 1
0002120 C U L O F 2 T O T A L )
0002140 \0 035 \0 003 \0 \0 o \0 \0 \0 \t \0 \0 P o
0002160 \0 \0 \0 352 Q 350 R 353 \t \0 \0 o \0 \0 \0 \t
0002200 \0 \0 020 \0 ( 3 2 Q P R I N 1 2
0002220 3 Q P R I N 1 6 P R I N 1
0002240 ) \r N I L \r ( 2 7 Q " ) "
0002260 1 3 Q 6 5 5 3 6 . 0 3 " (
0002300 " ) \r P R I N T U P C D 1 \r (
0002320 F 0 M B F I L E F 1 U
0002340 P C S E E N ) \0 > \0 002 \0 \0 Q 262
0002360 8 o \0 \0 \0 i \n \0 \0 277 i d \n \0 \0 c
0002400 \0 k \n \0 \0 g \0 \0 360 253 P d g \0 \0 360
0002420 245 \t \0 \0 262 335 P \t \0 \0 277 o \0 \0 \0 \t
0002440 \0 \0 277 \b \0 \0 277 \b \0 \0 020 \0 ( 7 3 Q
0002460 S T A T S D U M M Y F U N C T
0002500 I O N 6 7 Q P L O T P C S
0002520 6 3 Q P R I N 1 5 3 Q R E
0002540 A D M B F I L E 4 5 Q I N F
0002560 I L E P 2 6 Q N T H C H A R
0002600 2 0 Q R E A D 1 2 Q P R
0002620 I N 1 ) \r ( 4 0 Q N I L : 3
0002640 1 Q { ) \r ( 6 0 Q " M i c
0002660 r o c o d e P C S a m p l e
0002700 : " 6 " U s e . M B f
0002720 i l e : " ) \r U P C S T A T S
0002740 D 1 \r ( P 1 L C F I L P
0002760 0 S T R F I 1 D O L I
0003000 S T F L G I 0 F O R M )
0003020 \0 # 002 \0 \0 002 i 021 021 001 \b \0 \0 g \0 \0
0003040 360 251 o \0 \0 \0 i \n \0 \0 h 020 @ \t \0 \0
0003060 \b \0 \0 \b \0 \0 h 020 \0 ( 3 7 Q P L
0003100 O T P C S 3 4 Q R E A D M B
0003120 F I L E 3 1 Q G A T H E R U
0003140 P C S T A T S 2 3 Q P R I N
0003160 1 6 M A C H I N E T Y P E )
0003200 \r ( 1 1 Q D O R A D O ) \r (
0003220 1 7 Q " U P C S T A T S
0003240 o n l y r u n s o n D o r
0003260 a d o s " ) \r R E A D M B F I L
0003300 E D 1 \r ( P 5 B L O C K T
0003320 Y P E P 4 I M P 3 C
0003340 U R L O C P 2 C U R M E M
0003360 P 1 C U R M E M W I D T H
0003400 P 0 I N X I 0 M B F
0003420 I L E F 6 M E M O R I E S
0003440 F 7 V I R T O R E A L F
0003460 1 0 Q V I R T O N A M E F
0003500 1 1 Q I M S I Z E ) 001 246 006
0003520 004 \0 001 @ 265 030 o \0 \0 \0 i \n \0 \0 277 i
0003540 d \n \0 \0 b \0 \t \0 \0 262 355 @ g \0 \0 g
0003560 \0 \0 l \b \f \0 \0 b \0 g \0 \0 \n \0 \0 j
0003600 d d 021 $ 005 h c \f 277 W 016 254 W 022 g \0
0003620 \0 j d \f \0 \0 c 016 277 W 020 254 W 022 g \0
0003640 \0 h j \f \0 \0 c 020 277 H 341 H 330 ]
0003660 d j 360 225 023 @ \t \0 \0 020 k 360 262 K J L
0003700 360 262 0 H 277 H 277 H 277 H 277 H
0003720 277 H 277 H 277 H 277 W 016 K d k
0003740 330 273 H 341 H 330 n 017 377 345 \v \0 \0 260
0003760 271 H 277 H 277 I d j 361 262 255 H 277
0004000 H 277 k 331 260 363 M d l 002 360 262 ' 277 H
0004020 341 H 330 272 H 341 H 330 273 J V \n
0004040 \0 \0 265 005 \b \0 \0 002 001 l 017 330 l 020 333 Y
0004060 261 377 x l 003 360 262 % H 341 H 330 L 360
0004100 225 \b \0 \0 261 377 d H 277 H 277 H 277
0004120 H 277 H 277 H 261 377 P M d l 004 360
0004140 262 C 277 H 341 H 330 H 341 H 330 H
0004160 \t \0 \0 h 032 032 032 V 032 c \f 001 002 002 001 g
0004200 \0 \0 360 242 261 377 % V 001 001 274 V 001 002 001 l
0004220 @ 360 222 261 377 026 g \0 \0 o \0 \0 \0 \n \0 \0
0004240 261 377 \b l 005 360 262 , H 341 H 330 L 360
0004260 262 024 W 020 H 341 H 330 H \t \0 \0 \v \0
0004300 \0 261 376 347 H 277 H 277 H i \n \0 \0 261
0004320 376 331 M l 006 360 262 034 H 277 H 277 H
0004340 277 H 277 H 277 H 277 H i \n \0 \0 261
0004360 376 271 \b \0 \0 261 376 263 \0 ( 6 4 1 Q H
0004400 E L P 6 3 3 Q R E A D N A M
0004420 E 5 7 3 Q R E A D N A M E
0004440 5 5 5 Q F A S T S E T A 5 5
0004460 2 Q R E A D N A M E 5 1 4 Q
0004500 H E L P 4 3 7 Q R E A D N
0004520 A M E 3 6 0 Q H E L P 3 2
0004540 3 Q H E L P 3 1 6 Q F A S
0004560 S O C 2 3 3 Q F A S T S E T
0004600 A W 1 4 5 Q C L O S E F 1
0004620 2 2 Q A R R A Y 1 0 2 Q A
0004640 R R A Y 5 3 Q G E T S T R E
0004660 A M 4 3 Q O P E N F I L E
0004700 2 5 Q I N F I L E P 2 0 Q
0004720 R E A D 1 2 Q P R I N 1 ) \r
0004740 ( 5 0 5 Q I M 4 5 6 Q I M
0004760 1 1 5 Q P O I N T E R 7 5
0005000 Q S M A L L P 5 0 Q I N P
0005020 U T 3 6 Q O L D 3 3 Q I
0005040 N P U T ) \r ( 5 1 1 Q " w r
0005060 o n g # b i t s " 6 " U
0005100 s e . M B f i l e : " ) \r
0005120 R E A D N A M E D 1 \r ( P 2
0005140 C H A R S P 1 C H P
0005160 0 E V E N B Y T E I 1 F
0005200 L G I 0 J ) \0 $ 003 \0 \0 002
0005220 021 0 002 @ Y j 360 237 A 265 \t J \t \0 \0
0005240 \t \0 \0 H 242 @ 277 020 H h 360 270 I J 032
0005260 272 260 342 \0 ( 2 2 Q P A C K C 1
0005300 7 Q D R E V E R S E ) \r N I L
0005320 \r ( ) \r P L O T P C S D 1 \r (
0005340 P 3 1 Q V P C P 2 7 Q
0005360 I P 2 3 Q T O T A L P
0005400 2 2 Q T H R E S H O L D P
0005420 2 1 Q T A B P O S P 2 0 Q
0005440 N S T A R S P 1 7 Q L A
0005460 S T S T A R P O S P 1 6 Q
0005500 M A X S T A R S P 1 5 Q H
0005520 A L F S T A R P 1 4 Q C U
0005540 M P 1 3 Q C N T P E R S T
0005560 A R P 1 2 Q V P 1 1 Q
0005600 L A S T P R I N T E D N A M E
0005620 P 1 0 Q N A M E P 7
0005640 C U L O P 6 C U H I P
0005660 5 T O T L O P 4 T O T H
0005700 I P 3 3 R D B I G G E S T
0005720 P 2 2 N D B I G G E S T
0005740 P 1 B I G G E S T P 0
0005760 I N C I 0 A L L F L G F
0006000 3 2 Q I M S I Z E F 3 3
0006020 Q V I R T O R E A L F 3 4
0006040 Q U P C T H R E S H O L D F
0006060 3 5 Q V I R T O N A M E )
0006100 002 302 032 004 \0 001 j d d d d d d d 021 350
0006120 025 o \0 \0 \0 \t \0 \0 W 4 k 331 j 021 002 027
0006140 O . O , 361 263 I ` \0 \0 O . 340 k 330 320
0006160 310 \0 ` \0 \0 O . 340 320 310 \0 365 _ 024 j 360
0006200 263 & L O 024 343 343 330 274 M O 024 n 377 377 345
0006220 330 275 O 024 K 361 236 O 024 d J 361 227 d I 361
0006240 221 271 202 272 200 273 O . k 330 _ . 260 266 023 \b
0006260 \0 \0 @ 222 l 024 201 l \f 331 _ 036 l 024 331 _
0006300 034 K O 034 333 _ 026 d l 002 333 _ 032 M L o
0006320 \0 \0 \0 352 350 _ & @ 222 j 260 031 O 032 W 8
0006340 O 026 326 O & 327 j 330 _ ( 277 d O ( 361 242
0006360 277 O ( _ $ O & o \0 \0 \0 353 _ & o \0
0006400 \0 \0 \t \0 \0 277 O 026 \t \0 \0 277 o \0 \0 \0
0006420 \t \0 \0 277 o \0 \0 \0 O 026 O & 353 \n \0 \0
0006440 277 o \0 \0 \0 \t \0 \0 W 4 k 331 j 021 002 031
0006460 O 2 O 0 361 222 261 001 242 W : O 2 \n \0 \0
0006500 _ 024 265 ^ H k 330 270 W 6 O 2 \n \0 \0 _
0006520 * 277 ` \0 \0 O * 340 k 330 320 310 \0 ` \0 \0
0006540 O * 340 320 310 \0 365 _ 024 277 @ 242 261 \0 253 O
0006560 020 O 022 360 263 8 O 022 231 O 036 \t \0 \0 277 \b
0006600 \0 \0 277 \b \0 \0 277 O 020 _ 022 \t \0 \0 _ "
0006620 l 016 361 262 023 O 020 k l 016 _ " \v \0 \0 207
0006640 _ 020 277 j 260 243 O 020 \t \0 \0 210 \b \0 \0 277
0006660 O " \t \0 \0 277 N O 024 343 343 330 276 O 016 O
0006700 024 n 377 377 345 330 _ 016 277 H j 360 263 023 o \0
0006720 \0 \0 \t \0 \0 277 o \0 \0 \0 H \n \0 \0 277 l
0006740 022 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 o \0 \0
0006760 \0 W 6 O 2 \n \0 \0 \n \0 \0 277 o \0 \0 \0
0007000 \t \0 \0 277 o \0 \0 \0 O 024 \n \0 \0 277 O 2
0007020 k 330 _ 2 261 377 036 O 024 O $ 361 262 362 O 020
0007040 O 022 360 263 1 O 022 231 O 036 \t \0 \0 277 \b \0
0007060 \0 277 \b \0 \0 277 O 020 _ 022 \t \0 \0 _ " l
0007100 016 361 232 O 020 k l 016 _ " \v \0 \0 201 O 020
0007120 \t \0 \0 210 \b \0 \0 277 O " \t \0 \0 277 N O
0007140 024 343 343 330 276 O 016 O 024 n 377 377 345 330 _ 016
0007160 277 H j 360 263 023 o \0 \0 \0 \t \0 \0 277 o \0
0007200 \0 \0 H \n \0 \0 277 l 022 \t \0 \0 277 o \0 \0
0007220 \0 \t \0 \0 277 O 024 O 032 330 O 026 333 _ d
0007240 O 034 375 361 263 " 277 o \0 \0 \0 \t \0 \0 277 o
0007260 \0 \0 \0 O \n \0 \0 277 o \0 \0 \0 \t \0 \0
0007300 277 O 034 l 006 331 d j 361 242 261 377 C o \0 \0
0007320 \0 \t \0 \0 277 k 260 357 023 O 036 \t \0 \0 \b \0
0007340 \0 \b \0 \0 L N 331 ^ M O 016 331 _ 016 h \t
0007360 \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 \b
0007400 \0 \0 \b \0 \0 h 020 \0 ( 1 2 7 6 Q T
0007420 E R P R I 1 2 7 3 Q P R I N
0007440 T C U M U L A T I V E P E R C E
0007460 N T 1 2 7 0 Q P R I N 1 1
0007500 2 6 0 Q T E R P R I 1 2 5 3
0007520 Q T E R P R I 1 2 3 5 Q T
0007540 E R P R I 1 2 3 2 Q P R I N
0007560 T C U M U L A T I V E P E R C E
0007600 N T 1 2 2 7 Q T A B 1 2 1
0007620 5 Q P R I N 1 1 1 7 1 Q P
0007640 R I N 1 1 1 6 1 Q P R I N T
0007660 N U M 1 1 4 7 Q P R I N 1
0007700 1 1 1 5 Q P R I N 1 1 1 0 5
0007720 Q T A B 1 0 7 7 Q P R I N
0007740 T N U M 1 0 6 6 Q P R I N 1
0007760 1 0 2 6 Q S P A C E S 1 0
0010000 2 0 Q T E R P R I 1 0 1 4 Q
0010020 P R I N 1 1 0 0 6 Q S U B
0010040 S T R I N G 7 6 6 Q N C H A
0010060 R S 7 5 6 Q T E R P R I 7
0010100 5 2 Q P R I N T C U M U L A T
0010120 I V E P E R C E N T 7 4 6 Q
0010140 T A B 7 0 6 Q P R I N T N U
0010160 M 6 7 4 Q P R I N 1 6 6 4
0010200 Q P R I N T N U M 6 6 1 Q
0010220 F A S T E L T W 6 4 5 Q P R
0010240 I N 1 6 3 5 Q T A B 6 2 7
0010260 Q P R I N T N U M 6 1 6 Q
0010300 P R I N 1 5 5 6 Q S P A C E
0010320 S 5 5 0 Q T E R P R I 5 4
0010340 4 Q P R I N 1 5 3 0 Q S U
0010360 B S T R I N G 5 0 7 Q N C H
0010400 A R S 4 7 7 Q T E R P R I
0010420 4 7 3 Q P R I N T C U M U L A
0010440 T I V E P E R C E N T 4 6 7 Q
0010460 T A B 4 1 0 Q F A S T E L
0010500 T W 3 7 1 Q F A S T E L T
0010520 3 4 1 Q P R I N 1 3 3 1 Q
0010540 P R I N T N U M 3 1 4 Q P R
0010560 I N 1 3 0 4 Q P R I N 1 2
0010600 7 6 Q P R I N 1 1 5 3 Q L
0010620 I N E L E N G T H 2 1 Q P R
0010640 I N 1 ) \r ( 4 3 1 Q S T A T S
0010660 B U F F E R 4 1 6 Q S T A T
0010700 S B U F F E R 5 6 Q S T A T
0010720 S B U F F E R 4 3 Q S T A T
0010740 S B U F F E R ) \r ( 1 2 6 5 Q
0010760 " N o t s h o w n : " 1
0011000 2 1 2 Q " * " 1 1 6 6 Q "
0011020 ) " 1 1 5 4 Q ( F I X 4 )
0011040 1 1 4 4 Q " ( " 1 1 1 2 Q
0011060 " | " 1 0 7 3 Q ( F I X
0011100 3 N I L N I L T ) 1 0 6
0011120 3 Q " + " 7 0 1 Q ( F I X
0011140 1 2 Q ) 6 7 1 Q " "
0011160 6 5 2 Q ( F I X 1 0 Q 4 )
0011200 6 4 2 Q " # " 6 2 3 Q (
0011220 F I X 3 N I L N I L T )
0011240 6 1 3 Q " + " 3 3 6 Q "
0011260 % % " 3 2 1 Q ( F L O A T
0011300 1 0 Q 2 ) 3 1 1 Q " c o
0011320 u n t , o r " 2 7 3 Q "
0011340 E a c h * = " 2 6 4 Q
0011360 1 0 0 . 0 2 1 4 Q 6 5 5 3
0011400 6 . 0 1 6 Q " M i c r o c o
0011420 d e P C S a m p l e : " )
0011440 \r ( P R E T T Y C O M P R I N T
0011460 U P C S T A T S C O M S ) \r (
0011500 R P A Q Q U P C S T A T S C O
0011520 M S ( ( V A R S I M S I Z E
0011540 ) ( F N S G A T H E R U P C
0011560 S T A T S P R I N T C U M U L
0011600 A T I V E P E R C E N T P R I
0011620 N T U P C U P C S T A T S )
0011640 ( F N S \r R E A D M B F I L E
0011660 R E A D N A M E ) ( F N S
0011700 P L O T P C S ) ( I N I T V A
0011720 R S ( S T A T S B U F F E R )
0011740 ( V I R T O R E A L ) ( V I
0011760 R T O N A M E ) ) ( V A R S
0012000 ( \r U P C T H R E S H O L D 0
0012020 ( * l o w e r t h r e s h
0012040 o l d f o r p e r c e n t a
0012060 g e t o s h o w u p o n
0012100 M i c r o c o d e P C S a
0012120 m p l e h i s t o g r a m ) )
0012140 ) ( \r M A C R O S B I N 2
0012160 U P C C O U N T ) ) ) \r ( R P A
0012200 Q Q I M S I Z E 4 0 9 6 ) \r
0012220 ( R P A Q ? S T A T S B U F F
0012240 E R ) \r ( R P A Q ? V I R T O
0012260 R E A L ) \r ( R P A Q ? V I R
0012300 T O N A M E ) \r ( R P A Q U P
0012320 C T H R E S H O L D 0 ( *
0012340 l o w e r t h r e s h o l d
0012360 f o r p e r c e n t a g e t
0012400 o s h o w u p o n M i c
0012420 r o c o d e P C S a m p l e
0012440 h i s t o g r a m ) ) \r ( P U
0012460 T P R O P S B I N 2 M A C R
0012500 O ( ( I N X ) ( I P L U S
0012520 ( L L S H ( \ B I N I N X )
0012540 8 ) ( \ B I N I N X ) ) )
0012560 ) \r ( P U T P R O P S U P C C
0012600 O U N T M A C R O ( O P E N
0012620 L A M B D A ( N ) ( \ M A K
0012640 E N U M B E R ( \ G E T B A S
0012660 E S T A T S B U F F E R ( A
0012700 D D 1 ( L L S H N 1 ) ) )
0012720 ( \r \ G E T B A S E S T A T
0012740 S B U F F E R ( L L S H N
0012760 1 ) ) ) ) ) \r N I L \r
0012773