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

kargls at comcast dot net changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargls at comcast dot net

--- Comment #3 from kargls at comcast dot net ---
(In reply to Gerhard Steinmetz from comment #1)
> Another source position with obviously invalid code :
> 
> 
> $ cat za.f90
> program p
>    character(:), allocatable :: z
>    allocate (character(*) :: z)
> end
> 
> 
> $ gfortran-7-20160710 za.f90
> za.f90:3:0:
> 
>     allocate (character(*) :: z)
> 
> internal compiler error: in gfc_trans_allocate, at fortran/trans-stmt.c:5698
> 0x7a17f2 gfc_trans_allocate(gfc_code*)
>         ../../gcc/fortran/trans-stmt.c:5698
> 0x71bf87 trans_code
>         ../../gcc/fortran/trans.c:1838
> 0x74ac88 gfc_generate_function_code(gfc_namespace*)
>         ../../gcc/fortran/trans-decl.c:6171
> 0x6d6860 translate_all_program_units
>         ../../gcc/fortran/parse.c:5914
> 0x6d6860 gfc_parse_file()
>         ../../gcc/fortran/parse.c:6120
> 0x718d12 gfc_be_parse_file
>         ../../gcc/fortran/f95-lang.c:198

This now gives

% gfcx -c pr71884.f90
pr71884.f90:4:25-31:

    4 |    allocate (character(*) :: z)
      |                         2     1

Reply via email to