https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89492
Bug ID: 89492
Summary: [9 Regression] Endless compilation of an invalid
TRANSFER after r269177
Product: gcc
Version: 9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: dominiq at lps dot ens.fr
CC: anlauf at gcc dot gnu.org
Target Milestone: ---
As reported at https://gcc.gnu.org/ml/fortran/2019-02/msg00198.html, after
revision r269177, compiling the reduced test
program bug4a
implicit none
type bug4
! Intentionally left empty
end type bug4
write(*,*) size(transfer(1,['']))
write(*,*) transfer(transfer([1],[bug4()]),[1],size[1])
end program bug4a
gives the error
pr34202_red.f90:8:54:
8 | write(*,*) transfer(transfer([1],[bug4()]),[1],size[1])
| 1
Error: Function 'size' requires an argument list at (1)
and enter an endless state.
If I comment the line
write(*,*) size(transfer(1,['']))
I get immediately the error
Error: Coarray designator at (1) but 'size' is not a coarray
