[Bug fortran/42772] ICE at fold-const.c:10033

[dominiq at lps dot ens dot fr]

------- Comment #2 from dominiq at lps dot ens dot fr  2010-01-16 23:41 -------
This is a regression introduced after revision 154654 (working). Backtrace:

(gdb) run -frecursive -fcheck=all pr42772.f90
Starting program: /opt/gcc/gcc4.5w/libexec/gcc/x86_64-apple-darwin10/4.5.0/f951
-frecursive -fcheck=all pr42772.f90
Reading symbols for shared libraries .++++++++++++..... done
 MAIN__
Program received signal EXC_BAD_ACCESS, Could not access memory.
Reason: KERN_INVALID_ADDRESS at address: 0x0000000000000010
gfc_add_modify (pblock=0x7fff5fbfeb40, lhs=0x0, rhs=0x141d213c0) at
../../work/gcc/fortran/trans.c:164
164       t2 = TREE_TYPE (lhs);
(gdb) bt
#0  gfc_add_modify (pblock=0x7fff5fbfeb40, lhs=0x0, rhs=0x141d213c0) at
../../work/gcc/fortran/trans.c:164
#1  0x00000001000c38df in gfc_generate_function_code (ns=<value temporarily
unavailable, due to optimizations>) at ../../work/gcc/fortran/trans-decl.c:4463
#2  0x000000010006936f in gfc_parse_file () at
../../work/gcc/fortran/parse.c:4242
#3  0x00000001000a153c in gfc_be_parse_file (set_yydebug=<value temporarily
unavailable, due to optimizations>) at ../../work/gcc/fortran/f95-lang.c:239
#4  0x00000001006d129a in toplev_main (argc=4, argv=0x7fff5fbfed68) at
../../work/gcc/toplev.c:1053
#5  0x00000001000011e4 in start ()


-- 


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