From: Eric Botcazou <ebotcazou@adacore.com>
Date: Mon, 8 Sep 2025 17:18:59 +0000 (+0200)
Subject: Testsuite: Fix spurious of ACATS-4 test cxai033
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7640cc5ef80afae9b65afcca96e1eb2b9e513c21;p=thirdparty%2Fgcc.git

Testsuite: Fix spurious of ACATS-4 test cxai033

This tentatively applies the same tweak as in other similar cases.

gcc/testsuite/
	PR ada/121532
	* ada/acats-4/tests/cxa/cxai033.a: Use Long_Switch_To_New_Task
	constant instead of Switch_To_New_Task in delay statements.
---

diff --git a/gcc/testsuite/ada/acats-4/tests/cxa/cxai033.a b/gcc/testsuite/ada/acats-4/tests/cxa/cxai033.a
index 90bd3f60279..921655bcc62 100644
--- a/gcc/testsuite/ada/acats-4/tests/cxa/cxai033.a
+++ b/gcc/testsuite/ada/acats-4/tests/cxa/cxai033.a
@@ -116,7 +116,7 @@ begin
 
    -- Give time for Reader_1 to activate.
 
-   delay Impdef.Switch_To_New_Task;
+   delay Impdef.Long_Switch_To_New_Task;
 
    if not Reader_1_Blocked then
 
@@ -145,7 +145,7 @@ begin
 
       -- Give time for Writer_1 to activate;
 
-      delay Impdef.Switch_To_New_Task;
+      delay Impdef.Long_Switch_To_New_Task;
 
       if Reader_1_Blocked then