Data update

Task/Function-prototype/Ada/function-prototype-1.ada

@@ -1,6 +0,0 @@
-function noargs return Integer;
-function twoargs (a, b : Integer) return Integer;
---  varargs do not exist
-function optionalargs (a, b : Integer := 0) return Integer;
---  all parameters are always named, only calling by name differs
-procedure dostuff (a : Integer);

Task/Function-prototype/Ada/function-prototype-2.ada

@@ -1,5 +0,0 @@
-type Box; --  tell Ada a box exists (undefined yet)
-type accBox is access Box; --  define a pointer to a box
-type Box is record --  later define what a box is
-   next : accBox; --  including that a box holds access to other boxes
-end record;

Task/Function-prototype/Ada/function-prototype-3.ada

@@ -1,4 +0,0 @@
-package Stack is
-   procedure Push(Object:Integer);
-   function Pull return Integer;
-end Stack;

Task/Function-prototype/Ada/function-prototype-4.ada

@@ -1,13 +0,0 @@
-package body Stack is
-
-   procedure Push(Object:Integer) is
-   begin
-      -- implementation goes here
-   end;
-
-   function Pull return Integer;
-   begin
-      -- implementation goes here
-   end;
-
-end Stack;

Task/Function-prototype/Ada/function-prototype-5.ada

@@ -1,8 +0,0 @@
-with Stack;
-procedure Main is
-   N:integer:=5;
-begin
-   Push(N);
-   ...
-   N := Pull;
-end Main;