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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,98e6b29260f70dc7
X-Google-Attributes: gid103376,public
From: Gautier <gautier.demontmollin@maths.unine.ch>
Subject: Re: Help!! program doesnt run, has 0 errors
Date: 2000/08/15
Message-ID: <39991B7E.832AFF73@maths.unine.ch>#1/1
X-Deja-AN: 658477226
Content-Transfer-Encoding: 7bit
References: <39991c02$0$17111@echo-01.iinet.net.au>
X-Accept-Language: en
Content-Type: text/plain; charset=us-ascii
X-Trace: 15 Aug 2000 12:29:17 +0100, mac13-32.unine.ch
Organization: Maths - Uni =?iso-8859-1?Q?Neuch=E2tel?=
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Date: 2000-08-15T00:00:00+00:00
List-Id: <comp.lang.ada>

Damon Carter:

<<
procedure Get_Valid_Integer (The_Integer : out Integer;
                    Prompt_Text : String := "any integer value";
                       Lower : Integer := Integer'First;
                       Upper : Integer := Integer'Last) is
begin
[...]
         Get_Valid_Integer(The_Integer);
>>

I fear the problem is there - if GNAT is the compiler, doesn't
it issue a "possible infinite recursion" warning ?...

______________________________________________________
Gautier  --  http://members.xoom.com/gdemont/gsoft.htm