[Bug ada/17921] New: ICE on legal code: using the address of an array component

[duncan dot sands at free dot fr]

$ gcc -c b.ads 
b.ads: In function 'B._Elabs': 
b.ads:1: error: Invalid operand to unary operator 
D.399 
 
+===========================GNAT BUG DETECTED==============================+ 
| 4.0.0 20041005 (experimental) (i686-pc-linux-gnu) verify_stmts failed.   | 
| No source file position information available                            | 
| Please submit a bug report; see http://gcc.gnu.org/bugs.html.            | 
| Include the entire contents of this bug box in the report.               | 
| Include the exact gcc 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. 
 
b.ads 
 
compilation abandoned 
 
---chop here--- 
package B is 
   An_Array : array (Boolean) of Character; 
   An_Object : Character; 
   for An_Object'Address use An_Array (True)'Address; 
   pragma Import (Ada, An_Object); 
end B;

-- 
           Summary: ICE on legal code: using the address of an array
                    component
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: ada
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: duncan dot sands at free dot fr
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


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