8 lines
127 B
Ada
8 lines
127 B
Ada
Outer:
|
|
loop
|
|
-- do something
|
|
loop
|
|
exit Outer when Finished;
|
|
-- do something else
|
|
end loop;
|
|
end loop Outer;
|