$ od -c -N 50000 [eris]<Lisp>JCAI>library>BSEARCH.DCOM!1
0000000 ( F I L E C R E A T E D " 7
0000020 - M a y - 8 4 2 3 : 2 0 : 1 6
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P C
0000100 O R E > L I B R A R Y > B S E A
0000120 R C H . ; 2 ) \r " 7 - M a y
0000140 - 8 4 1 6 : 0 2 : 2 3 " r e
0000160 c o m p i l e d c h a n g e s
0000200 : n o t h i n g i n W O R
0000220 K d a t e d " 7 - M a y -
0000240 8 4 2 1 : 4 8 : 0 6 " ) \r ( F
0000260 I L E C R E A T E D " 7 - M
0000300 a y - 8 4 2 3 : 1 9 : 5 9 "
0000320 { P H Y L U M } < L I S P C O R
0000340 E > L I B R A R Y > B S E A R C
0000360 H . ; 2 3 7 2 4 c h a n g e
0000400 s t o : ( V A R S \r B S E
0000420 A R C H C O M S ) p r e v i o
0000440 u s d a t e : " 3 0 - A p r
0000460 - 8 4 1 9 : 5 9 : 4 9 " { P
0000500 H Y L U M } < L I S P C O R E >
0000520 L I B R A R Y > B S E A R C H .
0000540 ; 1 ) \r B F I L E P O S A 0 0 0
0000560 1 D 1 \r ( N A M E E R R O R
0000600 S E T L ( 2 E R R O R S E
0000620 T . W 1 E R R O R S E T . V
0000640 0 E R R O R S E T . U ) P
0000660 1 3 Q S T R M P 1 2 Q
0000700 T E M P 1 1 Q M A X I P
0000720 1 0 Q N E X T I P 7 S
0000740 T A R T I P 6 Q U A R T E
0000760 R F L E N P 5 F L E N P
0001000 4 O R I G I N A L L Y O P E
0001020 N P P 3 O F P O S P 2
0001040 F F P 1 I N C R E M E N
0001060 T P 0 P L E N F 1 6 Q
0001100 L O W I N D E X F 1 7 Q
0001120 H I G H I N D E X F 2 0 Q
0001140 R E S E T V A R S L S T F 2
0001160 1 Q P A T T E R N F 2 2 Q
0001200 T A I L F 2 3 Q F I L E
0001220 F 2 4 Q C A S E A R R A Y
0001240 F 2 5 Q S K I P F 2 6
0001260 Q R E S E T Y ) 001 v 016 \t \0 003
0001300 W " \t \0 \0 l 200 g \0 \0 j 021 244 \r W &
0001320 \t \0 \0 _ 024 232 i 274 O 024 \t \0 \0 _ 026 260
0001340 033 o \0 \0 \0 W & g \0 \0 \n \0 \0 _ 026 h
0001360 032 032 W 032 c 277 O 026 g \0 \0 \n \0 \0
0001400 275 j M H 331 _ 022 361 223 h 261 001 " M 342 342
0001420 _ 030 277 l 002 O 030 361 242 O 030 201 l 002 276 O
0001440 026 \t \0 \0 273 W 034 257 K c 034 277 W 036 263 .
0001460 o \0 \0 \0 c 036 260 7 j W 034 361 262 025 W 034
0001500 O 022 k 330 330 c 034 277 j W 034 361 262 340 j 260
0001520 332 W 034 O 022 361 262 326 h 261 \0 323 j W 036 361
0001540 231 W 036 O 022 k 330 330 c 036 201 W 036 O 022 361
0001560 222 O 022 201 W 036 c 036 277 W 034 W 036 361 227 o
0001600 \0 \0 \0 \t \0 \0 277 L 264 026 o \0 \0 \0 O 026
0001620 K h 032 032 h 032 032 W 032 c 277 h _ 020
0001640 277 W 036 k 330 _ 016 277 W $ 221 H 200 j c $
0001660 277 O 020 265 \r O 016 d W 034 361 247 277 h 260 n
0001700 _ 016 260 U k 331 _ 022 277 W 034 O 016 N d I
0001720 361 224 277 I d 340 271 331 _ 032 277 d O 032 361 242
0001740 277 O 032 _ 016 277 W " O 026 O 016 O 022 W *
0001760 h W ( \r \a \0 \0 _ 020 260 272 W " O 026 O
0002000 020 O 022 W * h W ( \r \a \0 \0 _ 024 265 #
0002020 O 020 _ 022 277 O 016 O 022 O 016 331 342 330 _ 020
0002040 O 016 331 j 360 262 326 O 016 W $ 330 022 c , i
0002060 020 _ 016 260 344 \0 ( 5 1 3 Q F F I L
0002100 E P O S 4 6 6 Q F F I L E P
0002120 O S 3 0 5 Q E R R O R 1 4
0002140 3 Q G E T F I L E P T R 7 7
0002160 Q G E T F I L E I N F O 5 4
0002200 Q O P E N S T R E A M 3 4 Q
0002220 \ G E T S T R E A M 2 2 Q
0002240 O P E N P 4 N C H A R S ) \r
0002260 ( 7 4 Q L E N G T H 5 1 Q
0002300 I N P U T 1 1 Q F I L E P O
0002320 S ) \r ( 3 1 5 Q ( A N D R
0002340 E S E T S T A T E ( A P P L Y
0002360 ( Q U O T E S E T F I L E P
0002400 T R ) O L D V A L U E ) ) 3
0002420 0 2 Q " H i g h - e n d i n
0002440 d e x l e s s t h a n l o
0002460 w - e n d " 1 6 3 Q 1 7 7 7
0002500 7 7 7 7 7 7 7 Q 4 4 Q ( P R
0002520 O G N ( C L O S E F ? O L D
0002540 V A L U E ) ) ) \r B F I L E P O
0002560 S D 1 \r ( P 2 R E S E T Z
0002600 P 1 R E S E T Y P 0
0002620 L I S P X H I S T I 6 C A
0002640 S E A R R A Y I 5 T A I L
0002660 I 4 S K I P I 3 H I
0002700 G H I N D E X I 2 L O W I
0002720 N D E X I 1 F I L E I
0002740 0 P A T T E R N F 3 L I
0002760 S P X H I S T F 4 R E S E
0003000 T V A R S L S T ) \0 3 003 002 \0 \a
0003020 @ 005 \a 254 @ 004 l 004 360 246 @ \t \0 \0 b \0
0003040 277 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0
0003060 221 h 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020
0003100 I 020 \0 ( 5 6 Q E R R O R ! 5
0003120 1 Q R E S E T R E S T O R E
0003140 3 7 Q B F I L E P O S A 0 0 0
0003160 1 1 5 Q M K S T R I N G ) \r
0003200 ( 4 5 Q E R R O R 3 4 Q I
0003220 N T E R N A L ) \r ( 3 1 Q (
0003240 D U M M Y . F O R . E R R O R S
0003260 E T ) ) \r ( P R E T T Y C O M P
0003300 R I N T B S E A R C H C O M S
0003320 ) \r ( R P A Q Q B S E A R C H
0003340 C O M S ( ( F N S B F I L E
0003360 P O S ) ( V A R S \ B F I L
0003400 E P O S . S H O R T P A T T E R
0003420 N L ) ) ) \r ( R P A Q Q \ B F
0003440 I L E P O S . S H O R T P A T T
0003460 E R N L 1 6 ) \r ( P U T P R O
0003500 P S B S E A R C H C O P Y R
0003520 I G H T ( " X e r o x C o r
0003540 p o r a t i o n " 1 9 8 3 1
0003560 9 8 4 ) ) \r N I L \r
0003572