Re: How to implement a continue statement in Ada?

[Matthew Heaney <matthew_heaney@acm.org>]

"Robert T. Sagris" <robs@physics.purdue.edu> writes:

> What I was asking; how would implement the code given, which really is
> just a general example, in Ada. Specifically so you could use it any
> any loop were you needed to skip an iteration.

As has been pointed out, THE way to implement continue in Ada is to use
a goto:

for I in X .. Y loop
   <do some work>

   if P then
      goto Continue;
   end if;

   <do some more work>

   <<Continue>> null;
end loop;


As Robert pointed out, if you label the loop, then you can include the
loop label in the name of the target of the goto (this is a stylistic
convention):

Paint_House:
for I in X .. Y loop
   <do some work>

   if P then
      goto Continue_Paint_House;
   end if;

   <do some more work>

   <<Continue_Paint_House>> null;
end loop Paint_House;