[Bug ada/11978] New: gnat1 crashes in a-tags.adb

["www dot sd at gmx dot net" <gcc-bugzilla at gcc dot gnu dot org>]

PLEASE REPLY TO gcc-bugzilla@gcc.gnu.org ONLY, *NOT* gcc-bugs@gcc.gnu.org.

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

           Summary: gnat1 crashes in a-tags.adb
           Product: gcc
           Version: 3.3.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: ada
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: www dot sd at gmx dot net
                CC: gcc-bugs at gcc dot gnu dot org,www dot sd at gmx dot
                    net
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu

gcc -v gives
Reading specs from
/projects/tmp/simondl/gcc3/lib/gcc-lib/i686-pc-linux-gnu/3.3.1/specs
Configured with: ../gcc-3.3.1/configure --enable-languages=c,ada
--prefix=/projects/tmp/simondl/gcc3
Thread model: posix
gcc version 3.3.1

The bug also can be reproduced on sparc-linux and sparc-solaris. Just compile
the following

package Bang is   
   type T is tagged null record;   
   for T'External_Tag use "tee";
   type S is new T with null record;
end Bang;