https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85544
--- Comment #3 from G. Steinmetz <gs...@t-online.de> ---
For special case +-1 :
$ cat zz1.f90
program p
integer, parameter :: na = -3, ne = 10
integer :: i, a(na:ne), b(na:ne)
a = [(i, i=na, ne)]
b = [1**a]
end
$ gfortran-9-20180520 -c zz1.f90 -O2
zz1.f90:5:0:
b = [1**a]
internal compiler error: in gfc_trans_array_constructor_subarray, at
fortran/trans-array.c:1633
0x75b1dc gfc_trans_array_constructor_subarray
../../gcc/fortran/trans-array.c:1633
0x75b1dc gfc_trans_array_constructor_value
../../gcc/fortran/trans-array.c:1762
0x75ba63 trans_array_constructor
../../gcc/fortran/trans-array.c:2543
0x75ba63 gfc_add_loop_ss_code
../../gcc/fortran/trans-array.c:2819
0x75c295 gfc_conv_loop_setup(gfc_loopinfo*, locus*)
../../gcc/fortran/trans-array.c:5110
0x78656c gfc_trans_assignment_1
../../gcc/fortran/trans-expr.c:10058
0x74aef7 trans_code
../../gcc/fortran/trans.c:1828
0x772219 gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.c:6507
0x7012a0 translate_all_program_units
../../gcc/fortran/parse.c:6121
0x7012a0 gfc_parse_file()
../../gcc/fortran/parse.c:6324
0x74809f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
