diff options
Diffstat (limited to 'testsuites/ada/sptests/sp04/sptest.adb')
| -rw-r--r-- | testsuites/ada/sptests/sp04/sptest.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuites/ada/sptests/sp04/sptest.adb b/testsuites/ada/sptests/sp04/sptest.adb index f3955fbb3a..3fcaad18b3 100644 --- a/testsuites/ada/sptests/sp04/sptest.adb +++ b/testsuites/ada/sptests/sp04/sptest.adb @@ -79,7 +79,7 @@ package body SPTEST is begin TEXT_IO.NEW_LINE( 2 ); - TEXT_IO.PUT_LINE( "*** TEST 4 ***" ); + TEST_SUPPORT.ADA_TEST_BEGIN; TIME := ( 1988, 12, 31, 9, 15, 0, 0 ); @@ -264,7 +264,7 @@ package body SPTEST is NULL; END LOOP; Flush_Task_Event_Log; - TEXT_IO.PUT_LINE( "*** END OF TEST 4 ***" ); + TEST_SUPPORT.ADA_TEST_END; RTEMS.SHUTDOWN_EXECUTIVE( 0 ); end if; |