$ od -c -N 50000 [Indigo]<Casaba>7.0>Saffron3.0>Derived>SaffronGenericImpl.Mesa!35 0000000 - - S a f f r o n G e n e r i 0000020 c I m p l . m e s a \r - - C 0000040 o p y r i g h t 323 1 9 8 7 0000060 b y X e r o x C o r p o r a 0000100 t i o n . A l l r i g h t 0000120 s r e s e r v e d . \r - - 0000140 G e n e r a t e d b y R a u 0000160 e n . p a a t S e p t e m b 0000200 e r 1 , 1 9 8 8 6 : 2 2 : 0000220 5 8 p m P D T \r - - u 0000240 s i n g T h r e e C a s a b a 0000260 F o u r [ 1 . 2 ] o f J u 0000300 n e 1 , 1 9 8 7 6 : 0 0 : 0000320 0 0 p m P D T \r \r D I R E C 0000340 T O R Y \r \t R o p e , \r \t S a f 0000360 f r o n G e n e r i c D e f , \r 0000400 \t T h r e e C 4 S u p p o r t ; 0000420 \r \r S a f f r o n G e n e r i c 0000440 I m p l : C E D A R P R O G 0000460 R A M I M P O R T S R o p e 0000500 E X P O R T S S a f f r o n 0000520 G e n e r i c D e f = \r B E G 0000540 I N \r O P E N R o p e , S a 0000560 f f r o n G e n e r i c D e f , 0000600 T h r e e C 4 S u p p o r t ; 0000620 \r S a f f r o n G e n e r i c L 0000640 i n k P r o c : P U B L I C 0000660 P R O C [ p r o d L i n k A r r 0000700 a y : S e e P r o d L i n k A 0000720 r r a y , t k n L i n k A r r 0000740 a y : T o k e n L i n k A r r 0000760 a y ] = \r B E G I N \r t k n L 0001000 i n k A r r a y [ t o k e n D E 0001020 C I M A L ] _ B u i l d D e 0001040 c i m a l n u m N o d e ; \r t k 0001060 n L i n k A r r a y [ t o k e n 0001100 O C T A L ] _ B u i l d O c 0001120 t a l n u m N o d e ; \r t k n L 0001140 i n k A r r a y [ t o k e n H E 0001160 X ] _ B u i l d H e x n u m 0001200 N o d e ; \r t k n L i n k A r r 0001220 a y [ t o k e n I D ] _ B u 0001240 i l d I d N o d e ; \r t k n L i 0001260 n k A r r a y [ t o k e n R O P 0001300 E ] _ B u i l d S t r i n g 0001320 N o d e ; \r t k n L i n k A r r 0001340 a y [ t o k e n R E A L ] _ 0001360 B u i l d F l n u m N o d e ; \r 0001400 t k n L i n k A r r a y [ t o k 0001420 e n C H A R ] _ B u i l d C 0001440 h a r N o d e ; \r t k n L i n k 0001460 A r r a y [ t o k e n A T O M ] 0001500 _ B u i l d A t o m N o d e 0001520 ; \r E N D ; \r \r \r - - D e c i m 0001540 a l n u m \r \r B u i l d D e c i 0001560 m a l n u m N o d e : P U B L 0001600 I C P R O C [ t e x t : R o 0001620 p e . R O P E , f i r s t C h 0001640 a r P o s i t i o n : I N T ] 0001660 R E T U R N S [ D e c i m a l 0001700 n u m N o d e ] = \r \t { R E T 0001720 U R N [ N E W [ D e c i m a l n 0001740 u m N o d e B o d y _ [ t e x t 0001760 , f i r s t C h a r P o s i t 0002000 i o n , L e n g t h [ t e x t 0002020 ] ] ] ] } ; \r \r \r - - O c t a l 0002040 n u m \r \r B u i l d O c t a l n 0002060 u m N o d e : P U B L I C P 0002100 R O C [ t e x t : R o p e . R 0002120 O P E , f i r s t C h a r P o 0002140 s i t i o n : I N T ] R E T 0002160 U R N S [ O c t a l n u m N o d 0002200 e ] = \r \t { R E T U R N [ N E 0002220 W [ O c t a l n u m N o d e B o 0002240 d y _ [ t e x t , f i r s t C 0002260 h a r P o s i t i o n , L e n 0002300 g t h [ t e x t ] ] ] ] } ; \r \r 0002320 \r - - H e x n u m \r \r B u i l d 0002340 H e x n u m N o d e : P U B L 0002360 I C P R O C [ t e x t : R o 0002400 p e . R O P E , f i r s t C h 0002420 a r P o s i t i o n : I N T ] 0002440 R E T U R N S [ H e x n u m N 0002460 o d e ] = \r \t { R E T U R N [ 0002500 N E W [ H e x n u m N o d e B o 0002520 d y _ [ t e x t , f i r s t C 0002540 h a r P o s i t i o n , L e n 0002560 g t h [ t e x t ] ] ] ] } ; \r \r 0002600 \r - - I d \r \r B u i l d I d N o 0002620 d e : P U B L I C P R O C [ 0002640 t e x t : R o p e . R O P E , 0002660 f i r s t C h a r P o s i t i 0002700 o n : I N T ] R E T U R N S 0002720 [ I d N o d e ] = \r \t { R E T 0002740 U R N [ N E W [ I d N o d e B o 0002760 d y _ [ t e x t , f i r s t C 0003000 h a r P o s i t i o n , L e n 0003020 g t h [ t e x t ] ] ] ] } ; \r \r 0003040 \r - - S t r i n g \r \r B u i l d 0003060 S t r i n g N o d e : P U B L 0003100 I C P R O C [ t e x t : R o 0003120 p e . R O P E , f i r s t C h 0003140 a r P o s i t i o n : I N T ] 0003160 R E T U R N S [ S t r i n g N 0003200 o d e ] = \r \t { R E T U R N [ 0003220 N E W [ S t r i n g N o d e B o 0003240 d y _ [ t e x t , f i r s t C 0003260 h a r P o s i t i o n , L e n 0003300 g t h [ t e x t ] ] ] ] } ; \r \r 0003320 \r - - F l n u m \r \r B u i l d F 0003340 l n u m N o d e : P U B L I C 0003360 P R O C [ t e x t : R o p e 0003400 . R O P E , f i r s t C h a r 0003420 P o s i t i o n : I N T ] R 0003440 E T U R N S [ F l n u m N o d e 0003460 ] = \r \t { R E T U R N [ N E W 0003500 [ F l n u m N o d e B o d y _ [ 0003520 t e x t , f i r s t C h a r P 0003540 o s i t i o n , L e n g t h [ 0003560 t e x t ] ] ] ] } ; \r \r \r - - C 0003600 h a r \r \r B u i l d C h a r N o 0003620 d e : P U B L I C P R O C [ 0003640 t e x t : R o p e . R O P E , 0003660 f i r s t C h a r P o s i t i 0003700 o n : I N T ] R E T U R N S 0003720 [ C h a r N o d e ] = \r \t { R 0003740 E T U R N [ N E W [ C h a r N o 0003760 d e B o d y _ [ t e x t , f i 0004000 r s t C h a r P o s i t i o n , 0004020 L e n g t h [ t e x t ] ] ] ] 0004040 } ; \r \r \r - - A t o m \r \r B u i 0004060 l d A t o m N o d e : P U B L 0004100 I C P R O C [ t e x t : R o 0004120 p e . R O P E , f i r s t C h 0004140 a r P o s i t i o n : I N T ] 0004160 R E T U R N S [ A t o m N o d 0004200 e ] = \r \t { R E T U R N [ N E 0004220 W [ A t o m N o d e B o d y _ [ 0004240 t e x t , f i r s t C h a r P 0004260 o s i t i o n , L e n g t h [ 0004300 t e x t ] ] ] ] } ; \r \r E N D . 0004320 . \r 0004322