$ od -c -N 50000 [Indigo]<Casaba>7.0>RiscAssembler>RiscAssemblerParserImpl.Mesa!3 0000000 - - R i s c A s s e m b l e r 0000020 P a r s e r I m p l . m e s a \r 0000040 - - C o p y r i g h t 323 0000060 1 9 8 7 b y X e r o x C o 0000100 r p o r a t i o n . A l l 0000120 r i g h t s r e s e r v e d . 0000140 \r - - G e n e r a t e d b 0000160 y h e d e r m a n . p a a t 0000200 J u l y 1 5 , 1 9 8 7 4 0000220 : 5 3 : 1 2 p m P D T \r - 0000240 - u s i n g T h r e e C a 0000260 s a b a F o u r [ 1 . 2 ] o 0000300 f J u n e 1 , 1 9 8 7 6 0000320 : 0 0 : 0 0 p m P D T \r \r D 0000340 I R E C T O R Y \r \t I O , \r \t O 0000360 n e C a s a b a P a r s e r , \r 0000400 \t F S , \r \t T h r e e C 4 S u p 0000420 p o r t , \r \t R i s c A s s e m 0000440 b l e r P a r s e r D e f U S 0000460 I N G [ ] , \r \t R i s c A s s e 0000500 m b l e r C G D e f , \r \t R i s 0000520 c A s s e m b l e r T o k e n D 0000540 e f ; \r \r R i s c A s s e m b l 0000560 e r P a r s e r I m p l : C E 0000600 D A R P R O G R A M I M P O 0000620 R T S I O , O n e C a s a b 0000640 a P a r s e r , F S , T h r 0000660 e e C 4 S u p p o r t , R i s 0000700 c A s s e m b l e r C G D e f , 0000720 R i s c A s s e m b l e r T o 0000740 k e n D e f E X P O R T S R 0000760 i s c A s s e m b l e r P a r s 0001000 e r D e f = \r B E G I N \r O P 0001020 E N I O , O n e C a s a b a 0001040 P a r s e r , F S , T h r e 0001060 e C 4 S u p p o r t , R i s c 0001100 A s s e m b l e r C G D e f , 0001120 R i s c A s s e m b l e r T o k 0001140 e n D e f ; \r P a r s e T a b l 0001160 e : O n e C a s a b a P a r s 0001200 e r . P a r s e r T a b l e _ 0001220 N I L ; \r \r P a r s e O n e S 0001240 t r e a m : P U B L I C P R 0001260 O C [ f r o m : I O . S T R E 0001300 A M , d e b u g F l a g s : 0001320 C A R D I N A L , d e b u g g 0001340 i n g T e x t T o : I O . S T 0001360 R E A M ] R E T U R N S [ R E 0001400 F A N Y ] = \r B E G I N \r R 0001420 E T U R N [ T h r e e C 4 S u p 0001440 p o r t . P a r s e O n e S t r 0001460 e a m [ f r o m , P a r s e T 0001500 a b l e , S e t U p L i n k s 0001520 , 1 2 , d e b u g F l a g s 0001540 , d e b u g g i n g T e x t T 0001560 o ] ] \r E N D ; \r \r S e t U p L 0001600 i n k s : P R O C [ p r o d L 0001620 i n k A r r a y : S e e P r o 0001640 d L i n k A r r a y , t k n L 0001660 i n k A r r a y : T o k e n L 0001700 i n k A r r a y ] = \r B E G I 0001720 N \r R i s c A s s e m b l e r T 0001740 o k e n L i n k P r o c [ p r o 0001760 d L i n k A r r a y , t k n L 0002000 i n k A r r a y ] ; \r R i s c A 0002020 s s e m b l e r C G L i n k P r 0002040 o c [ p r o d L i n k A r r a y 0002060 , t k n L i n k A r r a y ] ; 0002100 \r E N D ; \r \r \r - - o b t a i 0002120 n p a r s e r t a b l e \r \r 0002140 \t B E G I N \r \t t a b l e S t r 0002160 e a m : I O . S T R E A M _ 0002200 F S . S t r e a m O p e n [ " 0002220 R i s c A s s e m b l e r P a r 0002240 s e r . k i p p e r e d P a r s 0002260 e T a b l e s " ] ; \r \t P a r s 0002300 e T a b l e _ O n e C a s a 0002320 b a P a r s e r . B u i l d P a 0002340 r s e r T a b l e F r o m K i p 0002360 p e r e d S t r e a m [ t a b l 0002400 e S t r e a m ] ; \r \t I O . C l 0002420 o s e [ t a b l e S t r e a m ] 0002440 ; \r \t E N D ; \r \r E N D . . \r 0002457