From c319667adff8cc10e87ff836f72d5a7471e942c6 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge Date: Fri, 22 Feb 2019 11:50:18 +0100 Subject: Revert earlier OpenACC 'routine' changes ..., which were committed as part of, but logically don't belong into r261813 "Update OpenACC data clause semantics to the 2.5 behavior", and which confuse later changes. gcc/fortran/ * openmp.c (gfc_match_oacc_declare): Revert earlier changes. gcc/testsuite/ * c-c++-common/goacc/routine-5.c: Revert earlier changes. * g++.dg/goacc/template.C: Likewise. From-SVN: r269104 --- gcc/fortran/openmp.c | 7 ------- 1 file changed, 7 deletions(-) (limited to 'gcc/fortran/openmp.c') diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 11dd3ae..8aa4a2f 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -2075,13 +2075,6 @@ gfc_match_oacc_declare (void) module_var = true; } - if (ns->proc_name->attr.oacc_function) - { - gfc_error ("Invalid declare in routine with $!ACC DECLARE at %L", - &where); - return MATCH_ERROR; - } - if (s->attr.use_assoc) { gfc_error ("Variable is USE-associated with !$ACC DECLARE at %L", -- cgit v1.1