https://gcc.gnu.org/bugzilla/show_bug.cgi?id=103609
Bug ID: 103609 Summary: [11/12 Regression] ICE in gfc_sym_get_dummy_args, at fortran/symbol.c:5243 Product: gcc Version: 12.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gs...@t-online.de Target Milestone: --- Changed between 20200726 and 20200809 : (gcc configured with --enable-checking=yes) $ cat z1.f90 program p implicit none integer :: i do i = 1, 2 call s end do contains subroutine s integer :: n call n end end $ gfortran-12-20211205 -c z1.f90 z1.f90:9:18: 9 | integer :: n | 1 10 | call n | 2 Error: 'n' at (1) has a type, which is not consistent with the CALL at (2) f951: internal compiler error: Segmentation fault 0xf0b99f crash_signal ../../gcc/toplev.c:322 0x87f8f0 gfc_sym_get_dummy_args(gfc_symbol*) ../../gcc/fortran/symbol.c:5243 0x94ec51 doloop_contained_procedure_code ../../gcc/fortran/frontend-passes.c:2483 0x954519 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int (*)(gfc_expr**, int*, void*), void*) ../../gcc/fortran/frontend-passes.c:5333 0x956a32 doloop_code ../../gcc/fortran/frontend-passes.c:2627 0x954519 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int (*)(gfc_expr**, int*, void*), void*) ../../gcc/fortran/frontend-passes.c:5333 0x954697 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int (*)(gfc_expr**, int*, void*), void*) ../../gcc/fortran/frontend-passes.c:5669 0x95570b doloop_warn ../../gcc/fortran/frontend-passes.c:3059 0x955c5a gfc_run_passes(gfc_namespace*) ../../gcc/fortran/frontend-passes.c:156 0x856467 gfc_resolve(gfc_namespace*) ../../gcc/fortran/resolve.c:17572 0x83e764 resolve_all_program_units ../../gcc/fortran/parse.c:6586 0x83e764 gfc_parse_file() ../../gcc/fortran/parse.c:6842 0x88c73f gfc_be_parse_file ../../gcc/fortran/f95-lang.c:216