From: Daniel Mercier <mercier@adacore.com>
Date: Thu, 14 Apr 2022 15:36:17 +0000 (+0200)
Subject: [Ada] Ignore Predicate_Failure in CodePeer mode
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e478e16e8a8a256c8c117f0bbe54a3078c086bc2;p=platform%2Fupstream%2Fgcc.git

[Ada] Ignore Predicate_Failure in CodePeer mode

gcc/ada/

	* sem_ch13.adb (Build_Predicate_Function): Ignore predicate
	failure in CodePeer mode.
---

diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb
index c12253c..c405d15 100644
--- a/gcc/ada/sem_ch13.adb
+++ b/gcc/ada/sem_ch13.adb
@@ -10493,6 +10493,7 @@ package body Sem_Ch13 is
 
                if Present (PF_Expr)
                  and then not GNATprove_Mode
+                 and then not CodePeer_Mode
                then
                   pragma Assert (Present (Second_Formal));