From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,XPRIO autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,2a38200d63b04527,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-07-20 04:07:24 PST
From: "Rune" <rune@dont.com>
Newsgroups: comp.lang.ada
Subject: A small problem 
Date: Fri, 20 Jul 2001 11:56:57 +0200
Organization: Kongsberg Group ASA , Norway
Message-ID: <9j8vch$que$1@kongsberg.fof.kog.no>
NNTP-Posting-Host: 2.29.100.25
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4522.1200
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200
Path: 
 archiver1.google.com!newsfeed.google.com!newsfeed.stanford.edu!news.tele.dk!129.240.148.23!uio.no!Norway.EU.net!193.71.169.73!spiten.kongsberg.com!kongsberg!not-for-mail
Xref: archiver1.google.com comp.lang.ada:10315
Date: 2001-07-20T11:56:57+02:00
List-Id: <comp.lang.ada>

Hello
I'm trying to make a program the should work like this:
main creates serverA then serverA creates serverB and gives serverB it's
reference.
Then serverA gets the text string from serverB and, serverB gets the text
string from serverA.

But i can't make it work.
Can someone please help me.

Thanks
Rune






begin 666 serverb_b.a
M"G!A8VMA9V4@8F]D>2!S97)V97)"(&ES"@H@("!F=6YC=&EO;B!#<F5A=&4H
M(%!T<D$@.B!S97)V97)A+D]B:F5C=$%?<'1R("D@<F5T=7)N($]B:F5C=$)?
M<'1R(&ES"B @(" @(%!T<B Z($]B:F5C=$)?<'1R(#H](&YE=R!/8FIE8W1"
M.PH@("!B96=I;@H@(" @("!0='(N07)E9B Z/2!0=')!.PH@(" @("!R971U
E<FX@4'1R.PH@("!E;F0@0W)E871E.PH*96YD('-E<G9E<D(["@``
`
end

begin 666 servera.a
M=VET:"!S97)V97)B.PH*<&%C:V%G92!S97)V97)!(&ES"@H@("!T>7!E($]B
M:F5C=$$@:7,@=&%G9V5D"B @(" @(')E8V]R9 H@(" @(" @("!497AT02 Z
M(%-T<FEN9R@@,2 N+B W*2 Z/2 B4V5R=F5R02(["B @(" @(" @($)R968@
M.B!S97)V97)"+D]B:F5C=$)?<'1R.PH@(" @("!E;F0@<F5C;W)D.PH*(" @
M+2U"<F5F+E1E>'1".PH*(" @='EP92!/8FIE8W1!7W!T<B!I<R!A8V-E<W,@
M3V)J96-T03L*"@H*(" @9G5N8W1I;VX@0W)E871E(')E='5R;B!/8FIE8W1!
47W!T<CL*"F5N9"!S97)V97)!.PH`
`
end

begin 666 servera_b.a
M<&%C:V%G92!B;V1Y('-E<G9E<D$@:7,*"B @(&9U;F-T:6]N(&-R96%T92!R
M971U<FX@3V)J96-T05]P='(@:7,*(" @(" @4'1R(#H@3V)J96-T05]P='(@
M.CT@;F5W($]B:F5C=$$["B @(&)E9VEN"B @(" @(%!T<BY"<F5F(#H]('-E
M<G9E<D(N0W)E871E*"!0='(@*3L*(" @(" @<F5T=7)N(%!T<CL*(" @96YD
9(&-R96%T93L*"@H*96YD('-E<G9E<D$["@``
`
end

begin 666 serverb.a
M=VET:"!S97)V97)A.PH*<&%C:V%G92!S97)V97)"(&ES"@H@("!T>7!E($]B
M:F5C=$(@:7,@=&%G9V5D"B @(" @(')E8V]R9 H@(" @(" @("!497AT0B Z
M(%-T<FEN9R@@,2 N+B W("D@.CT@(E-E<G9E<D(B.PH@(" @(" @("!!<F5F
M(#H@<V5R=F5R82Y/8FIE8W1!7W!T<CL*(" @(" @96YD(')E8V]R9#L*"B @
M('1Y<&4@3V)J96-T0E]P='(@:7,@86-C97-S($]B:F5C=$(["@H@("!F=6YC
M=&EO;B!#<F5A=&4H(%!T<D$@.B!S97)V97)A+D]B:F5C=$%?<'1R("D@<F5T
?=7)N($]B:F5C=$)?<'1R.PH*96YD('-E<G9E<D(["@``
`
end

begin 666 main.a
M=VET:"!S97)V97)A.PH*<&%C:V%G92!M86EN(&ES"@H@("!R969!(#H@<V5R
M=F5R02Y/8FIE8W1!7W!T<B Z/2!S97)V97)!+D-R96%T93L*"F)E9VEN"B M
7+2!#3T1%"F5N9#H*"F5N9"!M86EN.PH`
`
end