[Bug fortran/93834] New: [8/9/10 Regression] ICE in trans_caf_is_present, at fortran/trans-intrinsic.c:8469

[gscfq@t-online.de]

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

            Bug ID: 93834
           Summary: [8/9/10 Regression] ICE in trans_caf_is_present, at
                    fortran/trans-intrinsic.c:8469
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Started to ICE with gfortran-7 :
(derived from a valid z0.f90)


$ cat z0.f90
program p
   integer, allocatable :: a[:]
   print *, allocated(a)
end


$ cat z1.f90
program p
   integer, allocatable :: a[:]
   print *, allocated(a[1])
end


$ cat z2.f90
program p
   integer, allocatable :: a[:]
   if ( allocated(a[1]) ) stop
end


$ gfortran-10-20200216 -c z1.f90 -fcoarray=single
$
$ gfortran-10-20200216 -c z1.f90 -fcoarray=lib
z1.f90:3:0:

    3 |    print *, allocated(a[1])
      |
internal compiler error: in trans_caf_is_present, at
fortran/trans-intrinsic.c:8469
0x79a4c3 trans_caf_is_present
        ../../gcc/fortran/trans-intrinsic.c:8469
0x79a4c3 gfc_conv_allocated
        ../../gcc/fortran/trans-intrinsic.c:8531
0x7aadab gfc_conv_intrinsic_function(gfc_se*, gfc_expr*)
        ../../gcc/fortran/trans-intrinsic.c:9840
0x77d52a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc/fortran/trans-expr.c:8665
0x787205 gfc_conv_expr_reference(gfc_se*, gfc_expr*, bool)
        ../../gcc/fortran/trans-expr.c:8810
0x7b2197 gfc_trans_transfer(gfc_code*)
        ../../gcc/fortran/trans-io.c:2582
0x735727 trans_code
        ../../gcc/fortran/trans.c:2084
0x7aecc2 build_dt
        ../../gcc/fortran/trans-io.c:2026
0x735747 trans_code
        ../../gcc/fortran/trans.c:2056
0x76cd5d gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6835
0x6e69a6 translate_all_program_units
        ../../gcc/fortran/parse.c:6306
0x6e69a6 gfc_parse_file()
        ../../gcc/fortran/parse.c:6545
0x731b3f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:210