From bf6fa0f445e147994c2ba361dd8141a3cef1cac2 Mon Sep 17 00:00:00 2001 From: Ralf Corsepius Date: Tue, 27 Aug 2002 17:06:30 +0000 Subject: 2002-08-27 Ralf Corsepius * sptests/sp09/Makefile.am: Remove EXPADA. * sptests/sp09/sptest.adb: Remove RESULT from SCREEN_13. * sptests/sp19/Makefile.am: Remove EXPADA. * sptests/sp21/Makefile.am: Remove EXPADA. * sptests/sp21/sptest.adb: Remove RESULT from TASK_1. * tmtests/tmoverhd/dummy_rtems.adb: Reflect changes to IO_Managers. * tmtests/tmoverhd/dummy_rtems.ads: Reflect changes to IO_Managers. --- c/src/ada-tests/ChangeLog | 16 ++++++++++++++++ c/src/ada-tests/sptests/sp09/Makefile.am | 2 -- c/src/ada-tests/sptests/sp09/sptest.adb | 2 -- c/src/ada-tests/sptests/sp19/Makefile.am | 2 -- c/src/ada-tests/sptests/sp21/Makefile.am | 2 -- c/src/ada-tests/sptests/sp21/sptest.adb | 2 -- c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb | 6 ------ c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads | 6 ------ 8 files changed, 16 insertions(+), 22 deletions(-) (limited to 'c/src/ada-tests') diff --git a/c/src/ada-tests/ChangeLog b/c/src/ada-tests/ChangeLog index 8a72ff33c2..5436ea4e95 100644 --- a/c/src/ada-tests/ChangeLog +++ b/c/src/ada-tests/ChangeLog @@ -1,3 +1,19 @@ +2002-08-27 Ralf Corsepius + + * sptests/sp09/Makefile.am: Remove EXPADA. + * sptests/sp09/sptest.adb: Remove RESULT from SCREEN_13. + * sptests/sp19/Makefile.am: Remove EXPADA. + * sptests/sp21/Makefile.am: Remove EXPADA. + * sptests/sp21/sptest.adb: Remove RESULT from TASK_1. + * tmtests/tmoverhd/dummy_rtems.adb: Reflect changes to IO_Managers. + * tmtests/tmoverhd/dummy_rtems.ads: Reflect changes to IO_Managers. + +2002-08-27 Joel Sherrill + + * tmtests/tm20/tmtest.adb, tmtests/tmoverhd/tmtest.adb: Fixed + call to RTEMS IO Manager services. + + 2002-08-27 Joel Sherrill * tmtests/tm20/tmtest.adb, tmtests/tmoverhd/tmtest.adb: Fixed diff --git a/c/src/ada-tests/sptests/sp09/Makefile.am b/c/src/ada-tests/sptests/sp09/Makefile.am index 601aeb5ebe..28cb7266c7 100644 --- a/c/src/ada-tests/sptests/sp09/Makefile.am +++ b/c/src/ada-tests/sptests/sp09/Makefile.am @@ -6,9 +6,7 @@ include $(top_srcdir)/../../../automake/lib.am include $(top_srcdir)/ada.am -if EXPADA noinst_PROGRAMS = sp09 -endif sp09_SOURCES = sp09.adb config.h sptest.adb sptest.ads diff --git a/c/src/ada-tests/sptests/sp09/sptest.adb b/c/src/ada-tests/sptests/sp09/sptest.adb index da3b66f92f..5ea025525d 100644 --- a/c/src/ada-tests/sptests/sp09/sptest.adb +++ b/c/src/ada-tests/sptests/sp09/sptest.adb @@ -2651,7 +2651,6 @@ package body SPTEST is procedure SCREEN_13 is - RESULT : RTEMS.Unsigned32; TIME : RTEMS.TIME_OF_DAY; STATUS : RTEMS.STATUS_CODES; begin @@ -2688,7 +2687,6 @@ package body SPTEST is RTEMS.DEVICE_MAJOR_NUMBER'LAST, 0, RTEMS.NULL_ADDRESS, - RESULT, STATUS ); TEST_SUPPORT.FATAL_DIRECTIVE_STATUS( diff --git a/c/src/ada-tests/sptests/sp19/Makefile.am b/c/src/ada-tests/sptests/sp19/Makefile.am index 94ab737080..36c64ad94b 100644 --- a/c/src/ada-tests/sptests/sp19/Makefile.am +++ b/c/src/ada-tests/sptests/sp19/Makefile.am @@ -8,9 +8,7 @@ include $(top_srcdir)/ada.am AM_ADAFLAGS += -I. -if EXPADA noinst_PROGRAMS = sp19 -endif sp19_SOURCES = sp19.adb sptest.adb config.h sptest.ads diff --git a/c/src/ada-tests/sptests/sp21/Makefile.am b/c/src/ada-tests/sptests/sp21/Makefile.am index 87d9c040ef..e291526637 100644 --- a/c/src/ada-tests/sptests/sp21/Makefile.am +++ b/c/src/ada-tests/sptests/sp21/Makefile.am @@ -6,9 +6,7 @@ include $(top_srcdir)/../../../automake/lib.am include $(top_srcdir)/ada.am -if EXPADA noinst_PROGRAMS = sp21 -endif sp21_SOURCES = sp21.adb config.h sptest.adb sptest.ads diff --git a/c/src/ada-tests/sptests/sp21/sptest.adb b/c/src/ada-tests/sptests/sp21/sptest.adb index 606683a6be..006e75f396 100644 --- a/c/src/ada-tests/sptests/sp21/sptest.adb +++ b/c/src/ada-tests/sptests/sp21/sptest.adb @@ -76,7 +76,6 @@ package body SPTEST is procedure TASK_1 ( ARGUMENT : in RTEMS.TASK_ARGUMENT ) is - RESULT : RTEMS.Unsigned32; STATUS : RTEMS.STATUS_CODES; begin @@ -154,7 +153,6 @@ package body SPTEST is SPTEST.STUB_DRIVER_MAJOR, 0, RTEMS.NULL_ADDRESS, - RESULT, STATUS ); TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "IO_INITIALIZE" ); diff --git a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb index e6a3519e99..fe105cda1b 100644 --- a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb +++ b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb @@ -724,7 +724,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin @@ -737,7 +736,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin @@ -750,7 +748,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin @@ -763,7 +760,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin @@ -776,7 +772,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin @@ -789,7 +784,6 @@ package body DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ) is begin diff --git a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads index ccad73c0ef..56f9486a83 100644 --- a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads +++ b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.ads @@ -434,7 +434,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); @@ -442,7 +441,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); @@ -450,7 +448,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); @@ -458,7 +455,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); @@ -466,7 +462,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); @@ -474,7 +469,6 @@ package DUMMY_RTEMS is MAJOR : in RTEMS.DEVICE_MAJOR_NUMBER; MINOR : in RTEMS.DEVICE_MINOR_NUMBER; ARGUMENT : in RTEMS.ADDRESS; - RETURN_VALUE : out RTEMS.UNSIGNED32; RESULT : out RTEMS.STATUS_CODES ); -- cgit v1.2.3