$ od -c -N 50000 [phylum]<LISP>KOTO>Lispusers>RPC-EXAMPLECLIENT.DCOM!1
0000000 ( F I L E C R E A T E D " 6
0000020 - D e c - 8 5 1 6 : 2 5 : 4 5
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P U S E
0000100 R S > K O T O > R P C - E X A M
0000120 P L E C L I E N T . ; 2 ) \r "
0000140 1 2 - N o v - 8 5 1 4 : 5 9 :
0000160 2 3 " r e c o m p i l e d A
0000200 L L i n " I N T E R L I S P
0000220 - D 2 2 - N o v - 8 5 . . .
0000240 " d a t e d " 2 2 - N o v -
0000260 8 5 1 1 : 3 2 : 5 8 " ) \r ( F
0000300 I L E C R E A T E D " 6 - D
0000320 e c - 8 5 1 6 : 2 5 : 0 8 "
0000340 { E R I S } < L I S P U S E R S
0000360 > K O T O > R P C - E X A M P L
0000400 E C L I E N T . ; 2 1 6 3 2 2
0000420 c h a n g e s t o : ( F N
0000440 S \r I m p o r t R P C - E x a
0000460 m p l e M o v d s F o r R P C
0000500 - E X A M P L E I m p o r t R
0000520 P C - E X A M P L E U n i m p
0000540 o r t R P C - E X A M P L E D
0000560 i s p a t c h R P C - E X A M P
0000600 L E S i g n a l s \r R P C C l
0000620 i e n t S t u b . S i m p l e
0000640 R P C C l i e n t S t u b . C o
0000660 m p l e x R P C C l i e n t S
0000700 t u b . A r g T e s t A R P C
0000720 C l i e n t S t u b . A r g T e
0000740 s t B \r M a r s h a l R P C -
0000760 E X A M P L E R e c 5 # 0 # 9 6
0001000 M a r s h a l R P C - E X A M
0001020 P L E R e c 6 # 0 # 4 8 M a r
0001040 s h a l R P C - E X A M P L E R
0001060 e c 2 # 0 # 1 2 8 \r M a r s h
0001100 a l R P C - E X A M P L E R e c
0001120 1 # 0 # 8 0 M a r s h a l R P
0001140 C - E X A M P L E R e c 4 # 0 #
0001160 4 8 M a r s h a l R P C - E X
0001200 A M P L E R e c 3 # 1 # 1 5 \r
0001220 M a r s h a l R P C - E X A M P
0001240 L E R e c 3 # 0 # 1 6 M o v d
0001260 s F o r R P C - E x a m p l e
0001300 U n i m p o r t R P C - E x a m
0001320 p l e D i s p a t c h R P C -
0001340 E x a m p l e S i g n a l s \r
0001360 M a r s h a l R P C - E x a m p
0001400 l e R e c 5 # 0 # 9 6 M a r s
0001420 h a l R P C - E x a m p l e R e
0001440 c 6 # 0 # 4 8 M a r s h a l R
0001460 P C - E x a m p l e R e c 2 # 0
0001500 # 1 2 8 \r M a r s h a l R P C
0001520 - E x a m p l e R e c 1 # 0 # 8
0001540 0 M a r s h a l R P C - E x a
0001560 m p l e R e c 4 # 0 # 4 8 M a
0001600 r s h a l R P C - E x a m p l e
0001620 R e c 3 # 1 # 1 5 \r M a r s h
0001640 a l R P C - E x a m p l e R e c
0001660 3 # 0 # 1 6 ) p r e v i o u s
0001700 d a t e : " 6 - D e c - 8
0001720 5 1 6 : 1 6 : 0 2 " \r { E R
0001740 I S } < L I S P U S E R S > K O
0001760 T O > R P C - E X A M P L E C L
0002000 I E N T . ; 1 ) \r M o v d s F o
0002020 r R P C - E x a m p l e D 1 \r
0002040 ( P 0 p ) \0 035 001 \0 \0 \0 o \0
0002060 \0 \0 260 023 d 001 021 001 \0 H 002 H 001 \t \0 \0
0002100 \n \0 \0 023 002 003 265 356 h 020 \0 ( 2 4 Q
0002120 P U T D 2 1 Q G E T D ) \r N
0002140 I L \r ( 3 ( ( R P C C l i e
0002160 n t S t u b . A r g T e s t B
0002200 . A r g T e s t B ) ( R P C
0002220 C l i e n t S t u b . A r g T e
0002240 s t A . A r g T e s t A )
0002260 ( R P C C l i e n t S t u b . C
0002300 o m p l e x . C o m p l e x
0002320 ) ( R P C C l i e n t S t u b
0002340 . S i m p l e . S i m p l e
0002360 ) ) ) \r I m p o r t R P C - E x
0002400 a m p l e D 1 \r ( I 2 v e
0002420 r s i o n I 1 i n s t a n
0002440 c e I 0 t y p e ) \0 026 \0
0002460 \0 \0 003 @ 265 006 o \0 \0 \0 A B \v \0 \0 `
0002500 \0 \0 032 027 \0 \0 001 020 \0 ( 1 3 Q I m
0002520 p o r t I n t e r f a c e ) \r (
0002540 2 2 Q R P C - E x a m p l e C
0002560 l i e n t I n t e r f a c e 1
0002600 6 Q R P C - E x a m p l e C l
0002620 i e n t I n t e r f a c e ) \r (
0002640 6 " R P C - E x a m p l e
0002660 6 - D e c - 8 5 1 6 : 2 4 : 2
0002700 7 1 5 4 0 " ) \r U n i m p o r t
0002720 R P C - E x a m p l e D 1 \r (
0002740 I 0 l . . i n t e r f a c e
0002760 ) \0 5 \0 \0 \0 001 @ 265 \a ` \0 \0 260 &
0003000 ` \0 \0 034 236 @ \t \0 \0 @ ` \0 \0 \n \0 \0
0003020 027 \0 \0 020 o \0 \0 \0 @ \n \0 \0 020 d 001 \t
0003040 \0 \0 277 002 003 265 370 h 027 \0 \0 020 \0 ( 5 1
0003060 Q U n i m p o r t I n t e r f
0003100 a c e 4 3 Q E R R O R 2 7
0003120 Q D R E M O V E 2 0 Q U n
0003140 i m p o r t I n t e r f a c e )
0003160 \r ( 6 2 Q R P C - E x a m p l
0003200 e C l i e n t I n t e r f a c e
0003220 3 2 Q R P C - E x a m p l e
0003240 C l i e n t I n t e r f a c e
0003260 2 4 Q R P C - E x a m p l e C
0003300 l i e n t I n t e r f a c e 1
0003320 2 Q R P C - E x a m p l e C l
0003340 i e n t I n t e r f a c e 5
0003360 R P C - E x a m p l e C l i e n
0003400 t I n t e r f a c e ) \r ( 3 7
0003420 Q " n o t i m p o r t e d "
0003440 ) \r D i s p a t c h R P C - E x
0003460 a m p l e S i g n a l s D 1 \r
0003500 ( P 2 l . . d a t u m P
0003520 0 l . . r e s u l t I 1
0003540 l . . c o n v I 0 l . . c
0003560 P u p ) \0 236 003 \0 \0 002 @ A \n \0 \0
0003600 d l 004 360 262 035 277 021 020 \0 g \0 \0 @ o \0
0003620 \0 \0 A \v \0 \0 \n \0 \0 270 @ \t \0 \0 023 260
0003640 w d l 005 360 262 * 277 021 001 g \0 \0 @ A
0003660 \n \0 \0 271 @ A \n \0 \0 I h 032 032 \n \0 \0
0003700 270 @ \t \0 \0 277 @ H A \v \0 \0 023 260 I l
0003720 006 360 262 A 021 020 \0 g \0 \0 \t \0 \0 270 @ \t
0003740 \0 \0 277 @ H 001 A \v \0 \0 277 @ H 002 001 A
0003760 \v \0 \0 277 H 002 001 021 001 002 @ J 002 002 002 001
0004000 A \v \0 \0 277 @ J 002 002 002 002 001 A \v \0 \0
0004020 023 023 202 \b \0 \0 @ 020 \0 ( 2 3 2 Q S
0004040 H O U L D N T 2 2 4 Q \ M a
0004060 r s h a l A t o m 2 1 0 Q \
0004100 M a r s h a l S t r i n g 1 6
0004120 7 Q M a r s h a l R P C - E x
0004140 a m p l e R e c 1 # 0 # 8 0 1
0004160 5 6 Q \ M a r s h a l A t o m
0004200 1 4 6 Q \ S t a r t R e t u
0004220 r n 1 4 1 Q S i g n a l 1
0004240 2 0 Q \ A d d P u p B o o l e
0004260 a n 1 1 1 Q \ S t a r t R e
0004300 t u r n 1 0 4 Q S i g n a l
0004320 7 5 Q \ U n m a r s h a l S
0004340 t r i n g 6 7 Q \ G e t A r
0004360 g S m a l l p 4 2 Q \ S t a
0004400 r t R e t u r n 3 5 Q S i g
0004420 n a l 3 2 Q \ G e t A r g E
0004440 n u m 4 \ G e t A r g W o r
0004460 d ) \r ( 1 3 6 Q F a k e 6 2
0004500 Q N o o n e F a i l e d 2 1
0004520 Q S i m p l e F a i l e d ) \r
0004540 ( 2 6 Q ( b a d N u m b a
0004560 d S t r i n g ) ) \r R P C C l i
0004600 e n t S t u b . S i m p l e D
0004620 1 \r ( P 1 l . . c P u p P
0004640 0 l . . i n t e r f a c e
0004660 I 3 l . . c o n v I 2
0004700 l . . i n t e r f a c e A r g
0004720 I 1 s e c o n d I 0 f
0004740 i r s t ) \0 ; 002 \0 \0 004 B 265 006 `
0004760 \0 \0 001 021 021 001 H 001 H 002 C \v \0 \0 Y d
0005000 l 004 C \v \0 \0 I @ C \v \0 \0 I A C \v
0005020 \0 \0 I g \0 \0 C \v \0 \0 Y d C \n \0 \0
0005040 I \t \0 \0 277 020 \0 ( 6 7 Q \ R E L
0005060 E A S E . P U P 6 3 Q \ G e
0005100 t A r g B o o l 5 5 Q \ C a
0005120 l l 4 5 Q \ M a r s h a l S
0005140 t r i n g 3 7 Q \ A d d P u
0005160 p D b l W o r d 3 1 Q \ A d
0005200 d P u p W o r d 2 1 Q \ S t
0005220 a r t C a l l ) \r ( 5 1 Q D i
0005240 s p a t c h R P C - E x a m p l
0005260 e S i g n a l s 5 R P C - E
0005300 x a m p l e C l i e n t I n t e
0005320 r f a c e ) \r ( ) \r R P C C l i
0005340 e n t S t u b . C o m p l e x
0005360 D 1 \r ( P 6 l . . v P 5
0005400 l . . v P 4 l . . d a t
0005420 u m P 3 l . . d a t u m
0005440 P 1 l . . c P u p P 0
0005460 l . . i n t e r f a c e I 1
0005500 7 Q l . . c o n v I 1 6 Q
0005520 l . . i n t e r f a c e A r g
0005540 I 1 5 Q l 2 I 1 4 Q
0005560 l 1 I 1 3 Q r 1 0 I 1
0005600 2 Q r 9 I 1 1 Q r 8 I
0005620 1 0 Q r 7 I 7 r 6 I
0005640 6 r 5 b I 5 r 5 a I
0005660 4 r 5 I 3 r 4 I 2
0005700 r 3 I 1 r 2 I 0 r
0005720 1 ) 001 330 \a \0 \0 020 G 034 265 006 ` \0 \0
0005740 001 021 ! 002 H 001 H 002 G 036 \v \0 \0 Y d l
0005760 005 G 036 \v \0 \0 I @ G 036 \v \0 \0 I A G
0006000 036 \v \0 \0 I B G 036 \v \0 \0 I C G 036 \v
0006020 \0 \0 I G 016 G 036 \v \0 \0 I o \0 \0 \0 D
0006040 G 036 \f \0 \0 E 237 I h G 036 \v \0 \0 277 I
0006060 E G 036 \v \0 \0 206 I i G 036 \v \0 \0 277 F
0006100 237 I h G 036 \v \0 \0 277 I F G 036 \v \0 \0
0006120 206 I i G 036 \v \0 \0 277 I G 020 G 036 \v \0
0006140 \0 I G 022 G 036 \v \0 \0 G 022 021 001 003 I K
0006160 002 002 002 001 G 036 \v \0 \0 277 I K 002 002 002 002
0006200 001 G 036 \v \0 \0 023 I G 024 G 036 \v \0 \0 G
0006220 024 021 001 003 K 002 002 001 021 001 004 I L 002 002 002
0006240 001 G 036 \v \0 \0 277 I L 002 002 002 002 001 G 036
0006260 \v \0 \0 023 I K 002 002 002 001 G 036 \v \0 \0 023
0006300 I G 026 G 036 \v \0 \0 G 026 021 001 003 K 262 ,
0006320 I K 002 001 G 036 \v \0 \0 277 K 002 002 260 031 d
0006340 001 021 001 004 I L G 036 \v \0 \0 277 I L 002 001
0006360 G 036 \v \0 \0 023 002 003 265 347 023 I l 004 \n \0
0006400 \0 277 I G 030 \t \0 \0 G 036 \v \0 \0 277 G 030
0006420 215 d 001 021 001 005 I M G 036 \v \0 \0 023 002 003
0006440 265 361 I l 004 \n \0 \0 277 I G 032 \t \0 \0 G
0006460 036 \v \0 \0 277 G 032 260 N d 001 021 001 005 I l
0006500 004 \n \0 \0 277 I M \t \0 \0 G 036 \v \0 \0 277
0006520 M 260 . d 001 021 001 006 I N G 036 \v \0 \0 277
0006540 N 021 001 003 I K 002 002 002 001 G 036 \v \0 \0 277
0006560 I K 002 002 002 002 001 G 036 \v \0 \0 023 023 002 003
0006600 265 323 h 023 002 003 265 263 I g \0 \0 G 036 \v \0
0006620 \0 Y d G 036 \n \0 \0 I G 036 \n \0 \0 272 I
0006640 G 036 \n \0 \0 J h 032 032 032 I \t \0 \0 277 020
0006660 \0 ( 7 2 4 Q \ R E L E A S E .
0006700 P U P 7 1 3 Q \ U n m a r s
0006720 h a l S t r i n g 7 0 4 Q \
0006740 G e t A r g B o o l 6 7 6 Q
0006760 \ G e t A r g B o o l 6 6 7 Q
0007000 \ C a l l 6 4 2 Q \ M a r
0007020 s h a l A t o m 6 2 5 Q \ M
0007040 a r s h a l S t r i n g 6 0 5
0007060 Q M a r s h a l R P C - E x a
0007100 m p l e R e c 1 # 0 # 8 0 5 6
0007120 5 Q \ A d d P u p D b l W o r
0007140 d 5 6 0 Q L E N G T H 5 5
0007160 2 Q \ C h e c k P u p O v e r
0007200 f l o w 5 3 2 Q \ A d d P u
0007220 p D b l W o r d 5 2 5 Q L E
0007240 N G T H 5 1 6 Q \ C h e c k
0007260 P u p O v e r f l o w 5 0 3 Q
0007300 \ A d d P u p S m a l l p 4
0007320 6 3 Q \ A d d P u p D b l W o
0007340 r d 4 5 6 Q L E N G T H 4
0007360 4 7 Q \ C h e c k P u p O v e
0007400 r f l o w 4 3 3 Q \ M a r s
0007420 h a l S t r i n g 4 2 1 Q M
0007440 a r s h a l R P C - E x a m p l
0007460 e R e c 6 # 0 # 4 8 3 7 7 Q
0007500 \ M a r s h a l S t r i n g 3
0007520 5 6 Q M a r s h a l R P C - E
0007540 x a m p l e R e c 5 # 0 # 9 6
0007560 3 4 5 Q \ M a r s h a l A t o
0007600 m 3 3 1 Q \ M a r s h a l A
0007620 t o m 3 1 4 Q \ M a r s h a
0007640 l S t r i n g 2 6 5 Q M a r
0007660 s h a l R P C - E x a m p l e R
0007700 e c 2 # 0 # 1 2 8 2 5 4 Q \
0007720 M a r s h a l A t o m 2 3 7 Q
0007740 \ M a r s h a l S t r i n g
0007760 2 1 7 Q M a r s h a l R P C -
0010000 E x a m p l e R e c 1 # 0 # 8 0
0010020 2 0 7 Q \ M a r s h a l S t
0010040 r i n g 1 7 6 Q \ A d d P u
0010060 p B o o l e a n 1 6 6 Q M a
0010100 r s h a l R P C - E x a m p l e
0010120 R e c 3 # 0 # 1 6 1 5 6 Q \
0010140 A d d P u p B o o l e a n 1 4
0010160 4 Q \ A d d P u p B o o l e a
0010200 n 1 3 4 Q M a r s h a l R P
0010220 C - E x a m p l e R e c 3 # 0 #
0010240 1 6 1 2 4 Q \ A d d P u p B
0010260 o o l e a n 1 1 3 Q \ M a r
0010300 s h a l S t r e a m 1 0 0 Q
0010320 M a r s h a l R P C - E x a m p
0010340 l e R e c 3 # 0 # 1 6 7 0 Q
0010360 M a r s h a l R P C - E x a m p
0010400 l e R e c 4 # 0 # 4 8 6 1 Q
0010420 M a r s h a l R P C - E x a m p
0010440 l e R e c 3 # 0 # 1 6 5 2 Q
0010460 \ A d d P u p B o o l e a n 4
0010500 3 Q \ A d d P u p B o o l e a
0010520 n 3 4 Q \ A d d P u p W o r
0010540 d 2 3 Q \ S t a r t C a l l
0010560 ) \r ( 6 6 2 Q D i s p a t c h
0010600 R P C - E x a m p l e S i g n a
0010620 l s 6 R P C - E x a m p l e
0010640 C l i e n t I n t e r f a c e )
0010660 \r ( 1 0 5 Q ( { N O D I R C
0010700 O R E } ) ) \r R P C C l i e n t
0010720 S t u b . A r g T e s t A D 1
0010740 \r ( P 1 l . . c P u p P
0010760 0 l . . i n t e r f a c e I
0011000 7 l . . c o n v I 6 l
0011020 . . i n t e r f a c e A r g I
0011040 5 f I 4 e I 3 d
0011060 I 2 c I 1 b I 0
0011100 a ) \0 177 002 \0 \0 \b F 265 006 ` \0 \0
0011120 001 021 021 001 H 001 H 002 G 016 \v \0 \0 Y d l
0011140 006 G 016 \v \0 \0 I @ G 016 \v \0 \0 I A G
0011160 016 \v \0 \0 I B G 016 \v \0 \0 I C G 016 \v
0011200 \0 \0 I D G 016 \v \0 \0 I o \0 \0 \0 E G
0011220 016 \f \0 \0 I g \0 \0 G 016 \v \0 \0 Y d G
0011240 016 \n \0 \0 I G 016 \n \0 \0 I G 016 \n \0 \0
0011260 I G 016 \n \0 \0 I G 016 \n \0 \0 h 032 032 032
0011300 032 032 I \t \0 \0 277 020 \0 ( 1 7 3 Q \
0011320 R E L E A S E . P U P 1 6 1 Q
0011340 \ U n m a r s h a l A t o m
0011360 1 5 3 Q \ U n m a r s h a l S
0011400 t r i n g 1 4 5 Q \ G e t A
0011420 r g B o o l 1 3 7 Q \ G e t
0011440 A r g D b l W o r d 1 3 1 Q
0011460 \ G e t A r g S m a l l p 1 2
0011500 2 Q \ C a l l 1 1 1 Q \ M
0011520 a r s h a l S t r e a m 7 6 Q
0011540 \ M a r s h a l A t o m 6 7
0011560 Q \ M a r s h a l S t r i n g
0011600 6 0 Q \ A d d P u p B o o l
0011620 e a n 5 1 Q \ A d d P u p D
0011640 b l W o r d 4 2 Q \ A d d P
0011660 u p S m a l l p 3 3 Q \ A d
0011700 d P u p W o r d 2 2 Q \ S t
0011720 a r t C a l l ) \r ( 1 1 5 Q D
0011740 i s p a t c h R P C - E x a m p
0011760 l e S i g n a l s 5 R P C -
0012000 E x a m p l e C l i e n t I n t
0012020 e r f a c e ) \r ( 1 0 3 Q (
0012040 { D S K } A R G F I L E ) ) \r R
0012060 P C C l i e n t S t u b . A r g
0012100 T e s t B D 1 \r ( P 1 l .
0012120 . c P u p P 0 l . . i n t
0012140 e r f a c e I 7 l . . c o
0012160 n v I 6 l . . i n t e r f
0012200 a c e A r g I 5 f I 4
0012220 e I 3 d I 2 c I
0012240 1 b I 0 a ) \0 211 005 \0
0012260 \0 \b F 265 006 ` \0 \0 001 021 021 001 H 001 H 002
0012300 G 016 \v \0 \0 Y d l \a G 016 \v \0 \0 I A
0012320 G 016 \v \0 \0 I D G 016 \v \0 \0 I E G 016
0012340 \v \0 \0 I @ G 016 \v \0 \0 I B G 016 \v \0
0012360 \0 I o \0 \0 \0 C G 016 \f \0 \0 I g \0 \0
0012400 G 016 \v \0 \0 Y 021 0 004 I G 016 \n \0 \0 274
0012420 I G 016 \n \0 \0 273 I G 016 \n \0 \0 272 I G
0012440 016 \n \0 \0 L I G 016 \n \0 \0 K J h 032 032
0012460 032 032 032 022 I \t \0 \0 277 020 \0 ( 2 0 5 Q
0012500 \ R E L E A S E . P U P 1 7
0012520 0 Q \ U n m a r s h a l A t o
0012540 m 1 6 1 Q \ U n m a r s h a
0012560 l S t r i n g 1 5 2 Q \ G e
0012600 t A r g B o o l 1 4 3 Q \ G
0012620 e t A r g D b l W o r d 1 3 4
0012640 Q \ G e t A r g S m a l l p
0012660 1 2 2 Q \ C a l l 1 1 1 Q
0012700 \ M a r s h a l S t r e a m 7
0012720 6 Q \ M a r s h a l A t o m
0012740 6 7 Q \ M a r s h a l S t r i
0012760 n g 6 0 Q \ A d d P u p B o
0013000 o l e a n 5 1 Q \ A d d P u
0013020 p D b l W o r d 4 2 Q \ A d
0013040 d P u p S m a l l p 3 3 Q \
0013060 A d d P u p W o r d 2 2 Q \
0013100 S t a r t C a l l ) \r ( 1 1 5 Q
0013120 D i s p a t c h R P C - E x a
0013140 m p l e S i g n a l s 5 R P
0013160 C - E x a m p l e C l i e n t I
0013200 n t e r f a c e ) \r ( 1 0 3 Q
0013220 ( { N O D I R C O R E } ) ) \r
0013240 M a r s h a l R P C - E x a m p
0013260 l e R e c 5 # 0 # 9 6 D 1 \r (
0013300 P 0 l . . s e q u e n c e
0013320 I 2 l . . c o n v I 1
0013340 l . . d a t u m I 0 l . .
0013360 p u p ) \0 H 001 \0 \0 003 @ l 006 \n \0
0013400 \0 A 265 \t @ i B \v \0 \0 020 002 002 002 021 001
0013420 \0 @ h B \v \0 \0 @ H \t \0 \0 B \v \0 \0
0013440 @ A 001 B \v \0 \0 @ l 004 \n \0 \0 @ A 002
0013460 002 001 B \v \0 \0 @ H \t \0 \0 l 006 332 \n \0
0013500 \0 020 \0 ( 1 0 5 Q \ S k i p B y
0013520 t e s O u t 7 7 Q L E N G T
0013540 H 7 2 Q \ A d d P u p S m a
0013560 l l p 6 1 Q \ S k i p B y t
0013600 e s O u t 5 3 Q \ A d d P u
0013620 p B o o l e a n 4 4 Q \ A d
0013640 d P u p D b l W o r d 4 0 Q
0013660 L E N G T H 3 3 Q \ A d d P
0013700 u p B o o l e a n 1 6 Q \ A
0013720 d d P u p B o o l e a n 5 \
0013740 C h e c k P u p O v e r f l o w
0013760 ) \r N I L \r ( ) \r M a r s h a l
0014000 R P C - E x a m p l e R e c 6 #
0014020 0 # 4 8 D 1 \r ( I 2 l . .
0014040 c o n v I 1 l . . d a t u
0014060 m I 0 l . . p u p ) \0 017
0014100 \0 \0 \0 003 @ A 001 B \v \0 \0 @ l 004 \n \0
0014120 \0 020 \0 ( 1 4 Q \ S k i p B y t
0014140 e s O u t 6 \ A d d P u p B
0014160 o o l e a n ) \r N I L \r ( ) \r M
0014200 a r s h a l R P C - E x a m p l
0014220 e R e c 2 # 0 # 1 2 8 D 1 \r (
0014240 I 2 l . . c o n v I 1
0014260 l . . d a t u m I 0 l . .
0014300 p u p ) \0 8 \0 \0 \0 003 @ l 002 \n \0
0014320 \0 @ \t \0 \0 A 001 221 k 200 j 317 \0 \0 @ \t
0014340 \0 \0 A 002 001 221 k 200 j 317 \0 036 @ l 002 \n
0014360 \0 \0 @ A 002 002 001 B \v \0 \0 @ l 004 \n \0
0014400 \0 020 \0 ( 6 5 Q \ S k i p B y t
0014420 e s O u t 5 7 Q M a r s h a
0014440 l R P C - E x a m p l e R e c 1
0014460 # 0 # 8 0 4 6 Q \ I n c r P
0014500 u p L e n g t h 2 6 Q \ C u
0014520 r r e n t P u p P o s i t i o n
0014540 1 1 Q \ C u r r e n t P u p
0014560 P o s i t i o n 5 \ C h e c
0014600 k P u p O v e r f l o w ) \r N I
0014620 L \r ( ) \r M a r s h a l R P C -
0014640 E x a m p l e R e c 1 # 0 # 8 0
0014660 D 1 \r ( P 2 l . . t P
0014700 1 l . . i I 2 l . . c o
0014720 n v I 1 l . . d a t u m
0014740 I 0 l . . p u p ) \0 h 003 \0
0014760 \0 003 @ l 002 \n \0 \0 @ \t \0 \0 A 001 221 k
0015000 200 j 317 \0 \0 @ \t \0 \0 A 002 001 221 k 200 j
0015020 317 \0 020 @ \t \0 \0 o \0 \0 \0 j 021 022 002 H
0015040 003 265 $ g \0 \0 A 002 002 001 o \0 \0 \0 032 \n
0015060 \0 \0 277 h 022 317 \0 - @ l 002 \n \0 \0 @ l
0015100 \b \n \0 \0 020 001 Z A 002 002 001 360 222 I 260 346
0015120 I k 324 271 H 002 X 260 311 \0 ( 1 2 1 Q
0015140 \ S k i p B y t e s O u t 1 1
0015160 3 Q \ I n c r P u p L e n g t
0015200 h 7 7 Q S i g n a l 4 4 Q
0015220 \ C u r r e n t P u p P o s i
0015240 t i o n 2 6 Q \ C u r r e n
0015260 t P u p P o s i t i o n 1 1 Q
0015300 \ C u r r e n t P u p P o s i
0015320 t i o n 5 \ C h e c k P u p
0015340 O v e r f l o w ) \r ( 6 3 Q B
0015360 o u n d s C h e c k ) \r ( 7 3
0015400 Q ( y e n t w a h e n e r
0015420 y p e n e r y f l a t ) 5
0015440 0 Q ( y e n t w a h e n e
0015460 r y p e n e r y f l a t ) )
0015500 \r M a r s h a l R P C - E x a m
0015520 p l e R e c 4 # 0 # 4 8 D 1 \r
0015540 ( I 2 l . . c o n v I 1
0015560 l . . d a t u m I 0 l .
0015600 . p u p ) \0 & \0 \0 \0 003 @ l 002 \n
0015620 \0 \0 @ \t \0 \0 A 001 221 k 200 j 317 \0 \0 @
0015640 A 002 001 B \v \0 \0 @ A 002 002 001 B \v \0 \0
0015660 020 \0 ( 4 3 Q \ A d d P u p D b
0015700 l W o r d 3 2 Q M a r s h a
0015720 l R P C - E x a m p l e R e c 3
0015740 # 1 # 1 5 1 1 Q \ C u r r e
0015760 n t P u p P o s i t i o n 5
0016000 \ C h e c k P u p O v e r f l o
0016020 w ) \r N I L \r ( ) \r M a r s h a
0016040 l R P C - E x a m p l e R e c 3
0016060 # 1 # 1 5 D 1 \r ( P 2 l .
0016100 . t P 1 l . . i I 2
0016120 l . . c o n v I 1 l . . d
0016140 a t u m I 0 l . . p u p )
0016160 \0 L 003 \0 \0 003 @ \t \0 \0 A 001 221 k 200
0016200 j 317 \0 033 @ \t \0 \0 o \0 \0 \0 j 021 022 002
0016220 H 003 265 035 g \0 \0 A 002 001 o \0 \0 \0 032 \n
0016240 \0 \0 277 h 022 317 \0 322 @ l 002 \n \0 \0 020 001
0016260 Z A 002 001 360 222 I 260 355 I k 324 271 H 002 X
0016300 260 321 \0 ( 6 6 Q \ I n c r P u p
0016320 L e n g t h 5 2 Q S i g n a
0016340 l 2 0 Q \ C u r r e n t P u
0016360 p P o s i t i o n 3 \ C u r
0016400 r e n t P u p P o s i t i o n )
0016420 \r ( 3 7 Q B o u n d s C h e c
0016440 k ) \r ( 4 6 Q ( y e n t w
0016460 a h e n e r y p e n e r y
0016500 f l a t ) 2 4 Q ( y e n t
0016520 w a h e n e r y p e n e r y
0016540 f l a t ) ) \r M a r s h a l R
0016560 P C - E x a m p l e R e c 3 # 0
0016600 # 1 6 D 1 \r ( P 2 l . . t
0016620 P 1 l . . i I 2 l .
0016640 . c o n v I 1 l . . d a t
0016660 u m I 0 l . . p u p ) \0
0016700 R 003 \0 \0 003 @ l 002 \n \0 \0 @ \t \0 \0 A
0016720 001 221 k 200 j 317 \0 \f @ \t \0 \0 o \0 \0 \0
0016740 j 021 022 002 H 003 265 035 g \0 \0 A 002 001 o \0
0016760 \0 \0 032 \n \0 \0 277 h 022 317 \0 322 @ l 002 \n
0017000 \0 \0 020 001 Z A 002 001 360 222 I 260 355 I k 324
0017020 271 H 002 X 260 321 \0 ( 7 4 Q \ I n c
0017040 r P u p L e n g t h 6 0 Q S
0017060 i g n a l 2 6 Q \ C u r r e
0017100 n t P u p P o s i t i o n 1 1
0017120 Q \ C u r r e n t P u p P o s
0017140 i t i o n 5 \ C h e c k P u
0017160 p O v e r f l o w ) \r ( 4 5 Q
0017200 B o u n d s C h e c k ) \r ( 5
0017220 4 Q ( y e n t w a h e n e
0017240 r y p e n e r y f l a t )
0017260 3 2 Q ( y e n t w a h e n
0017300 e r y p e n e r y f l a t )
0017320 ) \r ( P R E T T Y C O M P R I N
0017340 T R P C - E X A M P L E C L I
0017360 E N T C O M S ) \r ( R P A Q Q
0017400 R P C - E X A M P L E C L I E N
0017420 T C O M S ( ( * C r e a t e
0017440 d b y L u p i n e " 6 -
0017460 D e c - 8 5 1 6 : 2 4 : 3 8 "
0017500 ) ( F N S M o v d s F o r R
0017520 P C - E x a m p l e \r I m p o
0017540 r t R P C - E x a m p l e U n
0017560 i m p o r t R P C - E x a m p l
0017600 e D i s p a t c h R P C - E x
0017620 a m p l e S i g n a l s R P C
0017640 C l i e n t S t u b . S i m p l
0017660 e \r R P C C l i e n t S t u b
0017700 . C o m p l e x R P C C l i e
0017720 n t S t u b . A r g T e s t A
0017740 R P C C l i e n t S t u b . A r
0017760 g T e s t B M a r s h a l R P
0020000 C - E x a m p l e R e c 5 # 0 #
0020020 9 6 \r M a r s h a l R P C - E
0020040 x a m p l e R e c 6 # 0 # 4 8
0020060 M a r s h a l R P C - E x a m p
0020100 l e R e c 2 # 0 # 1 2 8 M a r
0020120 s h a l R P C - E x a m p l e R
0020140 e c 1 # 0 # 8 0 \r M a r s h a
0020160 l R P C - E x a m p l e R e c 4
0020200 # 0 # 4 8 M a r s h a l R P C
0020220 - E x a m p l e R e c 3 # 1 # 1
0020240 5 M a r s h a l R P C - E x a
0020260 m p l e R e c 3 # 0 # 1 6 ) (
0020300 V A R S ( \r R P C - E x a m p
0020320 l e C l i e n t I n t e r f a c
0020340 e ) ) ( G L O B A L V A R S
0020360 R P C - E x a m p l e C l i e n
0020400 t I n t e r f a c e ) ( P (
0020420 M o v d s F o r R P C - E x a m
0020440 p l e ) ) ( \r D E C L A R E :
0020460 D O N T C O P Y E V A L @ C
0020500 O M P I L E E V A L @ L O A D
0020520 ( F I L E S ( L O A D C O M
0020540 P ) R P C - E X A M P L E ) )
0020560 ( D E C L A R E : E V A L @
0020600 L O A D \r D O N T E V A L @ C
0020620 O M P I L E D O C O P Y ( F
0020640 I L E S ( S Y S L O A D ) R
0020660 P C ) ) ) ) \r ( R P A Q Q R P
0020700 C - E x a m p l e C l i e n t I
0020720 n t e r f a c e N I L ) \r ( M
0020740 o v d s F o r R P C - E x a m p
0020760 l e ) \r ( F I L E S L O A D (
0021000 S Y S L O A D ) R P C ) \r ( P
0021020 U T P R O P S R P C - E X A M
0021040 P L E C L I E N T C O P Y R I
0021060 G H T ( " X e r o x C o r p
0021100 o r a t i o n " 1 9 8 5 ) ) \r
0021120 N I L \r
0021124