summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/tmtests/tm07/tmtest.ads
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/ada-tests/tmtests/tm07/tmtest.ads')
-rw-r--r--c/src/ada-tests/tmtests/tm07/tmtest.ads4
1 files changed, 4 insertions, 0 deletions
diff --git a/c/src/ada-tests/tmtests/tm07/tmtest.ads b/c/src/ada-tests/tmtests/tm07/tmtest.ads
index 245f464e39..6a3491e54f 100644
--- a/c/src/ada-tests/tmtests/tm07/tmtest.ads
+++ b/c/src/ada-tests/tmtests/tm07/tmtest.ads
@@ -53,6 +53,7 @@ package TMTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TEST_INIT
@@ -78,6 +79,7 @@ package TMTEST is
procedure HIGH_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, HIGH_TASK);
--
-- MIDDLE_TASKS
@@ -92,6 +94,7 @@ package TMTEST is
procedure MIDDLE_TASKS (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, MIDDLE_TASKS);
--
-- LOW_TASK
@@ -106,5 +109,6 @@ package TMTEST is
procedure LOW_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, LOW_TASK);
end TMTEST;