$ od -c -N 50000 [phylum]<LISP>Lyric>COMPILED-PATCHES>SETTIME-PATCH.LCOM!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 036 R E A D T A B L E " X C
0000040 L " 036 P A C K A G E " I N T
0000060 E R L I S P " ) \r ( F I L E C R
0000100 E A T E D " 1 3 - S e p - 8 8
0000120 1 3 : 1 2 : 4 2 " ( " c o m
0000140 p i l e d o n " { P H Y L
0000160 U M } < L I S P > L Y R I C > P
0000200 A T C H E S > S E T T I M E - P
0000220 A T C H . \ ; 1 ) \r " 2 7 - A
0000240 p r - 8 7 1 6 : 4 8 : 4 9 "
0000260 | t c o m p l ' d | | i n |
0000300 " X e r o x L i s p 2 4 - A
0000320 u g - 8 8 . . . " | d a t e
0000340 d | " 2 4 - A u g - 8 8 1 7
0000360 : 5 9 : 0 5 " ) \r ( F I L E C R
0000400 E A T E D " 1 3 - S e p - 8 8
0000420 1 3 : 1 2 : 1 3 " { P H Y L
0000440 U M } < L I S P > L Y R I C > P
0000460 A T C H E S > S E T T I M E - P
0000500 A T C H . \ ; 1 1 1 2 6 | c
0000520 h a n g e s | | t o : | ( \r
0000540 V A R S S E T T I M E - P A T
0000560 C H C O M S ) ( F N S E N S
0000600 U R E . T I M E . S E T ) ) \r E
0000620 N S U R E . T I M E . S E T :
0000640 D 4 \r ( I 0 E V E N T ) \0
0000660 & \0 \0 \0 001 @ o \0 \0 \0 \n \0 \0 264 016 `
0000700 \0 \0 \t \0 \0 \b \0 \0 361 241 h 020 o \0 \0 \0
0000720 o \0 \0 \0 \n \0 \0 277 260 347 \0 ( 3 3 E
0000740 R R O R 1 8 I D A T E 1 5
0000760 I D A T E 7 M E M B ) \r (
0001000 1 2 M A K E S Y S D A T E ) \r
0001020 ( 3 0 " ( S E T T I M E \
0001040 " d d - m m m - y y h h : m m
0001060 : s s \ " ) a n d t y p e
0001100 R E T U R N " 2 6 " T i m e
0001120 i s n o t s e t ! C a l
0001140 l " 4 ( A F T E R L O G O U
0001160 T A F T E R S Y S O U T A F
0001200 T E R M A K E S Y S A F T E R
0001220 S A V E V M ) ) \r ( P R E T T Y
0001240 C O M P R I N T S E T T I M E
0001260 - P A T C H C O M S ) \r ( R P A
0001300 Q Q S E T T I M E - P A T C H
0001320 C O M S ( ( F N S E N S U R
0001340 E . T I M E . S E T ) ( A D D
0001360 V A R S ( A R O U N D E X I T
0001400 F N S E N S U R E . T I M E .
0001420 S E T ) ) ) ) \r ( A D D T O V A
0001440 R A R O U N D E X I T F N S
0001460 E N S U R E . T I M E . S E T )
0001500 \r ( P U T P R O P S S E T T I
0001520 M E - P A T C H C O P Y R I G
0001540 H T ( " X e r o x C o r p o
0001560 r a t i o n " 1 9 8 8 ) ) \r N
0001600 I L \r
0001603