RosettaCodeData/Task/Inverted-syntax/Ada/inverted-syntax.ada

6 lines
67 B
Ada
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
Foo := 1;
loop
exit when Foo = 10;
Foo := Foo + 1;
end loop;