$ od -c -N 50000 [eris]<LispCore>LIBRARY>TEDITABBREV.DCOM!26
0000000 ( F I L E C R E A T E D " 7
0000020 - O c t - 8 6 1 3 : 1 7 : 3 0
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < T E D I T > T
0000100 E D I T A B B R E V . ; 1 3 )
0000120 " 1 - O c t - 8 6 2 0 : 2 3
0000140 : 1 5 " \r b c o m p l ' d i
0000160 n " X e r o x L i s p 1
0000200 - O c t - 8 6 . . . " d a t
0000220 e d " 1 - O c t - 8 6 2 1
0000240 : 2 4 : 4 4 " ) \r ( F I L E C R
0000260 E A T E D " 6 - O c t - 8 6
0000300 1 3 : 0 6 : 4 9 " { E R I S
0000320 } < T E D I T > T E D I T A B B
0000340 R E V . ; 1 3 8 9 0 6 c h a
0000360 n g e s t o : ( V A R S T
0000400 E D I T A B B R E V C O M S ) \r
0000420 p r e v i o u s d a t e :
0000440 " 2 5 - S e p - 8 6 2 3 : 2 6
0000460 : 2 8 " { E R I S } < T E D I
0000500 T > T E D I T A B B R E V . ; 1
0000520 2 ) \r \ T E D I T . A B B R E V
0000540 . E X P A N D D 1 \r ( P 4
0000560 E X P A N S I O N P 3 C H
0000600 P 2 C H # P 1 S E L
0000620 P 0 T E X T O B J I 0
0000640 S T R E A M ) \0 234 006 \0 \0 001 @
0000660 006 \0 \0 311 020 021 Q 005 H 006 \0 \0 311 032 Y d
0000700 006 \0 \0 311 024 d g \0 \0 360 231 277 I 006 \0 \0
0000720 311 006 k 331 216 g \0 \0 360 230 I 006 \0 \0 311 \n
0000740 k 331 200 j Z I 006 \0 \0 311 \f ] j 360 263 3
0000760 M 005 003 265 ) @ \t \0 \0 [ 277 K @ \n \0 \0
0001000 \ d 264 - H 006 \0 \0 j 317 020 \0 277 H I \n
0001020 \0 \0 277 @ L I \v \0 \0 277 260 024 \t \0 \0 262
0001040 326 J j 360 250 J d 005 003 226 \t \0 \0 221 h 020
0001060 J H \n \0 \0 277 @ \t \0 \0 \t \0 \0 273 @
0001100 J k g \0 \0 \f \0 \0 260 262 \0 ( 2 3 0 Q
0001120 T E D I T . S E T S E L 2 1
0001140 6 Q M K S T R I N G 2 1 3 Q
0001160 C H A R A C T E R 2 0 5 Q
0001200 \ S E T U P G E T C H 1 7 5 Q
0001220 \ F Z E R O P 1 5 7 Q \ F
0001240 Z E R O P 1 5 1 Q T E D I T
0001260 . I N S E R T 1 4 2 Q T E D
0001300 I T . D E L E T E 1 2 0 Q \
0001320 T E D I T . T R Y . A B B R E V
0001340 1 1 1 Q T E D I T . S E L .
0001360 A S . S T R I N G ) \r ( 2 2 5 Q
0001400 R I G H T 1 3 0 Q T E X T
0001420 O B J 7 1 Q S E L E C T I O
0001440 N 5 6 Q S E L E C T I O N
0001460 5 0 Q R I G H T 4 0 Q S E
0001500 L E C T I O N 3 1 Q L E F T
0001520 2 3 Q S E L E C T I O N 1
0001540 4 Q T E X T O B J 3 S T R
0001560 E A M ) \r ( ) \r \ T E D I T . E
0001600 X P A N D . D A T E D 1 \r ( P
0001620 3 D A Y P 2 M O N T H
0001640 P 1 Y E A R P 0 D A
0001660 T E I 1 C H I 0 S T
0001700 R E A M ) \0 3 004 \0 \0 002 \b \0 \0 021
0001720 1 003 H 001 H 002 270 271 H 001 H 002 270 272 H 001
0001740 H 002 270 273 o \0 \0 \0 J k 330 \n \0 \0 001 o
0001760 \0 \0 \0 K o \0 \0 \0 I \r 005 \0 \0 020 \0 (
0002000 6 0 Q C O N C A T 4 1 Q N
0002020 T H 2 \ U N P A C K D A T E
0002040 ) \r N I L \r ( 5 3 Q " , "
0002060 4 6 Q " " 3 3 Q ( J a
0002100 n u a r y F e b r u a r y M
0002120 a r c h A p r i l M a y J
0002140 u n e J u l y A u g u s t
0002160 S e p t e m b e r O c t o b e
0002200 r N o v e m b e r D e c e m
0002220 b e r ) ) \r \ T E D I T . T R Y
0002240 . A B B R E V D 1 \r ( P 3
0002260 E X P A N S I O N P 2 C H
0002300 P 1 C H # P 0 S E L
0002320 I 1 S T R E A M I 0
0002340 A B B R E V ) \0 H 005 \0 \0 002 021 P
0002360 004 @ ` \0 \0 \n \0 \0 265 \f @ \t \0 \0 ` \0
0002400 \0 \n \0 \0 [ d 264 ( d 002 005 \a 246 K d 002
0002420 3 020 223 277 K 002 020 002 004 l 004 360 262 023 K 002
0002440 \t \0 \0 232 K 002 274 A J l 002 L 017 016 020 K
0002460 002 \t \0 \0 020 \0 ( 1 0 5 Q E V A L
0002500 6 4 Q \ D E F I N E D P 2
0002520 5 Q S A S S O C 1 7 Q U -
0002540 C A S E 1 1 Q S A S S O C )
0002560 \r ( 2 2 Q T E D I T . A B B R
0002600 E V S 6 T E D I T . A B B R
0002620 E V S ) \r ( ) \r ( P R E T T Y C
0002640 O M P R I N T T E D I T A B B
0002660 R E V C O M S ) \r ( R P A Q Q
0002700 T E D I T A B B R E V C O M S
0002720 ( ( F I L E S T E D I T D E C
0002740 L S ) ( D E C L A R E : E V
0002760 A L @ C O M P I L E D O N T C
0003000 O P Y ( C O N S T A N T S (
0003020 \ S C R A T C H L E N 6 4 ) \r
0003040 ) ( F I L E S ( L O A D C O
0003060 M P ) T E D I T D E C L S ) )
0003100 ( F N S \ T E D I T . A B B
0003120 R E V . E X P A N D \ T E D I
0003140 T . E X P A N D . D A T E \ T
0003160 E D I T . T R Y . A B B R E V )
0003200 ( \r G L O B A L V A R S T E
0003220 D I T . A B B R E V S ) ( V A
0003240 R S ( T E D I T . A B B R E V
0003260 S ( L I S T ( C O N S " b
0003300 " ( M K S T R I N G ( C H A
0003320 R A C T E R ( C H A R C O D E
0003340 3 5 7 , 1 4 6 ) \r ) ) ) ( C
0003360 O N S " n " ( M K S T R I N
0003400 G ( C H A R A C T E R ( C H
0003420 A R C O D E 3 5 7 , 4 4 ) ) )
0003440 ) ( C O N S " m " ( M K S
0003460 T R I N G ( C H A R A C T E R
0003500 ( C H A R C O D E \r 3 5 7 ,
0003520 4 5 ) ) ) ) ( C O N S " T "
0003540 ( M K S T R I N G ( C H A R
0003560 A C T E R ( C H A R C O D E
0003600 3 5 7 , 5 7 ) ) ) ) ( C O N S
0003620 " d " ( M K S T R I N G (
0003640 C H A R A C T E R ( \r C H A R
0003660 C O D E 3 5 7 , 6 0 ) ) ) )
0003700 ( C O N S " D " ( M K S T R
0003720 I N G ( C H A R A C T E R (
0003740 C H A R C O D E 3 5 7 , 6 1 )
0003760 ) ) ) ( C O N S " s " ( M
0004000 K S T R I N G ( C H A R A C T
0004020 E R \r ( C H A R C O D E 0 ,
0004040 2 4 7 ) ) ) ) ( C O N S " '
0004060 " ( M K S T R I N G ( C H A
0004100 R A C T E R ( C H A R C O D E
0004120 0 , 2 7 1 ) ) ) ) ( C O N S
0004140 " ` " ( M K S T R I N G (
0004160 C H A R A C T E R \r ( C H A R
0004200 C O D E 0 , 2 5 1 ) ) ) ) (
0004220 C O N S " % " " ( M K S T R
0004240 I N G ( C H A R A C T E R (
0004260 C H A R C O D E 0 , 2 5 2 ) )
0004300 ) ) ( C O N S " ~ " ( M K
0004320 S T R I N G ( \r C H A R A C T
0004340 E R ( C H A R C O D E 0 , 2
0004360 7 2 ) ) ) ) ( C O N S " 1 /
0004400 4 " ( M K S T R I N G ( C H
0004420 A R A C T E R ( C H A R C O D
0004440 E 0 , 2 7 4 ) ) ) ) ( C O N
0004460 S " 1 / 2 " ( \r M K S T R I
0004500 N G ( C H A R A C T E R ( C
0004520 H A R C O D E 0 , 2 7 5 ) ) )
0004540 ) ( C O N S " 3 / 4 " ( M
0004560 K S T R I N G ( C H A R A C T
0004600 E R ( C H A R C O D E 0 , 2
0004620 7 6 ) ) ) ) ( C O N S \r " 1
0004640 / 3 " ( M K S T R I N G ( C
0004660 H A R A C T E R ( C H A R C O
0004700 D E 3 5 7 , 2 7 5 ) ) ) ) (
0004720 C O N S " 2 / 3 " ( M K S T
0004740 R I N G ( C H A R A C T E R
0004760 ( C H A R C O D E 3 5 7 , 3 7
0005000 6 ) ) ) \r ) ( C O N S " c "
0005020 ( M K S T R I N G ( C H A R
0005040 A C T E R 2 1 1 ) ) ) ( C O
0005060 N S " c / o " ( M K S T R I
0005100 N G ( C H A R A C T E R ( C
0005120 H A R C O D E 3 5 7 , 1 0 0 )
0005140 ) ) ) ( C O N S \r " % % "
0005160 ( M K S T R I N G ( C H A R A
0005200 C T E R ( C H A R C O D E 3
0005220 5 7 , 1 0 0 ) ) ) ) ( Q U O T
0005240 E ( " D A T E " . \ T E D
0005260 I T . E X P A N D . D A T E ) )
0005300 ( Q U O T E ( \r " > > D A T
0005320 E < < " . \ T E D I T . E X
0005340 P A N D . D A T E ) ) ) ) ) ) )
0005360 \r ( F I L E S L O A D T E D I
0005400 T D E C L S ) \r ( R P A Q T E
0005420 D I T . A B B R E V S ( L I S
0005440 T ( C O N S " b " ( M K S
0005460 T R I N G ( C H A R A C T E R
0005500 ( C H A R C O D E 3 5 7 , 1
0005520 4 6 ) ) ) ) ( C O N S " n "
0005540 ( M K S T R I N G ( \r C H A
0005560 R A C T E R ( C H A R C O D E
0005600 3 5 7 , 4 4 ) ) ) ) ( C O N
0005620 S " m " ( M K S T R I N G
0005640 ( C H A R A C T E R ( C H A R
0005660 C O D E 3 5 7 , 4 5 ) ) ) )
0005700 ( C O N S " T " ( M K S T R
0005720 I N G \r ( C H A R A C T E R
0005740 ( C H A R C O D E 3 5 7 , 5 7
0005760 ) ) ) ) ( C O N S " d " (
0006000 M K S T R I N G ( C H A R A C
0006020 T E R ( C H A R C O D E 3 5
0006040 7 , 6 0 ) ) ) ) ( C O N S "
0006060 D " ( \r M K S T R I N G ( C
0006100 H A R A C T E R ( C H A R C O
0006120 D E 3 5 7 , 6 1 ) ) ) ) ( C
0006140 O N S " s " ( M K S T R I N
0006160 G ( C H A R A C T E R ( C H
0006200 A R C O D E 0 , 2 4 7 ) ) ) )
0006220 ( C O N S " ' " \r ( M K S
0006240 T R I N G ( C H A R A C T E R
0006260 ( C H A R C O D E 0 , 2 7 1
0006300 ) ) ) ) ( C O N S " ` " (
0006320 M K S T R I N G ( C H A R A C
0006340 T E R ( C H A R C O D E 0 ,
0006360 2 5 1 ) ) ) ) ( C O N S " %
0006400 " " \r ( M K S T R I N G ( C
0006420 H A R A C T E R ( C H A R C O
0006440 D E 0 , 2 5 2 ) ) ) ) ( C O
0006460 N S " ~ " ( M K S T R I N G
0006500 ( C H A R A C T E R ( C H A
0006520 R C O D E 0 , 2 7 2 ) ) ) )
0006540 ( C O N S \r " 1 / 4 " ( M K
0006560 S T R I N G ( C H A R A C T E
0006600 R ( C H A R C O D E 0 , 2 7
0006620 4 ) ) ) ) ( C O N S " 1 / 2
0006640 " ( M K S T R I N G ( C H A
0006660 R A C T E R ( C H A R C O D E
0006700 0 , 2 7 5 ) ) ) ) ( \r C O N
0006720 S " 3 / 4 " ( M K S T R I N
0006740 G ( C H A R A C T E R ( C H
0006760 A R C O D E 0 , 2 7 6 ) ) ) )
0007000 ( C O N S " 1 / 3 " ( M K
0007020 S T R I N G ( C H A R A C T E
0007040 R ( C H A R C O D E 3 5 7 ,
0007060 2 7 5 \r ) ) ) ) ( C O N S "
0007100 2 / 3 " ( M K S T R I N G (
0007120 C H A R A C T E R ( C H A R C
0007140 O D E 3 5 7 , 3 7 6 ) ) ) )
0007160 ( C O N S " c " ( M K S T R
0007200 I N G ( C H A R A C T E R 2
0007220 1 1 ) ) ) ( \r C O N S " c /
0007240 o " ( M K S T R I N G ( C H
0007260 A R A C T E R ( C H A R C O D
0007300 E 3 5 7 , 1 0 0 ) ) ) ) ( C
0007320 O N S " % % " ( M K S T R I
0007340 N G ( C H A R A C T E R ( C
0007360 H A R C O D E \r 3 5 7 , 1 0 0
0007400 ) ) ) ) ( Q U O T E ( " D A
0007420 T E " . \ T E D I T . E X P
0007440 A N D . D A T E ) ) ( Q U O T
0007460 E ( " > > D A T E < < " .
0007500 \ T E D I T . E X P A N D . D A
0007520 T E ) ) ) ) \r ( P U T P R O P S
0007540 T E D I T A B B R E V C O P
0007560 Y R I G H T ( " J o h n S y
0007600 b a l s k y & X e r o x C
0007620 o r p o r a t i o n " 1 9 8 3
0007640 1 9 8 4 1 9 8 5 1 9 8 6 )
0007660 ) \r N I L \r
0007666