summaryrefslogtreecommitdiffstats
path: root/testsuites/ada/sptests/spatcb01
diff options
context:
space:
mode:
authorSebastian Huber <sebastian.huber@embedded-brains.de>2017-12-01 08:51:17 +0100
committerSebastian Huber <sebastian.huber@embedded-brains.de>2017-12-01 09:52:41 +0100
commitf6c9334d9b78d8a9791b2ba3ab401c43fb6eb39e (patch)
tree2a06c91d9977552a5a42292fb9cbd8094b7f6485 /testsuites/ada/sptests/spatcb01
parentada: Delete superfluous CONFIGURE_SPTEST (diff)
downloadrtems-f6c9334d9b78d8a9791b2ba3ab401c43fb6eb39e.tar.bz2
ada: Add standard test begin/end message
Diffstat (limited to 'testsuites/ada/sptests/spatcb01')
-rw-r--r--testsuites/ada/sptests/spatcb01/config.h2
-rw-r--r--testsuites/ada/sptests/spatcb01/spatcb01.adb5
2 files changed, 5 insertions, 2 deletions
diff --git a/testsuites/ada/sptests/spatcb01/config.h b/testsuites/ada/sptests/spatcb01/config.h
index 530f0dddf8..dad989dbe4 100644
--- a/testsuites/ada/sptests/spatcb01/config.h
+++ b/testsuites/ada/sptests/spatcb01/config.h
@@ -13,4 +13,6 @@
#define CONFIGURE_MAXIMUM_POSIX_THREADS 1
+#define ADA_TEST_NAME "ADA SPATCB 1"
+
#include <rtems/confdefs.h>
diff --git a/testsuites/ada/sptests/spatcb01/spatcb01.adb b/testsuites/ada/sptests/spatcb01/spatcb01.adb
index 19aaa8031f..810446f871 100644
--- a/testsuites/ada/sptests/spatcb01/spatcb01.adb
+++ b/testsuites/ada/sptests/spatcb01/spatcb01.adb
@@ -14,13 +14,14 @@
--
with TEXT_IO;
+with TEST_SUPPORT;
with System.Task_Primitives.Operations;
with System.Tasking;
procedure SPATCB01 is
Self_Id : constant System.Tasking.Task_Id := System.Task_Primitives.Operations.Self;
begin
- TEXT_IO.PUT_LINE( "*** BEGIN OF TEST SPATCB 1 ***" );
+ TEST_SUPPORT.ADA_TEST_BEGIN;
TEXT_IO.PUT_LINE( Self_Id.Common.Task_Image( 1 .. Self_Id.Common.Task_Image_Len ) );
- TEXT_IO.PUT_LINE( "*** END OF TEST SPATCB 1 ***" );
+ TEST_SUPPORT.ADA_TEST_END;
end SPATCB01;