From: Arnaud Charlet <charlet@adacore.com>
Date: Mon, 28 May 2018 08:54:11 +0000 (+0000)
Subject: [Ada] Disregard alignment issues in CodePeer mode
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f167c73516dcce0e9b0f659a8ca9bdbaf10f8097;p=gcc.git

[Ada] Disregard alignment issues in CodePeer mode

2018-05-28  Arnaud Charlet  <charlet@adacore.com>

gcc/ada/

	* exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
	codepeer mode.

From-SVN: r260828
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 3ef9e4f0631..a9f89f5749c 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2018-05-28  Arnaud Charlet  <charlet@adacore.com>
+
+	* exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
+	codepeer mode.
+
 2018-05-28  Arnaud Charlet  <charlet@adacore.com>
 
 	* exp_unst.adb: Fix typo.
diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb
index e1b92f322e6..05789cd13ed 100644
--- a/gcc/ada/exp_util.adb
+++ b/gcc/ada/exp_util.adb
@@ -10738,6 +10738,12 @@ package body Exp_Util is
          return False;
       end if;
 
+      --  There are never alignment issues in CodePeer mode
+
+      if CodePeer_Mode then
+         return False;
+      end if;
+
       case Nkind (N) is
 
          --  Case of indexed component