[Bug ada/56474] [4.8/4.9 regression] bogus Storage_Error raised for record containing empty zero-based array

[ebotcazou at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56474

--- Comment #20 from Eric Botcazou <ebotcazou at gcc dot gnu.org> 2013-05-07 08:07:45 UTC ---
Author: ebotcazou
Date: Tue May  7 08:03:15 2013
New Revision: 198664

URL: http://gcc.gnu.org/viewcvs?rev=198664&root=gcc&view=rev
Log:
    PR ada/56474
    * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Use
    int_const_binop to shift bounds by 1 when they are integer constants.

Added:
    branches/gcc-4_8-branch/gcc/testsuite/gnat.dg/specs/array3.ads
      - copied unchanged from r198663,
trunk/gcc/testsuite/gnat.dg/specs/array3.ads
Modified:
    branches/gcc-4_8-branch/gcc/ada/ChangeLog
    branches/gcc-4_8-branch/gcc/ada/gcc-interface/decl.c
    branches/gcc-4_8-branch/gcc/testsuite/ChangeLog