diff options
Diffstat (limited to 'c/src/ada-tests/tmtests/tm03/tmtest.adb')
| -rw-r--r-- | c/src/ada-tests/tmtests/tm03/tmtest.adb | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/c/src/ada-tests/tmtests/tm03/tmtest.adb b/c/src/ada-tests/tmtests/tm03/tmtest.adb index 3db45db87d..ed7d6a4346 100644 --- a/c/src/ada-tests/tmtests/tm03/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm03/tmtest.adb @@ -72,7 +72,6 @@ package body TMTEST is procedure TEST_INIT ( ARGUMENT : in RTEMS.TASK_ARGUMENT ) is - INDEX : RTEMS.UNSIGNED32; PRIORITY : RTEMS.TASK_PRIORITY; TASK_ID : RTEMS.ID; STATUS : RTEMS.STATUS_CODES; @@ -138,9 +137,6 @@ package body TMTEST is procedure MIDDLE_TASKS ( ARGUMENT : in RTEMS.TASK_ARGUMENT ) is - INDEX : RTEMS.UNSIGNED32; - PRIORITY : RTEMS.TASK_PRIORITY; - ID : RTEMS.ID; STATUS : RTEMS.STATUS_CODES; begin @@ -163,9 +159,6 @@ package body TMTEST is procedure HIGH_TASK ( ARGUMENT : in RTEMS.TASK_ARGUMENT ) is - INDEX : RTEMS.UNSIGNED32; - PRIORITY : RTEMS.TASK_PRIORITY; - ID : RTEMS.ID; STATUS : RTEMS.STATUS_CODES; begin |