[Bug fortran/46459] ICE (segfault): Invalid read in compare_actual_formal [error recovery]

[anlauf at gmx dot de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=46459

Harald Anlauf <anlauf at gmx dot de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |anlauf at gmx dot de

--- Comment #6 from Harald Anlauf <anlauf at gmx dot de> ---
(In reply to Mikael Morin from comment #5)
> The initial test doesn't lead to a segfault any more.
> 
> It is now rejected with:
> comment_0.f90:7.8:
> 
> call sub(1)
>         1
> Error: Explicit interface required for 'sub' at (1): volatile argument
> 
> 
> However, the following variant is also rejected with the same error:
> 
>  call sub(1)
> contains
>   subroutine sub(j)
>    integer, volatile :: j
>   end subroutine sub
> end

With current trunk I get for this testcase:

f951: internal compiler error: Segmentation fault
0x884c5d0 crash_signal
        ../../trunk/gcc/toplev.c:335
0x8247bb7 compare_actual_formal
        ../../trunk/gcc/fortran/interface.c:2972
0x8248f02 gfc_procedure_use(gfc_symbol*, gfc_actual_arglist**, locus*)
        ../../trunk/gcc/fortran/interface.c:3441
0x82a0753 resolve_specific_s0
        ../../trunk/gcc/fortran/resolve.c:3282
0x82a0753 resolve_specific_s
        ../../trunk/gcc/fortran/resolve.c:3302
0x82a0753 resolve_call
        ../../trunk/gcc/fortran/resolve.c:3456
0x82a8b14 gfc_resolve_code(gfc_code*, gfc_namespace*)
        ../../trunk/gcc/fortran/resolve.c:10613
0x82ab342 resolve_codes
        ../../trunk/gcc/fortran/resolve.c:15529
0x829a1aa gfc_resolve
        ../../trunk/gcc/fortran/resolve.c:15563
0x829a1aa gfc_resolve
        ../../trunk/gcc/fortran/resolve.c:15543
0x828ec38 resolve_all_program_units
        ../../trunk/gcc/fortran/parse.c:5551
0x828ec38 gfc_parse_file()
        ../../trunk/gcc/fortran/parse.c:5803
0x82d2a55 gfc_be_parse_file
        ../../trunk/gcc/fortran/f95-lang.c:201