Re: [openacc] acc loop updates in fortran

[Thomas Schwinge]

Hi Jakub!

On Wed, 4 Nov 2015 11:30:28 +0100, Jakub Jelinek <ja...@redhat.com> wrote:
> >  gfc_match_oacc_update (void)
> >  {
> >    gfc_omp_clauses *c;
> > +  locus here = gfc_current_locus;
> > +
> >    if (gfc_match_omp_clauses (&c, OACC_UPDATE_CLAUSES, false, false, true)
> >        != MATCH_YES)
> >      return MATCH_ERROR;
> >  
> > +  if (!c->lists[OMP_LIST_MAP])
> > +    {
> > +      gfc_error ("%<acc update%> must contain at least one "
> > +            "%<device%> or %<host/self%> clause at %L", &here);
> 
> There is no host/self clause I'd guess, so you should spell those
> separately.

That's the same language as used in the C and C++ front ends; the host
and self clauses are synonymous.

    $ git grep -C2 host/self upstream/trunk -- gcc/c*/
    upstream/trunk:gcc/c/c-parser.c-      error_at (loc,
    upstream/trunk:gcc/c/c-parser.c-                "%<#pragma acc update%> 
must contain at least one "
    upstream/trunk:gcc/c/c-parser.c:                "%<device%> or 
%<host/self%> clause");
    upstream/trunk:gcc/c/c-parser.c-      return;
    upstream/trunk:gcc/c/c-parser.c-    }
    --
    upstream/trunk:gcc/cp/parser.c-      error_at (pragma_tok->location,
    upstream/trunk:gcc/cp/parser.c-         "%<#pragma acc update%> must 
contain at least one "
    upstream/trunk:gcc/cp/parser.c:         "%<device%> or %<host/self%> 
clause");
    upstream/trunk:gcc/cp/parser.c-      return NULL_TREE;
    upstream/trunk:gcc/cp/parser.c-    }


Grüße
 Thomas

signature.asc
Description: PGP signature