summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/tmtests/tm20
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/ada-tests/tmtests/tm20')
-rw-r--r--c/src/ada-tests/tmtests/tm20/tmtest.adb1
-rw-r--r--c/src/ada-tests/tmtests/tm20/tmtest.ads3
2 files changed, 3 insertions, 1 deletions
diff --git a/c/src/ada-tests/tmtests/tm20/tmtest.adb b/c/src/ada-tests/tmtests/tm20/tmtest.adb
index 03cd1b33eb..354827798d 100644
--- a/c/src/ada-tests/tmtests/tm20/tmtest.adb
+++ b/c/src/ada-tests/tmtests/tm20/tmtest.adb
@@ -98,7 +98,6 @@ package body TMTEST is
BUFFER_COUNT : RTEMS.UNSIGNED32;
PREVIOUS_MODE : RTEMS.MODE;
PREVIOUS_PRIORITY : RTEMS.TASK_PRIORITY;
- OVERHEAD : RTEMS.UNSIGNED32;
STATUS : RTEMS.STATUS_CODES;
begin
diff --git a/c/src/ada-tests/tmtests/tm20/tmtest.ads b/c/src/ada-tests/tmtests/tm20/tmtest.ads
index 48917c5394..fc75d93b8a 100644
--- a/c/src/ada-tests/tmtests/tm20/tmtest.ads
+++ b/c/src/ada-tests/tmtests/tm20/tmtest.ads
@@ -99,6 +99,7 @@ package TMTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, INIT);
--
-- TASK_1
@@ -130,6 +131,7 @@ package TMTEST is
procedure TASK_1 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TASK_1);
--
-- TASK_2
@@ -146,5 +148,6 @@ package TMTEST is
procedure TASK_2 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
);
+ pragma Convention (C, TASK_2);
end TMTEST;