comp.lang.ada
 help / color / mirror / Atom feed
From: jsa@organon.com (Jon S Anthony)
Subject: Re: Help with Exceptions!
Date: 1996/05/10
Date: 1996-05-10T00:00:00+00:00	[thread overview]
Message-ID: <JSA.96May10151348@organon.com> (raw)
In-Reply-To: 318F353D.4531@mtm.syr.ge.com


In article <4mt0um$dgu@hearst.cac.psu.edu> RLS@psu.edu    (Robert L. Spooner, AD3K) writes:


> Another way to reexecute a statement is to have the function call
> itself from the exception handler, after outputting an error
> message.  Once the user enters valid input, the function
> willrecursively return with the proper value.  For user input from a
> keyboard, any performance differences between the loop and the
> recursive function call will be negligible.

This is a nice trick which allows you to approximate Eiffel style
exception capabilities.

> function Response (Prompt : String) return integer is
> 
>    line : ...
>    Size : ...
> 
> begin
>    Put (Prompt);
>    Get_Line (...;
>    return ...
> exception
>    when others =>
>       Put_Line (...;  -- error message
>       return Response(Prompt);
> end Response;


/Jon
-- 
Jon Anthony
Organon Motives, Inc.
1 Williston Road, Suite 4
Belmont, MA 02178

617.484.3383
jsa@organon.com





  parent reply	other threads:[~1996-05-10  0:00 UTC|newest]

Thread overview: 24+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-05-07  0:00 Help with Exceptions! Robert Gelb
1996-05-07  0:00 ` Vincent Smeets
1996-05-07  0:00 ` John Herro
1996-05-07  0:00 ` Steve Howard
1996-05-07  0:00   ` Robert Dewar
     [not found]   ` <4mqio5$a8b@news.sanders.lockheed.com>
1996-05-09  0:00     ` Robert L. Spooner, AD3K
1996-05-10  0:00   ` Jon S Anthony [this message]
1996-05-10  0:00     ` Robert A Duff
     [not found] ` <318F94D9.35AB@io.com>
1996-05-10  0:00   ` George F.Rice
1996-05-13  0:00     ` Dave Jones
1996-05-13  0:00   ` Robert I. Eachus
1996-05-14  0:00     ` John Herro
1996-05-14  0:00       ` Robert I. Eachus
1996-05-14  0:00   ` Theodore E. Dennison
1996-05-14  0:00     ` Robert A Duff
1996-05-14  0:00 ` Michel Gauthier
1996-05-14  0:00   ` Robert A Duff
1996-05-15  0:00     ` Norman H. Cohen
1996-05-15  0:00       ` Robert A Duff
1996-05-15  0:00 ` Michel Gauthier
1996-05-16  0:00 ` Jon S Anthony
1996-05-16  0:00 ` Jon S Anthony
1996-05-16  0:00   ` Robert A Duff
  -- strict thread matches above, loose matches on Subject: below --
1996-05-09  0:00 tmoran
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox