[Bug ada/33994] wrong code for indexed component when index subtype has 'Size > 32

[bauhaus at futureapps dot de]

------- Comment #2 from bauhaus at futureapps dot de  2007-11-04 23:02 -------
Side note: With a special command line, this program
triggers a bug box with gcc 4.1.3 (Ubuntu 7.10 i686).

$ gnatmake -W -S -march=x86-64 -m64 -Os too_big.adb
gcc-4.1 -c -W -S -march=x86-64 -m64 -Os too_big.adb
+===========================GNAT BUG DETECTED==============================+
| 4.1.3 20070929 (prerelease) (Ubuntu 4.1.2-16ubuntu3) (i486-pc-linux-gnu) GCC
error:|
| in pro_epilogue_adjust_stack, at config/i386/i386.c:5094                 |
| Error detected at too_big.adb:41: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.1 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.

too_big.adb


raised TYPES.UNRECOVERABLE_ERROR : comperr.adb:380
gnatmake: "too_big.adb" compilation error

I cannot currently check this with a 4.3 compiler because when I
configure ... --enable-targets=all, I get

make[8]: Entering directory
`/home/georg/src/build/i686-pc-linux-gnu/64/libmudflap'
if /bin/bash ./libtool --tag=CC --mode=compile /home/georg/src/build/./gcc/xgcc
-B/home/georg/src/build/./gcc/ -B/opt/GCC/43/i686-pc-linux-gnu/bin/
-B/opt/GCC/43/i686-pc-linux-gnu/lib/ -isystem
/opt/GCC/43/i686-pc-linux-gnu/include -isystem
/opt/GCC/43/i686-pc-linux-gnu/sys-include  -m64 -DHAVE_CONFIG_H -I.
-I../../../../gcc/libmudflap -I.    -Wall -ffunction-sections -fdata-sections
-O2 -g -O2    -m64 -MT mf-runtime.lo -MD -MP -MF ".deps/mf-runtime.Tpo" -c -o
mf-runtime.lo ../../../../gcc/libmudflap/mf-runtime.c; \
        then mv -f ".deps/mf-runtime.Tpo" ".deps/mf-runtime.Plo"; else rm -f
".deps/mf-runtime.Tpo"; exit 1; fi
libtool: compile:  /home/georg/src/build/./gcc/xgcc
-B/home/georg/src/build/./gcc/ -B/opt/GCC/43/i686-pc-linux-gnu/bin/
-B/opt/GCC/43/i686-pc-linux-gnu/lib/ -isystem
/opt/GCC/43/i686-pc-linux-gnu/include -isystem
/opt/GCC/43/i686-pc-linux-gnu/sys-include -m64 -DHAVE_CONFIG_H -I.
-I../../../../gcc/libmudflap -I. -Wall -ffunction-sections -fdata-sections -O2
-g -O2 -m64 -MT mf-runtime.lo -MD -MP -MF .deps/mf-runtime.Tpo -c
../../../../gcc/libmudflap/mf-runtime.c  -fPIC -DPIC -o .libs/mf-runtime.o
../../../../gcc/libmudflap/mf-runtime.c:172: error: conflicting types for
'__mf_lc_mask'
../../../../gcc/libmudflap/mf-runtime.h:51: error: previous declaration of
'__mf_lc_mask' was here
...


-- 


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