ada/6662: "avr-gcc -x ada" detected an error

Wed May 15 02:16:00 GMT 2002

>Number:         6662
>Category:       ada
>Synopsis:       "avr-gcc -x ada" detected an error
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Wed May 15 02:16:01 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator:     Thomas Maier-Komor
>Release:        3.1 (20020501)
>Organization:
>Environment:
host: athlon linux pc
target: avr

Configured with: ../gcc/configure --prefix=/user/maierkom/avr --enable-languages=c,ada --with-gnu-as --with-gnu-ld --with-as=/NET/peejay/user/maierkom/avr/bin/avr-as --with-ld=/NET/peejay/user/maierkom/avr/bin/avr-ld --target=avr : (reconfigured) 
Thread model: single

>Description:
gcc says:
+===========================GNAT BUG DETECTED==============================+
| 3.1 (20020501) (avr-unknown-none) Storage_Error stack overflow (or erroneous memory access)|
| Error detected at test.adb:4:11                                          |
| 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).                   |
+==========================================================================+
>How-To-Repeat:

>Fix:

>Release-Note:
>Audit-Trail:
>Unformatted:
----gnatsweb-attachment----
Content-Type: application/octet-stream; name="test.adb"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="test.adb"

d2l0aCBTeXN0ZW0uTWFjaGluZV9Db2RlOyB1c2UgU3lzdGVtLk1hY2hpbmVfQ29kZTsKd2l0aCBJ
bnRlcmZhY2VzLkM7IHVzZSBJbnRlcmZhY2VzLkM7Cgpwcm9jZWR1cmUgdGVzdCBpcwoJcHJvY2Vk
dXJlIFNlcmlhbF9QdXQobXNnIDogY2hhcl9hcnJheSk7CglwcmFnbWEgSW1wb3J0KEMsU2VyaWFs
X1B1dCwiU2VyaWFsUHV0TFBTdHJpbmciKTsKCglwcm9jZWR1cmUgZGVidWdtc2cobXNnIDogU3Ry
aW5nKSBpcwoJYmVnaW4KCQlTZXJpYWxfUHV0KFRvX0MobXNnKSk7CgllbmQgZGVidWdtc2c7CgkK
CmJlZ2luCgludWxsOwplbmQgdGVzdDsK