Re: help with Ada question

[lynx.cs.washington.edu!pschwrtz@beaver.cs.washington.edu (Paul Schwartz)]

robert walker (rwalker@barnacle.micro.umn.edu) wrote:
: 
: I could use some help on an Ada question. I have a homework problem
: which states:
: 
: 
: If neither an exit nor a goto statement were available for Ada, how
: might you simulate the action of an exit statement?
: 
: 
: This is for a course in higher level languages. We are studying control
: structures of several languages. I have never programmed
: in Ada, and am new to the language.
: 
: Thanks for any help in advance.
: 
: Robert Walker
: rwalker@mermaid.micro.umn.edu
: 
: 
	The easiest way would be to put the loop in a block and use an
EXCEPTION to get out of the loop.  As in;
fooLoop:
BEGIN
	LOOP
		IF <condition> THEN
		RAISE Some_Error;
		END IF;

       stuff
	END LOOP;
	EXCEPTION 
	WHEN Some_Error => NULL; --you just wanted out of the loop
END fooLoop;

--
>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<
Paul Schwartz       pschwrtz@lynx.cs.washington.edu