summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/tmtests/tm19/tmtest.adb
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/ada-tests/tmtests/tm19/tmtest.adb')
-rw-r--r--c/src/ada-tests/tmtests/tm19/tmtest.adb12
1 files changed, 8 insertions, 4 deletions
diff --git a/c/src/ada-tests/tmtests/tm19/tmtest.adb b/c/src/ada-tests/tmtests/tm19/tmtest.adb
index 50b937ab86..fbcadae312 100644
--- a/c/src/ada-tests/tmtests/tm19/tmtest.adb
+++ b/c/src/ada-tests/tmtests/tm19/tmtest.adb
@@ -10,7 +10,7 @@
--
--
--
--- COPYRIGHT (c) 1989-1997.
+-- COPYRIGHT (c) 1989-2009.
-- On-Line Applications Research Corporation (OAR).
--
-- The license and distribution terms for this file may in
@@ -20,13 +20,11 @@
-- $Id$
--
-with INTERFACES; use INTERFACES;
-with RTEMS;
with RTEMS_CALLING_OVERHEAD;
with TEST_SUPPORT;
with TEXT_IO;
with TIME_TEST_SUPPORT;
-with UNSIGNED32_IO;
+with TIMER_DRIVER;
package body TMTEST is
@@ -38,6 +36,7 @@ package body TMTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
+ pragma Unreferenced(ARGUMENT);
STATUS : RTEMS.STATUS_CODES;
begin
@@ -114,6 +113,7 @@ package body TMTEST is
procedure PROCESS_ASR_FOR_PASS_1 (
SIGNALS : in RTEMS.SIGNAL_SET
) is
+ pragma Unreferenced(SIGNALS);
begin
TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER;
@@ -140,6 +140,7 @@ package body TMTEST is
procedure PROCESS_ASR_FOR_PASS_2 (
SIGNALS : in RTEMS.SIGNAL_SET
) is
+ pragma Unreferenced(SIGNALS);
STATUS : RTEMS.STATUS_CODES;
begin
@@ -160,6 +161,7 @@ package body TMTEST is
procedure TASK_1 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
+ pragma Unreferenced(ARGUMENT);
STATUS : RTEMS.STATUS_CODES;
begin
@@ -240,6 +242,7 @@ package body TMTEST is
procedure TASK_2 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
+ pragma Unreferenced(ARGUMENT);
STATUS : RTEMS.STATUS_CODES;
begin
@@ -262,6 +265,7 @@ package body TMTEST is
procedure TASK_3 (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
+ pragma Unreferenced(ARGUMENT);
STATUS : RTEMS.STATUS_CODES;
begin