On Mon, Sep 29, 2014 at 10:17:04AM +0200, Tobias Burnus wrote:
> Dominique Dhumieres wrote:
> > The failures for the gfortran.dg/coarray_collectives_9.f90 are fixed
> > with the following patch:
>
> Looks good to me. The patch is OK with a ChangLog.
Actually, I missed the following part:
...
- call co_broadcasr(vec(idx), 1) ! { dg-error "Argument 'A' with
INTENT\\(INOUT\\) at .1. of the intrinsic subroutine co_sum shall not have a
vector subscript" }
- call co_reduce(vec([1,3,2]), red_f) ! { dg-error "Argument 'A' with
INTENT\\(INOUT\\) at .1. of the intrinsic subroutine co_min shall not have a
vector subscript" }
+ call co_broadcasr(vec(idx), 1) ! OK?
...
Which is not fully okay: The error message should stay - but the
procedure name should (...casr) should be corrected (...cast).
Tobias
PS: I think I will soon post a patch to support Fortran 2015's
"IMPLICIT NONE (....)" where ... can be is an implicit-none list with
values TYPE and EXTERNAL. Because a "implicit none (type, external)"
would have found the typo! (Or likewise: -Wimplicit-procedure.)
