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

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> Can you please verify that your testcases work?

With the patch I get

pr34202_red.f90:8:54:

    8 |    write(*,*) transfer(transfer([1],[bug4()]),[1],size[1])
      |                                                      1
Error: Function 'size' requires an argument list at (1)
pr34202_red.f90:7:30:

    7 |    write(*,*) size(transfer(1,['']))
      |                              1
Error: 'MOLD' argument of 'TRANSFER' intrinsic at (1) has storage size 0

Full test in progress. Thanks for the quick answer.

Reply via email to