From: Ghjuvan Lacambre <lacambre@adacore.com>
Date: Wed, 16 Nov 2022 14:53:17 +0000 (+0100)
Subject: ada: Disable subprogram call validation in CodePeer mode
X-Git-Tag: basepoints/gcc-14~3014
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7dcf757a5192d399295736b57d63a73136523bcb;p=thirdparty%2Fgcc.git

ada: Disable subprogram call validation in CodePeer mode

CodePeer builds with assertions enabled started failing when this
validation was introduced. We temporarily disable this validation for
CodePeer in order to buy time before fixing the underlying issue.

gcc/ada/

	* frontend.adb (Frontend): Disable subprogram call validation.
---

diff --git a/gcc/ada/frontend.adb b/gcc/ada/frontend.adb
index 033ecf3b7be7..bc3da30b0cf2 100644
--- a/gcc/ada/frontend.adb
+++ b/gcc/ada/frontend.adb
@@ -531,7 +531,7 @@ begin
    --  formals). It is invoked using pragma Debug to avoid adding any cost
    --  when the compiler is built with assertions disabled.
 
-   if not Debug_Flag_Underscore_XX then
+   if not Debug_Flag_Underscore_XX and then not CodePeer_Mode then
       pragma Debug (Exp_Ch6.Validate_Subprogram_Calls (Cunit (Main_Unit)));
    end if;