mirror of
https://gitlab.rtems.org/rtems/rtos/rtems.git
synced 2025-12-25 13:57:15 +00:00
2002-08-27 Ralf Corsepius <corsepiu@faw.uni-ulm.de>
* sptests/sp19/sptest.adb: Remove. * sptests/sp19/Makefile.am: Let m4 generate sptests.adb from sptests.adp.
This commit is contained in:
@@ -1,3 +1,9 @@
|
|||||||
|
2002-08-27 Ralf Corsepius <corsepiu@faw.uni-ulm.de>
|
||||||
|
|
||||||
|
* sptests/sp19/sptest.adb: Remove.
|
||||||
|
* sptests/sp19/Makefile.am: Let m4 generate sptests.adb from
|
||||||
|
sptests.adp.
|
||||||
|
|
||||||
2002-08-27 Joel Sherrill <joel@OARcorp.com>
|
2002-08-27 Joel Sherrill <joel@OARcorp.com>
|
||||||
|
|
||||||
* sptests/sp21/sptest.adb: Fixed IO_Initialize invocations to
|
* sptests/sp21/sptest.adb: Fixed IO_Initialize invocations to
|
||||||
|
|||||||
@@ -6,15 +6,19 @@ include $(top_srcdir)/../../../automake/lib.am
|
|||||||
|
|
||||||
include $(top_srcdir)/ada.am
|
include $(top_srcdir)/ada.am
|
||||||
|
|
||||||
|
AM_ADAFLAGS += -I.
|
||||||
|
|
||||||
if EXPADA
|
if EXPADA
|
||||||
noinst_PROGRAMS = sp19
|
noinst_PROGRAMS = sp19
|
||||||
endif
|
endif
|
||||||
|
|
||||||
sp19_SOURCES = sp19.adb config.h sptest.ads
|
sp19_SOURCES = sp19.adb sptest.adb config.h sptest.ads
|
||||||
|
|
||||||
# FIXME: Missing sptest.adb
|
sptest.adb: sptest.adp
|
||||||
|
pwd=`pwd` && cd $(srcdir) && $(M4) < sptest.adp > $${pwd}/sptest.adb
|
||||||
|
CLEANFILES += sptest.adb
|
||||||
|
|
||||||
sp19$(EXEEXT): sp19.adb
|
sp19$(EXEEXT): sp19.adb sptest.adb sptest.ads
|
||||||
$(GNATCOMPILE) -margs -a $< -o $@
|
$(GNATCOMPILE) -margs -a $< -o $@
|
||||||
|
|
||||||
EXTRA_DIST = sp19.scn
|
EXTRA_DIST = sp19.scn
|
||||||
|
|||||||
@@ -1,50 +0,0 @@
|
|||||||
--
|
|
||||||
-- SPTEST / BODY
|
|
||||||
--
|
|
||||||
-- DESCRIPTION:
|
|
||||||
--
|
|
||||||
-- This package is the implementation of Test 19 of the RTEMS
|
|
||||||
-- Single Processor Test Suite.
|
|
||||||
--
|
|
||||||
-- DEPENDENCIES:
|
|
||||||
--
|
|
||||||
--
|
|
||||||
--
|
|
||||||
-- COPYRIGHT (c) 1989-1997.
|
|
||||||
-- On-Line Applications Research Corporation (OAR).
|
|
||||||
-- Copyright assigned to U.S. Government, 1994.
|
|
||||||
--
|
|
||||||
-- The license and distribution terms for this file may in
|
|
||||||
-- the file LICENSE in this distribution or at
|
|
||||||
-- http://www.OARcorp.com/rtems/license.html.
|
|
||||||
--
|
|
||||||
-- $Id$
|
|
||||||
--
|
|
||||||
|
|
||||||
with INTERFACES; use INTERFACES;
|
|
||||||
with RTEMS;
|
|
||||||
with TEST_SUPPORT;
|
|
||||||
with TEXT_IO;
|
|
||||||
|
|
||||||
package body SPTEST is
|
|
||||||
|
|
||||||
--PAGE
|
|
||||||
--
|
|
||||||
-- INIT
|
|
||||||
--
|
|
||||||
|
|
||||||
procedure INIT (
|
|
||||||
ARGUMENT : in RTEMS.TASK_ARGUMENT
|
|
||||||
) is
|
|
||||||
TIME : RTEMS.TIME_OF_DAY;
|
|
||||||
STATUS : RTEMS.STATUS_CODES;
|
|
||||||
begin
|
|
||||||
|
|
||||||
TEXT_IO.NEW_LINE( 2 );
|
|
||||||
TEXT_IO.PUT_LINE( "*** TEST 19***" );
|
|
||||||
TEXT_IO.PUT_LINE( "Not currently implemented" );
|
|
||||||
TEXT_IO.PUT_LINE( "*** END OF TEST 19***" );
|
|
||||||
|
|
||||||
end INIT;
|
|
||||||
|
|
||||||
end SPTEST;
|
|
||||||
Reference in New Issue
Block a user