[Bug fortran/77350] New: ICE in truthvalue_conversion, at fortran/convert.c:65

["gerhard dot steinmetz dot fortran at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 77350
           Summary: ICE in truthvalue_conversion, at fortran/convert.c:65
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

For versions down to at least 4.8, with invalid code :


$ cat z1.f90
function f() result(g)
contains
   logical function g()
   end
end


$ gfortran-7-20160821 z1.f90
z1.f90:4:0:

    end

internal compiler error: in truthvalue_conversion, at fortran/convert.c:65
0x711933 truthvalue_conversion
        ../../gcc/fortran/convert.c:65
0x711933 convert(tree_node*, tree_node*)
        ../../gcc/fortran/convert.c:98
0x742ac7 gfc_generate_return()
        ../../gcc/fortran/trans-decl.c:5893
0x74e7fb gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6288
0x6da360 translate_all_program_units
        ../../gcc/fortran/parse.c:5916
0x6da360 gfc_parse_file()
        ../../gcc/fortran/parse.c:6122
0x71c602 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198