On 07/27/15 11:21, Tom de Vries wrote:
On 26/07/15 19:09, Nathan Sidwell wrote:
I've committed this update to my earlier breakout of default handling.
After complaining about something because of 'none', we should fall
through to the default handling, to prevent ICEing later (on patch
seriesI'm working on).  This matches the OMP default handling.  Also
tweaked the setting of GOVD_ flags slightly, to make the firstprivate
handling I'm working on less invasive.


Hi,

this causes PR 67027 - "[gomp4] FAIL: gfortran.dg/goacc/modules.f95 -O (internal
compiler error)".

Fixed thusly.  committed to gomp4

2015-07-28  Nathan Sidwell  <nat...@acm.org>

	* gimplify.c (oacc_default_clause): Always set GOVD_MAP if found
	in outer scope.

Index: gcc/gimplify.c
===================================================================
--- gcc/gimplify.c	(revision 226250)
+++ gcc/gimplify.c	(working copy)
@@ -5948,7 +5948,7 @@ oacc_default_clause (struct gimplify_omp
 		= splay_tree_lookup (octx->variables, (splay_tree_key) decl);
 	      if (n2)
 		{
-		  flags |= n2->value & GOVD_MAP;
+		  flags |= GOVD_MAP;
 		  goto found_outer;
 		}
 	      }

Reply via email to