ada: Add standard test begin/end message

58 files changed, 116 insertions, 58 deletions

diff --git a/testsuites/ada/tmtests/tm01/config.h b/testsuites/ada/tmtests/tm01/config.h
index fac8bedb98..b2a057674a 100644
--- a/testsuites/ada/tmtests/tm01/config.h
+++ b/testsuites/ada/tmtests/tm01/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              2
+
+#define ADA_TEST_NAME "ADA TM 1"
 #define CONFIGURE_MAXIMUM_SEMAPHORES         1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm01/tmtest.adb b/testsuites/ada/tmtests/tm01/tmtest.adb
index 31e54aa40f..4f48668cf0 100644
--- a/testsuites/ada/tmtests/tm01/tmtest.adb
+++ b/testsuites/ada/tmtests/tm01/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 1 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TASK_NAME( 1 ) := RTEMS.BUILD_NAME(  'T', 'A', '1', ' ' );
       TMTEST.TASK_NAME( 2 ) := RTEMS.BUILD_NAME(  'T', 'A', '2', ' ' );
@@ -265,7 +265,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.SEMAPHORE_RELEASE 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 1 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
    
    end TASK_1;
diff --git a/testsuites/ada/tmtests/tm02/config.h b/testsuites/ada/tmtests/tm02/config.h
index ffb8dc3723..18a1ad722a 100644
--- a/testsuites/ada/tmtests/tm02/config.h
+++ b/testsuites/ada/tmtests/tm02/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 2"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm02/tmtest.adb b/testsuites/ada/tmtests/tm02/tmtest.adb
index 8fc9df5b18..c2386a5f51 100644
--- a/testsuites/ada/tmtests/tm02/tmtest.adb
+++ b/testsuites/ada/tmtests/tm02/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 2 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -198,7 +198,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.SEMAPHORE_OBTAIN 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 2 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm03/config.h b/testsuites/ada/tmtests/tm03/config.h
index ffb8dc3723..61daeb963e 100644
--- a/testsuites/ada/tmtests/tm03/config.h
+++ b/testsuites/ada/tmtests/tm03/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 3"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm03/tmtest.adb b/testsuites/ada/tmtests/tm03/tmtest.adb
index a6e7606920..577b5fd121 100644
--- a/testsuites/ada/tmtests/tm03/tmtest.adb
+++ b/testsuites/ada/tmtests/tm03/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 3 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'A', '1', ' ' ),
@@ -182,7 +182,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.SEMAPHORE_RELEASE
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 3 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm04/config.h b/testsuites/ada/tmtests/tm04/config.h
index 0a37e7f8e6..42f8aeeef0 100644
--- a/testsuites/ada/tmtests/tm04/config.h
+++ b/testsuites/ada/tmtests/tm04/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 4"
 #define CONFIGURE_MAXIMUM_SEMAPHORES         1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm04/tmtest.adb b/testsuites/ada/tmtests/tm04/tmtest.adb
index 7278bf2432..581a15a857 100644
--- a/testsuites/ada/tmtests/tm04/tmtest.adb
+++ b/testsuites/ada/tmtests/tm04/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 4 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -397,7 +397,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_DELETE
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 4 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm05/config.h b/testsuites/ada/tmtests/tm05/config.h
index ffb8dc3723..7b56b81b99 100644
--- a/testsuites/ada/tmtests/tm05/config.h
+++ b/testsuites/ada/tmtests/tm05/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 5"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm05/tmtest.adb b/testsuites/ada/tmtests/tm05/tmtest.adb
index c334acd526..46362e752a 100644
--- a/testsuites/ada/tmtests/tm05/tmtest.adb
+++ b/testsuites/ada/tmtests/tm05/tmtest.adb
@@ -38,7 +38,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 5 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -115,7 +115,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_RESUME
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 5 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm06/config.h b/testsuites/ada/tmtests/tm06/config.h
index ffb8dc3723..c8ae6d5751 100644
--- a/testsuites/ada/tmtests/tm06/config.h
+++ b/testsuites/ada/tmtests/tm06/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 6"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm06/tmtest.adb b/testsuites/ada/tmtests/tm06/tmtest.adb
index 2f0f8b1a26..fc43355645 100644
--- a/testsuites/ada/tmtests/tm06/tmtest.adb
+++ b/testsuites/ada/tmtests/tm06/tmtest.adb
@@ -38,7 +38,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 6 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -180,7 +180,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_DELETE
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 6 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TASK_1;
diff --git a/testsuites/ada/tmtests/tm07/config.h b/testsuites/ada/tmtests/tm07/config.h
index ffb8dc3723..f6ca20e61f 100644
--- a/testsuites/ada/tmtests/tm07/config.h
+++ b/testsuites/ada/tmtests/tm07/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 7"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm07/tmtest.adb b/testsuites/ada/tmtests/tm07/tmtest.adb
index c3a2c62b96..4f2f4abdbd 100644
--- a/testsuites/ada/tmtests/tm07/tmtest.adb
+++ b/testsuites/ada/tmtests/tm07/tmtest.adb
@@ -38,7 +38,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 7 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -114,7 +114,7 @@ package body TMTEST is
          RTEMS.TASKS.SUSPEND( RTEMS.SELF, STATUS );
       end if;
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 07 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm08/config.h b/testsuites/ada/tmtests/tm08/config.h
index ffb8dc3723..1c6324f773 100644
--- a/testsuites/ada/tmtests/tm08/config.h
+++ b/testsuites/ada/tmtests/tm08/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 8"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_MAXIMUM_SEMAPHORES         101
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
diff --git a/testsuites/ada/tmtests/tm08/tmtest.adb b/testsuites/ada/tmtests/tm08/tmtest.adb
index c1dbcb3e30..9f14c9383a 100644
--- a/testsuites/ada/tmtests/tm08/tmtest.adb
+++ b/testsuites/ada/tmtests/tm08/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 8 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -266,7 +266,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.CLOCK_GET
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 8 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TEST_TASK;
diff --git a/testsuites/ada/tmtests/tm09/config.h b/testsuites/ada/tmtests/tm09/config.h
index 5b40e5c8da..c14f17c385 100644
--- a/testsuites/ada/tmtests/tm09/config.h
+++ b/testsuites/ada/tmtests/tm09/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              2
+
+#define ADA_TEST_NAME "ADA TM 9"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm09/tmtest.adb b/testsuites/ada/tmtests/tm09/tmtest.adb
index 432a7b50a8..ee54c199d2 100644
--- a/testsuites/ada/tmtests/tm09/tmtest.adb
+++ b/testsuites/ada/tmtests/tm09/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 9 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          1,
@@ -108,7 +108,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_DELETE
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 9 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TEST_TASK;
diff --git a/testsuites/ada/tmtests/tm10/config.h b/testsuites/ada/tmtests/tm10/config.h
index 7d4d661a2e..fd96463749 100644
--- a/testsuites/ada/tmtests/tm10/config.h
+++ b/testsuites/ada/tmtests/tm10/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              110
+
+#define ADA_TEST_NAME "ADA TM 10"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm10/tmtest.adb b/testsuites/ada/tmtests/tm10/tmtest.adb
index 9a92266cf5..23e2513541 100644
--- a/testsuites/ada/tmtests/tm10/tmtest.adb
+++ b/testsuites/ada/tmtests/tm10/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 10 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -212,7 +212,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_RECEIVE 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 10 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm11/config.h b/testsuites/ada/tmtests/tm11/config.h
index f5412f0119..e4ed6d1c83 100644
--- a/testsuites/ada/tmtests/tm11/config.h
+++ b/testsuites/ada/tmtests/tm11/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 11"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm11/tmtest.adb b/testsuites/ada/tmtests/tm11/tmtest.adb
index 610c248d57..b454462e2f 100644
--- a/testsuites/ada/tmtests/tm11/tmtest.adb
+++ b/testsuites/ada/tmtests/tm11/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 11 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          1,
@@ -174,7 +174,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_SEND 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 11 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm12/config.h b/testsuites/ada/tmtests/tm12/config.h
index f5412f0119..1d9df47b78 100644
--- a/testsuites/ada/tmtests/tm12/config.h
+++ b/testsuites/ada/tmtests/tm12/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 12"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm12/tmtest.adb b/testsuites/ada/tmtests/tm12/tmtest.adb
index a97330f7bf..11a4f6abc1 100644
--- a/testsuites/ada/tmtests/tm12/tmtest.adb
+++ b/testsuites/ada/tmtests/tm12/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 12 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          1,
@@ -168,7 +168,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_SEND 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 12 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm13/config.h b/testsuites/ada/tmtests/tm13/config.h
index f5412f0119..b05713dd8d 100644
--- a/testsuites/ada/tmtests/tm13/config.h
+++ b/testsuites/ada/tmtests/tm13/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 13"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm13/tmtest.adb b/testsuites/ada/tmtests/tm13/tmtest.adb
index aa9a760f82..6bb8d3fb01 100644
--- a/testsuites/ada/tmtests/tm13/tmtest.adb
+++ b/testsuites/ada/tmtests/tm13/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 13 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          1,
@@ -172,7 +172,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_URGENT 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 13 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm14/config.h b/testsuites/ada/tmtests/tm14/config.h
index f5412f0119..ee8a005be0 100644
--- a/testsuites/ada/tmtests/tm14/config.h
+++ b/testsuites/ada/tmtests/tm14/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 14"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm14/tmtest.adb b/testsuites/ada/tmtests/tm14/tmtest.adb
index adde5deb77..b2f676e189 100644
--- a/testsuites/ada/tmtests/tm14/tmtest.adb
+++ b/testsuites/ada/tmtests/tm14/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 14 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          1,
@@ -179,7 +179,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_URGENT 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 14 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm15/config.h b/testsuites/ada/tmtests/tm15/config.h
index f5412f0119..1753ca083c 100644
--- a/testsuites/ada/tmtests/tm15/config.h
+++ b/testsuites/ada/tmtests/tm15/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 15"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm15/tmtest.adb b/testsuites/ada/tmtests/tm15/tmtest.adb
index 2a7efedcf9..33ff7df2f0 100644
--- a/testsuites/ada/tmtests/tm15/tmtest.adb
+++ b/testsuites/ada/tmtests/tm15/tmtest.adb
@@ -38,7 +38,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 15 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -232,7 +232,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.EVENT_SEND 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 15 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm16/config.h b/testsuites/ada/tmtests/tm16/config.h
index f5412f0119..324be4e677 100644
--- a/testsuites/ada/tmtests/tm16/config.h
+++ b/testsuites/ada/tmtests/tm16/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 16"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm16/tmtest.adb b/testsuites/ada/tmtests/tm16/tmtest.adb
index 4be7a6bbd6..982adc8684 100644
--- a/testsuites/ada/tmtests/tm16/tmtest.adb
+++ b/testsuites/ada/tmtests/tm16/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 16 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'E', 'S', 'T' ),
@@ -188,7 +188,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.EVENT_SEND 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 16 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end HIGH_TASK;
diff --git a/testsuites/ada/tmtests/tm17/config.h b/testsuites/ada/tmtests/tm17/config.h
index f5412f0119..9eb0d0f1a6 100644
--- a/testsuites/ada/tmtests/tm17/config.h
+++ b/testsuites/ada/tmtests/tm17/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 17"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm17/tmtest.adb b/testsuites/ada/tmtests/tm17/tmtest.adb
index 5e645581d4..1e093c839e 100644
--- a/testsuites/ada/tmtests/tm17/tmtest.adb
+++ b/testsuites/ada/tmtests/tm17/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 17 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TASK_PRIORITY := 254;
 
@@ -147,7 +147,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_SET_PRIORITY 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 17 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LAST_TASK;
diff --git a/testsuites/ada/tmtests/tm18/config.h b/testsuites/ada/tmtests/tm18/config.h
index f5412f0119..cebc0653d9 100644
--- a/testsuites/ada/tmtests/tm18/config.h
+++ b/testsuites/ada/tmtests/tm18/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 18"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm18/tmtest.adb b/testsuites/ada/tmtests/tm18/tmtest.adb
index e86b24cd4a..25c4594318 100644
--- a/testsuites/ada/tmtests/tm18/tmtest.adb
+++ b/testsuites/ada/tmtests/tm18/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 18 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.TEST_INIT;
 
@@ -143,7 +143,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_DELETE 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 18 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LAST_TASK;
diff --git a/testsuites/ada/tmtests/tm19/config.h b/testsuites/ada/tmtests/tm19/config.h
index f5412f0119..b41632e8a2 100644
--- a/testsuites/ada/tmtests/tm19/config.h
+++ b/testsuites/ada/tmtests/tm19/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 19"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm19/tmtest.adb b/testsuites/ada/tmtests/tm19/tmtest.adb
index 288a6a799d..df05cb42ed 100644
--- a/testsuites/ada/tmtests/tm19/tmtest.adb
+++ b/testsuites/ada/tmtests/tm19/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 19 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'I', 'M', 'E' ),
@@ -279,7 +279,7 @@ package body TMTEST is
          0
      );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 19 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
      RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TASK_3;
diff --git a/testsuites/ada/tmtests/tm20/config.h b/testsuites/ada/tmtests/tm20/config.h
index 5ba47ff16a..2085f4ea0b 100644
--- a/testsuites/ada/tmtests/tm20/config.h
+++ b/testsuites/ada/tmtests/tm20/config.h
@@ -21,6 +21,8 @@
 #define CONFIGURE_MAXIMUM_PARTITIONS         1
 #define CONFIGURE_MAXIMUM_REGIONS            1
 #define CONFIGURE_MAXIMUM_TASKS              3
+
+#define ADA_TEST_NAME "ADA TM 20"
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
 #define CONFIGURE_POSIX_INIT_THREAD_TABLE
diff --git a/testsuites/ada/tmtests/tm20/tmtest.adb b/testsuites/ada/tmtests/tm20/tmtest.adb
index 4a997f3ff4..d17e660d72 100644
--- a/testsuites/ada/tmtests/tm20/tmtest.adb
+++ b/testsuites/ada/tmtests/tm20/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 20 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'I', 'M', '1' ),
@@ -394,7 +394,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.REGION_DELETE 
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 20 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TASK_1;
diff --git a/testsuites/ada/tmtests/tm21/config.h b/testsuites/ada/tmtests/tm21/config.h
index 92e63bd2e9..1398cd6a86 100644
--- a/testsuites/ada/tmtests/tm21/config.h
+++ b/testsuites/ada/tmtests/tm21/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              102
+
+#define ADA_TEST_NAME "ADA TM 21"
 #define CONFIGURE_MAXIMUM_TIMERS             100
 #define CONFIGURE_MAXIMUM_SEMAPHORES         100
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     100
diff --git a/testsuites/ada/tmtests/tm21/tmtest.adb b/testsuites/ada/tmtests/tm21/tmtest.adb
index 245376953d..9cf2d09e86 100644
--- a/testsuites/ada/tmtests/tm21/tmtest.adb
+++ b/testsuites/ada/tmtests/tm21/tmtest.adb
@@ -46,7 +46,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 21 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'I', 'M', 'E' ),
@@ -296,7 +296,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.RATE_MONOTONIC_IDENT
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 21 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end TASK_1;
diff --git a/testsuites/ada/tmtests/tm22/config.h b/testsuites/ada/tmtests/tm22/config.h
index 2bceeec20d..7da538839e 100644
--- a/testsuites/ada/tmtests/tm22/config.h
+++ b/testsuites/ada/tmtests/tm22/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              103
+
+#define ADA_TEST_NAME "ADA TM 22"
 #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES     1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm22/tmtest.adb b/testsuites/ada/tmtests/tm22/tmtest.adb
index ea1afc84c9..0ef326b97d 100644
--- a/testsuites/ada/tmtests/tm22/tmtest.adb
+++ b/testsuites/ada/tmtests/tm22/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 22 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.MESSAGE_QUEUE.CREATE( 
          RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ),
@@ -215,7 +215,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.MESSAGE_QUEUE_BROADCAST
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 22 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm23/config.h b/testsuites/ada/tmtests/tm23/config.h
index 1873730f52..98fcf60487 100644
--- a/testsuites/ada/tmtests/tm23/config.h
+++ b/testsuites/ada/tmtests/tm23/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 23"
 #define CONFIGURE_MAXIMUM_TIMERS             110
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm23/tmtest.adb b/testsuites/ada/tmtests/tm23/tmtest.adb
index 4b5a26f777..6115416f1b 100644
--- a/testsuites/ada/tmtests/tm23/tmtest.adb
+++ b/testsuites/ada/tmtests/tm23/tmtest.adb
@@ -43,7 +43,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 23 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TASK_PRIORITY := 5;
 
@@ -380,7 +380,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_WAKE_WHEN
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 23 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm24/config.h b/testsuites/ada/tmtests/tm24/config.h
index 0e9cbf456d..207ac7eed3 100644
--- a/testsuites/ada/tmtests/tm24/config.h
+++ b/testsuites/ada/tmtests/tm24/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 24"
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
 #define CONFIGURE_POSIX_INIT_THREAD_TABLE
diff --git a/testsuites/ada/tmtests/tm24/tmtest.adb b/testsuites/ada/tmtests/tm24/tmtest.adb
index 2bcd220516..b5830cef7b 100644
--- a/testsuites/ada/tmtests/tm24/tmtest.adb
+++ b/testsuites/ada/tmtests/tm24/tmtest.adb
@@ -40,7 +40,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 24 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TIMER_DRIVER.INITIALIZE;
          for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT
@@ -148,7 +148,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.TASK_WAKE_AFTER
          );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 24 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
          RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
       end if;
diff --git a/testsuites/ada/tmtests/tm25/config.h b/testsuites/ada/tmtests/tm25/config.h
index 0a37e7f8e6..79b6724665 100644
--- a/testsuites/ada/tmtests/tm25/config.h
+++ b/testsuites/ada/tmtests/tm25/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 25"
 #define CONFIGURE_MAXIMUM_SEMAPHORES         1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm25/tmtest.adb b/testsuites/ada/tmtests/tm25/tmtest.adb
index 8710052bfb..63d68d4aa1 100644
--- a/testsuites/ada/tmtests/tm25/tmtest.adb
+++ b/testsuites/ada/tmtests/tm25/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 25 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.SEMAPHORE.CREATE(
          RTEMS.BUILD_NAME( 'S', 'M', '1', ' ' ),
@@ -147,7 +147,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.CLOCK_TICK
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 25 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tm28/config.h b/testsuites/ada/tmtests/tm28/config.h
index d050077d01..aca19475c3 100644
--- a/testsuites/ada/tmtests/tm28/config.h
+++ b/testsuites/ada/tmtests/tm28/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              2
+
+#define ADA_TEST_NAME "ADA TM 28"
 #define CONFIGURE_MAXIMUM_PORTS              1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm28/tmtest.adb b/testsuites/ada/tmtests/tm28/tmtest.adb
index 189090e39f..71b6edc32f 100644
--- a/testsuites/ada/tmtests/tm28/tmtest.adb
+++ b/testsuites/ada/tmtests/tm28/tmtest.adb
@@ -38,7 +38,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 28 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       RTEMS.TASKS.CREATE( 
          RTEMS.BUILD_NAME( 'T', 'E', 'S', 'T' ),
@@ -163,7 +163,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.PORT_DELETE
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 28 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
  
    end TEST_TASK;
diff --git a/testsuites/ada/tmtests/tm29/config.h b/testsuites/ada/tmtests/tm29/config.h
index 85aa0d9efa..fd99933160 100644
--- a/testsuites/ada/tmtests/tm29/config.h
+++ b/testsuites/ada/tmtests/tm29/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              111
+
+#define ADA_TEST_NAME "ADA TM 29"
 #define CONFIGURE_MAXIMUM_PERIODS            111
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tm29/tmtest.adb b/testsuites/ada/tmtests/tm29/tmtest.adb
index 0a6a31b713..c77fbc0abd 100644
--- a/testsuites/ada/tmtests/tm29/tmtest.adb
+++ b/testsuites/ada/tmtests/tm29/tmtest.adb
@@ -41,7 +41,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST 29 ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TMTEST.PERIOD_NAME := RTEMS.BUILD_NAME( 'P', 'R', 'D', ' ' );
 
@@ -228,7 +228,7 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.RATE_MONOTONIC_PERIOD
       );
    
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST 29 ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
 
    end LOW_TASK;
diff --git a/testsuites/ada/tmtests/tmck/config.h b/testsuites/ada/tmtests/tmck/config.h
index fac8bedb98..40b56220a9 100644
--- a/testsuites/ada/tmtests/tmck/config.h
+++ b/testsuites/ada/tmtests/tmck/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              2
+
+#define ADA_TEST_NAME "ADA TMCK"
 #define CONFIGURE_MAXIMUM_SEMAPHORES         1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tmck/tmtest.adb b/testsuites/ada/tmtests/tmck/tmtest.adb
index 8da1ff220a..d1d7659988 100644
--- a/testsuites/ada/tmtests/tmck/tmtest.adb
+++ b/testsuites/ada/tmtests/tmck/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST CHECK ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TIMER_DRIVER.SET_FIND_AVERAGE_OVERHEAD( TRUE );
 
@@ -149,7 +149,7 @@ TEST_SUPPORT.PAUSE;
          0
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST CHECK ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
    
    end TASK_1;
diff --git a/testsuites/ada/tmtests/tmoverhd/config.h b/testsuites/ada/tmtests/tmoverhd/config.h
index fac8bedb98..df551c90fe 100644
--- a/testsuites/ada/tmtests/tmoverhd/config.h
+++ b/testsuites/ada/tmtests/tmoverhd/config.h
@@ -19,6 +19,8 @@
 #define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
 
 #define CONFIGURE_MAXIMUM_TASKS              2
+
+#define ADA_TEST_NAME "ADA TMOVERHD"
 #define CONFIGURE_MAXIMUM_SEMAPHORES         1
 #define CONFIGURE_TICKS_PER_TIMESLICE        0
 
diff --git a/testsuites/ada/tmtests/tmoverhd/tmtest.adb b/testsuites/ada/tmtests/tmoverhd/tmtest.adb
index 58c5ad09c6..d271ed220c 100644
--- a/testsuites/ada/tmtests/tmoverhd/tmtest.adb
+++ b/testsuites/ada/tmtests/tmoverhd/tmtest.adb
@@ -39,7 +39,7 @@ package body TMTEST is
    begin
 
       TEXT_IO.NEW_LINE( 2 );
-      TEXT_IO.PUT_LINE( "*** TIME TEST OVERHEAD ***" );
+      TEST_SUPPORT.ADA_TEST_BEGIN;
 
       TIMER_DRIVER.SET_FIND_AVERAGE_OVERHEAD( TRUE );
 
@@ -1355,7 +1355,7 @@ TEST_SUPPORT.PAUSE;
          0
       );
 
-      TEXT_IO.PUT_LINE( "*** END OF TIME TEST OVERHEAD ***" );
+      TEST_SUPPORT.ADA_TEST_END;
       RTEMS.SHUTDOWN_EXECUTIVE( 0 );
    
    end TASK_1;