https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Priority|P3 |P4
CC| |kargl at gcc dot gnu.org
--- Comment #4 from kargl at gcc dot gnu.org ---
Confirmed. Here's a slightly expanded testcase where it
shows that the first 2 lines are failing.
program p
real :: z(2)
z = 1 + [real :: 1, 2] ! fails
z = 1. + [real :: 1, 2] ! fails
z = 1. + [1, 2] ! OK
z = 1. + [real :: 1., 2.] ! OK
z = 1. + [real :: 1.d0, 2.d0] ! OK
z = 1 + [1, 2] ! OK
z = 1 + [real :: 1., 2.] ! OK
z = 1 + [real :: 1.d0, 2.d0] ! OK
z = [1, 2] + 1 ! OK
z = [real :: 1., 2.] + 1 ! OK
z = [real :: 1.d0, 2.d0] + 1 ! OK
z = [1, 2] + 1. ! OK
z = [real :: 1., 2.] + 1. ! OK
z = [real :: 1.d0, 2.d0] + 1. ! OK
print *, z
end
