diff options
Diffstat (limited to 'testsuites/ada/sptests/sp24/sptest.adb')
-rw-r--r-- | testsuites/ada/sptests/sp24/sptest.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuites/ada/sptests/sp24/sptest.adb b/testsuites/ada/sptests/sp24/sptest.adb index 4245036995..af255e4d73 100644 --- a/testsuites/ada/sptests/sp24/sptest.adb +++ b/testsuites/ada/sptests/sp24/sptest.adb @@ -39,7 +39,7 @@ package body SPTEST is begin TEXT_IO.NEW_LINE( 2 ); - TEXT_IO.PUT_LINE( "*** TEST 24 ***" ); + TEST_SUPPORT.ADA_TEST_BEGIN; TIME := ( 1988, 12, 31, 9, 0, 0, 0 ); @@ -145,7 +145,7 @@ package body SPTEST is TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "CLOCK_GET_TOD" ); if TIME.SECOND >= 35 then - TEXT_IO.PUT_LINE( "*** END OF TEST 24 ***" ); + TEST_SUPPORT.ADA_TEST_END; RTEMS.SHUTDOWN_EXECUTIVE( 0 ); end if; |