2002-08-27 Ralf Corsepius <corsepiu@faw.uni-ulm.de>

* 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.
This commit is contained in:
Ralf Corsepius committed 2002-08-27 17:06:30 +00:00
1 parent cbb095033a
commit bf6fa0f445
8 files changed
+16 -22

No files matched your search

+16
View File
@@ -1,3 +1,19 @@
2002-08-27 Ralf Corsepius <corsepiu@faw.uni-ulm.de>
* 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 <joel@OARcorp.com>
* tmtests/tm20/tmtest.adb, tmtests/tmoverhd/tmtest.adb: Fixed
call to RTEMS IO Manager services.
2002-08-27 Joel Sherrill <joel@OARcorp.com>
* tmtests/tm20/tmtest.adb, tmtests/tmoverhd/tmtest.adb: Fixed
-2
View File
@@ -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
-2
View File
@@ -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(
-2
View File
@@ -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
-2
View File
@@ -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
-2
View File
@@ -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" );
@@ -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
@@ -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
);