1 files changed, 14 insertions, 0 deletions
diff --git a/ada_from_c_task/example.ads b/ada_from_c_task/example.ads
new file mode 100644
index 0000000..7a5a256
--- /dev/null
+++ b/ada_from_c_task/example.ads
@@ -0,0 +1,14 @@
+--
+--  The license and distribution terms for this file may be
+--  found in the file LICENSE in this distribution or at
+--  http://www.rtems.com/license/LICENSE.
+--
+--  $Id$
+--
+
+package Example is
+  procedure ToBeCalled(
+    iterations : in Integer
+  );
+  pragma export(C, ToBeCalled, "example_ToBeCalled");
+end Example;