https://gcc.gnu.org/bugzilla/show_bug.cgi?id=113412
--- Comment #9 from kargls at comcast dot net --- On 8/26/24 12:04, anlauf at gcc dot gnu.org wrote: > subroutine s2 > external :: atan > real :: r = 1. > print *, atan (-1.d0,r) > end > > subroutine s3 > real :: r = 1. > print *, atan (-1.d0,r) ! Should give error similar to s1 case > end I agree this should generate an error. On x86_64-*-freebsd, I'm see gfcx -c -std=f2018 a.f90 f951: internal compiler error: Segmentation fault 0x10d4a57 crash_signal ../../gcc/gcc/toplev.cc:319 0x987fc9 sort_actual ../../gcc/gcc/fortran/intrinsic.cc:4451 0x988448 check_specific ../../gcc/gcc/fortran/intrinsic.cc:4865 0x9915c5 gfc_intrinsic_func_interface(gfc_expr*, int) ../../gcc/gcc/fortran/intrinsic.cc:5138 0x9fdd45 resolve_unknown_f ../../gcc/gcc/fortran/resolve.cc:3044 0x9fdd45 resolve_function ../../gcc/gcc/fortran/resolve.cc:3401 0x9fdd45 gfc_resolve_expr(gfc_expr*) ../../gcc/gcc/fortran/resolve.cc:7531 0xa073aa gfc_resolve_expr(gfc_expr*) ../../gcc/gcc/fortran/resolve.cc:7498 0xa073aa gfc_resolve_code(gfc_code*, gfc_namespace*) ../../gcc/gcc/fortran/resolve.cc:12638 0xa0b30b gfc_resolve_blocks(gfc_code*, gfc_namespace*) ../../gcc/gcc/fortran/resolve.cc:11449 0xa06f32 gfc_resolve_code(gfc_code*, gfc_namespace*) ../../gcc/gcc/fortran/resolve.cc:12628 0xa0b0fd resolve_codes ../../gcc/gcc/fortran/resolve.cc:18434 0xa0b1b7 gfc_resolve(gfc_namespace*) ../../gcc/gcc/fortran/resolve.cc:18469 0x9e72a8 resolve_all_program_units ../../gcc/gcc/fortran/parse.cc:7067 0x9e72a8 gfc_parse_file() ../../gcc/gcc/fortran/parse.cc:7323 0xa40027 gfc_be_parse_file ../../gcc/gcc/fortran/f95-lang.cc:241
