[Bug fortran/85542] New: [6/7/8/9 Regression] ICE in check_inquiry, at fortran/expr.c:2426

["gscfq at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 85542
           Summary: [6/7/8/9 Regression] ICE in check_inquiry, at
                    fortran/expr.c:2426
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

gfortran-8 changed between 20180304 and 20180311.
gfortran-7 changed between 20180215 and 20180308.
gfortran-6 changed between 20180307 and 20180314.


$ cat z1.f90
function f(x)
   character(*), intent(in) :: x
   character((len((x)))) :: f
   f = x
end


$ gfortran-8-20180304 -c z1.f90
$
$ gfortran-8-20180422 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb9d82f crash_signal
        ../../gcc/toplev.c:325
0x6aa2ac check_inquiry
        ../../gcc/fortran/expr.c:2426
0x6aaa31 check_inquiry
        ../../gcc/fortran/expr.c:2618
0x6aaa31 gfc_check_init_expr(gfc_expr*)
        ../../gcc/fortran/expr.c:2611
0x6a7420 check_intrinsic_op
        ../../gcc/fortran/expr.c:2190
0x6aa559 gfc_check_init_expr(gfc_expr*)
        ../../gcc/fortran/expr.c:2565
0x6aafa7 gfc_reduce_init_expr(gfc_expr*)
        ../../gcc/fortran/expr.c:2775
0x6929e7 gfc_match_char_spec(gfc_typespec*)
        ../../gcc/fortran/decl.c:3236
0x698d09 gfc_match_decl_type_spec(gfc_typespec*, int)
        ../../gcc/fortran/decl.c:3874
0x69a25c gfc_match_data_decl()
        ../../gcc/fortran/decl.c:5793
0x6f6519 match_word_omp_simd
        ../../gcc/fortran/parse.c:93
0x6f9c0e match_word
        ../../gcc/fortran/parse.c:376
0x6f9c0e decode_statement
        ../../gcc/fortran/parse.c:376
0x6fbb34 next_free
        ../../gcc/fortran/parse.c:1230
0x6fbb34 next_statement
        ../../gcc/fortran/parse.c:1462
0x6fd42c parse_spec
        ../../gcc/fortran/parse.c:3854
0x6ff913 parse_progunit
        ../../gcc/fortran/parse.c:5667
0x7012a1 gfc_parse_file()
        ../../gcc/fortran/parse.c:6221
0x747e2f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204