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

            Bug ID: 91802
           Summary: ICE in mio_name_expr_t, at fortran/module.c:2141
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gs...@t-online.de
  Target Milestone: ---

Since gfortran is supporting 15 dimensions :
(up to gcc-7 change sources to use 7+1 dims)


$ cat z0.f90
module m
   real :: x(1,2,1,2,1,2,1,2)[1,2,1,2,1,2,1,*]
end

$ gfortran-10-20190915 -c z0.f90 -fcoarray=single
z0.f90:2:44:

    2 |    real :: x(1,2,1,2,1,2,1,2)[1,2,1,2,1,2,1,*]
      |                                            1
Error: Array specification at (1) has more than 15 dimensions


$ cat z1.f90
module m
   real :: x
   dimension ::   x(1,2,1,2,1,2,1,2)
   codimension :: x[1,2,1,2,1,2,1,*]
end


$ gfortran-10-20190915 -c z1.f90 -fcoarray=single
f951: internal compiler error: Segmentation fault
0xb3e54f crash_signal
        ../../gcc/toplev.c:326
0x65a11c mio_name_expr_t
        ../../gcc/fortran/module.c:2141
0x65a11c mio_expr
        ../../gcc/fortran/module.c:3549
0x65ac40 mio_array_spec
        ../../gcc/fortran/module.c:2743
0x65be90 mio_symbol
        ../../gcc/fortran/module.c:4424
0x65c1cd write_symbol
        ../../gcc/fortran/module.c:5749
0x65c332 write_symbol0
        ../../gcc/fortran/module.c:5789
0x65eeb4 write_module
        ../../gcc/fortran/module.c:6131
0x65eeb4 dump_module
        ../../gcc/fortran/module.c:6261
0x65f27d gfc_dump_module(char const*, int)
        ../../gcc/fortran/module.c:6318
0x677b66 gfc_parse_file()
        ../../gcc/fortran/parse.c:6404
0x6c1a0f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204

Reply via email to