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=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,c468f2242120f388
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,ASCII
Path: 
 g2news2.google.com!postnews.google.com!37g2000yqm.googlegroups.com!not-for-mail
From: mockturtle <framefritti@gmail.com>
Newsgroups: comp.lang.ada
Subject: Re: pass in parameters
Date: Tue, 11 May 2010 10:55:15 -0700 (PDT)
Organization: http://groups.google.com
Message-ID: <25a03ac3-0314-4693-8893-c791bb025cd7@37g2000yqm.googlegroups.com>
References: 
 <5c7838c3-6611-4698-ad8c-f512c652016a@n15g2000yqf.googlegroups.com>
NNTP-Posting-Host: 93.37.255.154
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
X-Trace: posting.google.com 1273600515 8102 127.0.0.1 (11 May 2010 17:55:15
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Tue, 11 May 2010 17:55:15 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: 37g2000yqm.googlegroups.com; posting-host=93.37.255.154;
	posting-account=9fwclgkAAAD6oQ5usUYhee1l39geVY99
User-Agent: G2/1.0
X-HTTP-UserAgent: Opera/9.80 (X11; Linux i686; U; en) Presto/2.2.15
	Version/10.10,gzip(gfe)
Xref: g2news2.google.com comp.lang.ada:11518
Date: 2010-05-11T10:55:15-07:00
List-Id: <comp.lang.ada>

On May 11, 7:20=A0pm, moongeegee <jenny.kh...@gmail.com> wrote:
> I am very new in ADA

welcome aboard!

> and trying to solve some issues on ADA. The codes are not
> written by me. Please help.
> I have a procedure has 4 pass in parameters as below. myInter.Init has
> only two parameters.
> Does it mean myInter call other procedure Init, not the one below?

Yes, if this is an actual code excerpt, the procedure Init does not
call recursively itself.  From your example it is not clear if myInter
is a package or a tagged record, but the difference in the number of
parameter suffices to grant that the called Init is another Init.

Oh, by the way... It is "Ada" and not "ADA", it is not an acronym, but
a name :-)

>
> procedure Init
> =A0 (init_file =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0: in string;
> =A0 =A0sname =A0 =A0 =A0 =A0 =A0 =A0 : in string;
> =A0 =A0sate =A0 =A0 =A0 =A0 =A0 =A0 =A0: in integer;
> =A0 =A0cstate : in CState_type) is
>
> begin
>
> =A0 =A0 =A0 myInter.Init
> =A0 =A0 =A0 =A0(SFile, tName);
>
> end;