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