> 2011-05-27  Richard Guenther  <rguent...@suse.de>
>
>       PR middle-end/49189
>       * fold-const.c (fold_unary_loc): Do not re-fold folding conversions
>       of comparisons.
>
>       * gnat.dg/bit_packed_array5.adb: New testcase.
>       * gnat.dg/bit_packed_array5.ads: Likewise.

Thanks a lot!  I managed to mess up the dg stuff... fixed thusly, applied.


2011-05-27  Eric Botcazou  <ebotca...@adacore.com>

        * gnat.dg/bit_packed_array5.ads: Move dg directive to...
        * gnat.dg/bit_packed_array5.adb: ...here.


-- 
Eric Botcazou
Index: gnat.dg/bit_packed_array5.adb
===================================================================
--- gnat.dg/bit_packed_array5.adb	(revision 174335)
+++ gnat.dg/bit_packed_array5.adb	(working copy)
@@ -1,3 +1,5 @@
+-- { dg-do compile }
+
 with System;
 
 package body Bit_Packed_Array5 is
Index: gnat.dg/bit_packed_array5.ads
===================================================================
--- gnat.dg/bit_packed_array5.ads	(revision 174335)
+++ gnat.dg/bit_packed_array5.ads	(working copy)
@@ -1,5 +1,3 @@
--- { dg-do compile }
-
 package Bit_Packed_Array5 is
 
    type Bit_Array is array (Integer range <>) of Boolean;

Reply via email to