ada/tm04: Account for task delete behaviour change

This commit is contained in:
Sebastian Huber
2017-12-04 09:38:25 +01:00
parent 76bd25e908
commit 215fa23177

View File

@@ -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 );