From: Boris Yakobowski <yakobowski@adacore.com>
Date: Wed, 21 Apr 2021 12:49:15 +0000 (+0200)
Subject: [Ada] Do not catch 'N rem -1' in CodePeer_Mode
X-Git-Tag: upstream/12.2.0~6691
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=afe5959e11727f6ff276bc1a7c62181306157504;p=platform%2Fupstream%2Fgcc.git

[Ada] Do not catch 'N rem -1' in CodePeer_Mode

gcc/ada/

	* exp_ch4.adb (Expand_N_Op_Rem): Remove special case for rem -1
	in CodePeer_Mode.
---

diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb
index a9fc270..54e91b2 100644
--- a/gcc/ada/exp_ch4.adb
+++ b/gcc/ada/exp_ch4.adb
@@ -10393,7 +10393,9 @@ package body Exp_Ch4 is
       --  types and this is really marginal). We will just assume that we need
       --  the test if the left operand can be negative at all.
 
-      if Lneg and Rneg then
+      if (Lneg and Rneg)
+         and then not CodePeer_Mode
+      then
          Rewrite (N,
            Make_If_Expression (Loc,
              Expressions => New_List (