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.8 required=5.0 tests=BAYES_00,INVALID_DATE autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,a7e715f4b0d51477 X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 1994-12-05 13:33:53 PST Path: bga.com!news.sprintlink.net!howland.reston.ans.net!gatech!paladin.american.edu!auvm!J64.STRATCOM.AF.MIL!BennettC Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU Newsgroups: comp.lang.ada Encoding: 60 TEXT X-Mailer: Microsoft Mail V3.0 Message-ID: <2EE38942@SMTPGATE2.STRATCOM.AF.MIL> Date: Mon, 5 Dec 1994 13:42:00 PST Sender: Ada programming language From: "Bennett, Chip (KTR) ~U" Subject: Re: Using procedures Date: 1994-12-05T13:42:00-08:00 List-Id: Bill Heiser wrote: > I am down to the wire and have to complete a couple of Ada programs ASAP. > There is something I just don't get about using procedures in Ada. > If I have a program with multiple procedures, how do I get all of > them to run? If I try to call one from another, the compiler > complains of undeclared identifiers. > i.e. > > with text_io; > procedure putv(i: OUT integer) is > begin > for i in 1..5 loop > text_io.put(integer'image(i)); > end loop; > > end putv; > > with text_io; > procedure puty(j: OUT integer) is > begin > for j in 1..5 loop > text_io.put(integer'image(j)); > end loop; > end puty; > > How (for example) do I call putv from puty? If I try a "putv(something)", > the compiler complains that putv is an undeclared identifier. If I run > this little program as-is, it runs, but only one of the functions runs > (I get a "1-5", not two sets of them as I'd expect). > > I'm really down to the wire to get these programs done for school, so > any help would be much appreciated. > > BTW, this is for Ada/6000 release 3.3 on an RS/6000 running AIX 3.2.5. > > Thanks, > Bill > -- > Bill Heiser: bill@bh.org http://www.bh.org/ > PGP public key available upon request. > Bill, your question shows you either haven't read the book, or you're not listening in class, so I'll be brief and leave "the proof as an exercise" :-). Nest the subroutine or put it in a package. (If I've misjudged the situation I apologize.) But this brings up a bigger point that is the real reason I bother to post this. I want to promote Ada, but I question whether doing a students homework is going too far. Comments? ***************************************************************** * Chip Bennett, GDE Systems Inc | BennettC@j64.stratcom.af.mil * * USSTRATCOM/J64213 | Voice (402)294-7360 * * 901 SAC Blvd, Suite 2B24 | FAX (402)294-7912 * * Offutt AFB, NE 68113-6600 | Proud member of Team Ada * * Opinions expressed here are my own _so_, TTFWTW * *****************************************************************