------- Comment #11 from bergner at gcc dot gnu dot org 2008-02-05 19:34 ------- Now we get a different ICE with the following test case:
[EMAIL PROTECTED]:~/gcc/PR29253/bugs> cat _abs_r16.f95 elemental function _gfortran_specific__abs_r16 (parm) real (kind=16), intent (in) :: parm real (kind=16) :: _gfortran_specific__abs_r16 _gfortran_specific__abs_r16 = abs (parm) end function [EMAIL PROTECTED]:~/gcc/PR29253/bugs> /home/bergner/gcc/PR29253/build/gcc-mainline-patched-v2/./gcc/gfortran -B/home/bergner/gcc/PR29253/build/gcc-mainline-patched-v2/./gcc/ -fallow-leading-underscore -O0 -msoft-float -c _abs_r16.f95 _abs_r16.f95: In function _gfortran_specific__abs_r16: _abs_r16.f95:4: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. GDB backtrace: Program received signal SIGSEGV, Segmentation fault. build_fold_addr_expr (t=0x0) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/fold-const.c:7905 7905 build_pointer_type (TREE_TYPE (t)), (gdb) bt 5 #0 build_fold_addr_expr (t=0x0) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/fold-const.c:7905 #1 0x101d16bc in expand_expr_real_1 (exp=0xf7ed2920, target=0xf7ed2c60, tmode=TFmode, modifier=EXPAND_NORMAL, alt_rtl=<value optimized out>) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/expr.c:8757 #2 0x101d16bc in expand_expr_real_1 (exp=0xf7ed2920, target=0xf7ed2c60, tmode=TFmode, modifier=EXPAND_NORMAL, alt_rtl=<value optimized out>) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/expr.c:8757 #3 0x101d16bc in expand_expr_real_1 (exp=0xf7ed2920, target=0xf7ed2c60, tmode=TFmode, modifier=EXPAND_NORMAL, alt_rtl=<value optimized out>) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/expr.c:8757 #4 0x101d16bc in expand_expr_real_1 (exp=0xf7ed2920, target=0xf7ed2c60, tmode=TFmode, modifier=EXPAND_NORMAL, alt_rtl=<value optimized out>) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/expr.c:8757 (More stack frames follow...) (gdb) frame 1 #1 0x101d16bc in expand_expr_real_1 (exp=0xf7ed2920, target=0xf7ed2c60, tmode=TFmode, modifier=EXPAND_NORMAL, alt_rtl=<value optimized out>) at /home/bergner/gcc/PR29253/gcc-mainline-patched/gcc/expr.c:8757 8757 tree call = build_fold_addr_expr (mathfn_built_in (type, BUILT_IN_FABS)); (gdb) ptree exp <abs_expr 0xf7ed2920 type <real_type 0xf7e9ac40 real(kind=16) TF size <integer_cst 0xf7fd7870 constant invariant 128> unit size <integer_cst 0xf7fd78a0 constant invariant 16> align 128 symtab 0 alias set -1 canonical type 0xf7e9ac40 precision 128 pointer_to_this <pointer_type 0xf7e9ad90> reference_to_this <reference_type 0xf7ed19a0>> arg 0 <var_decl 0xf7ed1af0 D.602 type <real_type 0xf7e9ac40 real(kind=16)> used ignored TF file _abs_r16.f95 line 5 col 0 size <integer_cst 0xf7fd7870 128> unit size <integer_cst 0xf7fd78a0 16> align 128 context <function_decl 0xf7ed3600 _gfortran_specific__abs_r16> (reg:TF 121 [ D.602 ]) chain <var_decl 0xf7ed1b60 __result__gfortran_specific__.0 type <real_type 0xf7e9ac40 real(kind=16)> used ignored TF file _abs_r16.f95 line 5 col 0 size <integer_cst 0xf7fd7870 128> unit size <integer_cst 0xf7fd78a0 16> align 128 context <function_decl 0xf7ed3600 _gfortran_specific__abs_r16> (reg:TF 120 [ __result__gfortran_specific__.0 ]) chain <var_decl 0xf7ed1bd0 D.604>>>> (gdb) pr target (reg:TF 120 [ __result__gfortran_specific__.0 ]) -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29253
