[from Red Hat's FC15, fixes bootstrap failure due to RPM_OPT_FLAGS
 containing -Wall which triggers warnings in sem_util.adb causing
 the build process to terminate; I don't know why these particular
 warnings are so serious while other's aren't <mikpe@it.uu.se>]

--- gcc-4.6.3/gcc/ada/sem_util.adb.~1~	2010-12-20 08:26:57.000000000 +0100
+++ gcc-4.6.3/gcc/ada/sem_util.adb	2012-05-03 21:57:58.000000000 +0200
@@ -2527,7 +2527,11 @@ package body Sem_Util is
          end if;
 
       elsif Is_Entity_Name (A2) then
+
+         --  Triggered by -Wall
+         pragma Warnings (Off);
          return Denotes_Same_Prefix (A2, A1);
+         pragma Warnings (On);
 
       elsif Nkind_In (A1, N_Selected_Component, N_Indexed_Component, N_Slice)
               and then
@@ -4967,7 +4971,7 @@ package body Sem_Util is
             Exp           : Node_Id;
             Assn          : Node_Id;
             Choice        : Node_Id;
-            Comp_Type     : Entity_Id;
+            Comp_Type     : Entity_Id := Empty;
             Is_Array_Aggr : Boolean;
 
          begin