public inbox for fortran@gcc.gnu.org
 help / color / mirror / Atom feed
* [PATCH, committed] PR67826 gcc/fortran/openmp.c:1808: bad test ?
@ 2015-11-11 10:36 Dominique d'Humières
  0 siblings, 0 replies; only message in thread
From: Dominique d'Humières @ 2015-11-11 10:36 UTC (permalink / raw)
  To: fortran; +Cc: gcc-patches

I have committed on trunk the following patch as revision r230148 (preapproved by Jakub Jelinek and tested on x86_64-apple-darwin14)

Index: gcc/fortran/ChangeLog
===================================================================
--- gcc/fortran/ChangeLog	(revision 230147)
+++ gcc/fortran/ChangeLog	(working copy)
@@ -1,3 +1,8 @@
+2015-11-11  Dominique d'Humieres <dominiq@lps.ens.fr>
+
+	PR fortran/67826
+	* openmp.c (gfc_omp_udr_find): Fix typo.
+
 2015-11-08  Steven g. Kargl  <kargl@gcc.gnu.org>
 
 	PR fortran/68053
Index: gcc/fortran/openmp.c
===================================================================
--- gcc/fortran/openmp.c	(revision 230147)
+++ gcc/fortran/openmp.c	(working copy)
@@ -1820,7 +1820,7 @@
   for (omp_udr = st->n.omp_udr; omp_udr; omp_udr = omp_udr->next)
     if (omp_udr->ts.type == ts->type
 	|| ((omp_udr->ts.type == BT_DERIVED || omp_udr->ts.type == BT_CLASS)
-	    && (ts->type == BT_DERIVED && ts->type == BT_CLASS)))
+	    && (ts->type == BT_DERIVED || ts->type == BT_CLASS)))
       {
 	if (omp_udr->ts.type == BT_DERIVED || omp_udr->ts.type == BT_CLASS)
 	  {

Dominique

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2015-11-11 10:36 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2015-11-11 10:36 [PATCH, committed] PR67826 gcc/fortran/openmp.c:1808: bad test ? Dominique d'Humières

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).