[Bug ada/38393] New: Storage_Error, bug box on record with large array component

[michael dot voelske at medien dot uni-weimar dot de]

procedure Main is
    type Arr is array (Natural) of Natural;

    type Rec is record
            A : Arr := (others => 0); 
        end record;
begin
    null;
end;

------------

gcc-4.3 -c main.adb
+===========================GNAT BUG DETECTED==============================+
| 4.3.2 (i486-pc-linux-gnu) Storage_Error heap exhausted                   |
| Error detected at main.adb:4:5                                           |
| Please submit a bug report; see http://gcc.gnu.org/bugs.html.            |
| Use a subject line meaningful to you and us to track the bug.            |
| Include the entire contents of this bug box in the report.               |
| Include the exact gcc-4.3 or gnatmake command that you entered.          |
| Also include sources listed below in gnatchop format                     |
| (concatenated together with no headers between files).                   |
+==========================================================================+

Please include these source files with error report
Note that list may not be accurate in some cases,
so please double check that the problem can still
be reproduced with the set of files listed.

list may be incomplete
compilation abandoned
End of compilation
gnatmake: "main.adb" compilation error


-- 
           Summary: Storage_Error, bug box on record with large array
                    component
           Product: gcc
           Version: 4.3.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: ada
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: michael dot voelske at medien dot uni-weimar dot de


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