[rtems commit] ada/tm04: Account for task delete behaviour change

[Sebastian Huber]

Module:    rtems
Branch:    master
Commit:    215fa231772beb5cfe5b0b47765a62b08301e8b6
Changeset: http://git.rtems.org/rtems/commit/?id=215fa231772beb5cfe5b0b47765a62b08301e8b6

Author:    Sebastian Huber <sebastian.huber at embedded-brains.de>
Date:      Mon Dec  4 09:38:25 2017 +0100

ada/tm04: Account for task delete behaviour change

---

 testsuites/ada/tmtests/tm04/tmtest.adb | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/testsuites/ada/tmtests/tm04/tmtest.adb b/testsuites/ada/tmtests/tm04/tmtest.adb
index 581a15a..30ab443 100644
--- a/testsuites/ada/tmtests/tm04/tmtest.adb
+++ b/testsuites/ada/tmtests/tm04/tmtest.adb
@@ -196,6 +196,15 @@ package body TMTEST is
          RTEMS_CALLING_OVERHEAD.SEMAPHORE_RELEASE
       );
 
+      -- All low priority (non-preemptible) tasks are ready now.  We must
+      -- prevent them from running (this would result in an invalid task exit),
+      -- since the rtems_task_delete() performs an implicit join.
+      for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT
+      loop
+         RTEMS.TASKS.SUSPEND( TMTEST.TASK_ID( INDEX ), STATUS );
+         TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_SUSPEND" );
+      end loop;
+
       for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT
       loop
          RTEMS.TASKS.DELETE( TMTEST.TASK_ID( INDEX ), STATUS );