[Bug fortran/45161] New: ICE on gfortran.dg/typebound_proc_16.f03 with -std=f2003

["dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

When compiled with -std=f2003 gfortran.dg/typebound_proc_16.f03 yields an ICE:

/opt/gcc/work/gcc/testsuite/gfortran.dg/typebound_proc_16.f03:18.49:

    PROCEDURE,PRIVATE :: rat_asgn_i, rat_plus_rat, rat_plus_i
                                                 1
Error: Fortran 2008: PROCEDURE list at (1)
/opt/gcc/work/gcc/testsuite/gfortran.dg/typebound_proc_16.f03:22.29:

    GENERIC :: OPERATOR(+) => rat_plus_rat, rat_plus_i, i_plus_rat
                             1
Error: Undefined specific binding 'rat_plus_i' as target of GENERIC '+' at (1)
f951: internal compiler error: Segmentation fault

Backtrace:

Program received signal EXC_BAD_ACCESS, Could not access memory.
Reason: KERN_INVALID_ADDRESS at address: 0x0000007fffffffff
gfc_check_operator_interface (sym=0x14190af40, op=INTRINSIC_ASSIGN,
opwhere={nextc = 0x14191336c, lb = 0x1419132d0}) at
../../work/gcc/fortran/interface.c:572
572           gfc_symbol *fsym = formal->sym;
(gdb) bt
#0  gfc_check_operator_interface (sym=0x14190af40, op=INTRINSIC_ASSIGN,
opwhere={nextc = 0x14191336c, lb = 0x1419132d0}) at
../../work/gcc/fortran/interface.c:572
#1  0x00000001000823e2 in resolve_fl_derived (sym=0x1419166a0) at
../../work/gcc/fortran/resolve.c:10427
#2  0x0000000100081eb9 in resolve_fl_derived (sym=0x141917200) at
../../work/gcc/fortran/resolve.c:10842
#3  0x0000000100080268 in resolve_symbol (sym=0x141917200) at
../../work/gcc/fortran/resolve.c:11506
#4  0x0000000100093d70 in traverse_ns (st=<value temporarily unavailable, due
to optimizations>, func=0x10007f9e0 <resolve_symbol>) at
../../work/gcc/fortran/symbol.c:3357
#5  0x0000000100093d5e in traverse_ns (st=<value temporarily unavailable, due
to optimizations>, func=0x10007f9e0 <resolve_symbol>) at
../../work/gcc/fortran/symbol.c:3354
#6  0x000000010007e0c5 in resolve_types (ns=0x142036600) at
../../work/gcc/fortran/resolve.c:12971
#7  0x0000000100077310 in gfc_resolve (ns=0x142036600) at
../../work/gcc/fortran/resolve.c:13067
#8  0x000000010006b2d3 in gfc_parse_file () at
../../work/gcc/fortran/parse.c:4392
#9  0x00000001000a51ec in gfc_be_parse_file (set_yydebug=<value temporarily
unavailable, due to optimizations>) at ../../work/gcc/fortran/f95-lang.c:241
#10 0x000000010069a18a in toplev_main (argc=3, argv=0x7fff5fbfd958) at
../../work/gcc/toplev.c:945
#11 0x0000000100001814 in start ()


-- 
           Summary: ICE on gfortran.dg/typebound_proc_16.f03 with -std=f2003
           Product: gcc
           Version: 4.6.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dominiq at lps dot ens dot fr


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