> 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;