RTOS/rtems
1
0
Fork 0
forked from Imagelibrary/rtems
Code Pull Requests Activity

ada: Add standard test begin/end message

Browse Source
This commit is contained in:
Sebastian Huber
2017-12-01 08:51:17 +01:00
parent 6899a8d79d
commit f6c9334d9b
144 changed files with 324 additions and 144 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
testsuites/ada/samples/base_mp/config.h
View File

@@ -20,6 +20,8 @@
#define CONFIGURE_MAXIMUM_TASKS 2
#define ADA_TEST_NAME "ADA BASE MP"
#define CONFIGURE_POSIX_INIT_THREAD_TABLE
#define CONFIGURE_MAXIMUM_POSIX_THREADS 10

4
testsuites/ada/samples/base_mp/mptest.adb
View File

@@ -39,7 +39,7 @@ package body MPTEST is
begin
TEXT_IO.NEW_LINE( 2 );
TEXT_IO.PUT( "*** SAMPLE MULTIPROCESSOR APPLICATION ***" );
TEST_SUPPORT.ADA_TEST_BEGIN;
TEXT_IO.PUT( "Creating and starting an application task" );
@@ -91,7 +91,7 @@ package body MPTEST is
UNSIGNED32_IO.PUT( TID, BASE => 16 );
TEXT_IO.NEW_LINE;
TEXT_IO.PUT_LINE( "*** END OF SAMPLE MULTIPROCESSOR APPLICATION ***" );
TEST_SUPPORT.ADA_TEST_END;
RTEMS.SHUTDOWN_EXECUTIVE( 0 );