Data update

Task/Flow-control-structures/Ada/flow-control-structures-1.ada

@@ -1,3 +0,0 @@
-<<Top>>
-   Put_Line("Hello, World");
-   goto Top;

Task/Flow-control-structures/Ada/flow-control-structures-2.ada

@@ -1,10 +0,0 @@
-Outer:
-loop
-   -- do something
-   loop
-      if Finished then
-         exit Outer; -- exits both the inner and outer loops
-      end if;
-      -- do something else
-   end loop;
-end loop Outer;

Task/Flow-control-structures/Ada/flow-control-structures-3.ada

@@ -1,8 +0,0 @@
-Outer:
-loop
-   -- do something
-   loop
-      exit Outer when Finished;
-      -- do something else
-   end loop;
-end loop Outer;

Task/Flow-control-structures/Ada/flow-control-structures-4.ada

@@ -1,8 +0,0 @@
-procedure Foo is
-begin
-   --  do something
-   if Nothing_More_To_Do then
-      return;
-   end if;
-   --  do more
-end Foo;

Task/Flow-control-structures/Ada/flow-control-structures-5.ada

@@ -1,7 +0,0 @@
-select
-   delay 10.0;
-   Put_Line ("Cannot finish this in 10s");
-then abort
-   -- do some lengthy calculation
-   ...
-end select;