This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]

Re: [PATCH 1/4] [GOMP4] [Fortran] OpenACC 1.0+ support in fortran front-end

From: Thomas Schwinge <thomas at codesourcery dot com>
To: Tobias Burnus <burnus at net-b dot de>
Cc: Evgeny Gavrin <e dot gavrin at samsung dot com>, GarbuzovViacheslav <v dot garbuzov at samsung dot com>, <gcc-patches at gcc dot gnu dot org>, <fortran at gcc dot gnu dot org>, Ilmir Usmanov <i dot usmanov at samsung dot com>
Date: Sat, 5 Apr 2014 12:40:26 +0200
Subject: Re: [PATCH 1/4] [GOMP4] [Fortran] OpenACC 1.0+ support in fortran front-end
Authentication-results: sourceware.org; auth=none
References: <52E158EF dot 9050009 at samsung dot com> <877g9pqmt2 dot fsf at schwinge dot name> <52E65B24 dot 9070403 at samsung dot com> <87iot5pgqb dot fsf at schwinge dot name> <52EB8437 dot 3060602 at samsung dot com> <52EB84C3 dot 4010407 at samsung dot com> <52F7FFAA dot 9020702 at net-b dot de> <5304CEFC dot 4000602 at samsung dot com> <53054370 dot 2030802 at net-b dot de> <5305BA82 dot 5060804 at samsung dot com> <53158715 dot 1090908 at samsung dot com> <5315873E dot 4010203 at samsung dot com> <53160B41 dot 3060501 at net-b dot de> <5319A309 dot 40004 at samsung dot com> <5319A335 dot 2090202 at samsung dot com> <5320A5BB dot 9000604 at net-b dot de> <53217BBE dot 6070503 at samsung dot com> <87siqml462 dot fsf at schwinge dot name> <5321A268 dot 5040005 at samsung dot com> <5321BB71 dot 4030704 at samsung dot com> <5325FA44 dot 5090800 at net-b dot de>

Hi!

On Sun, 16 Mar 2014 20:23:48 +0100, Tobias Burnus <burnus@net-b.de> wrote:
> Can you or Thomas apply the following patch after my patch* has 
> been committed to the trunk and the branch has been updated? Please 
> mention PR fortran/60283 in the ChangeLog.
> 
> * http://gcc.gnu.org/ml/gcc-patches/2014-03/msg00782.html

> --- a/gcc/fortran/parse.c
> +++ b/gcc/fortran/parse.c
> @@ -550,8 +550,7 @@ decode_oacc_directive (void)
>         return ST_NONE;
>       }
> 
> -  if (gfc_implicit_pure (NULL))
> -    gfc_current_ns->proc_name->attr.implicit_pure = 0;
> +  gfc_unset_implicit_pure (NULL);
> 
>     old_locus = gfc_current_locus;

After the trunk merge, committed in r209150:

commit 83a3b119255d0913d088d652e6caa26026aacb32
Author: tschwinge <tschwinge@138bc75d-0d04-0410-961f-82ee72b054a4>
Date:   Sat Apr 5 10:36:58 2014 +0000

    Use gfc_unset_implicit_pure.
    
    	PR fortran/60283
    	gcc/fortran/
    	* parse.c (decode_oacc_directive): Use gfc_unset_implicit_pure.
    
    git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gomp-4_0-branch@209150 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git gcc/fortran/ChangeLog.gomp gcc/fortran/ChangeLog.gomp
index 1ee6a7c..aff672e 100644
--- gcc/fortran/ChangeLog.gomp
+++ gcc/fortran/ChangeLog.gomp
@@ -1,3 +1,8 @@
+2014-04-05  Tobias Burnus  <burnus@net-b.de>
+
+	PR fortran/60283
+	* parse.c (decode_oacc_directive): Use gfc_unset_implicit_pure.
+
 2014-03-18  Thomas Schwinge  <thomas@codesourcery.com>
 
 	* f95-lang.c (DEF_FUNCTION_TYPE_10): Define.
diff --git gcc/fortran/parse.c gcc/fortran/parse.c
index a217c05..79bdc95 100644
--- gcc/fortran/parse.c
+++ gcc/fortran/parse.c
@@ -550,8 +550,7 @@ decode_oacc_directive (void)
       return ST_NONE;
     }
 
-  if (gfc_implicit_pure (NULL))
-    gfc_current_ns->proc_name->attr.implicit_pure = 0;
+  gfc_unset_implicit_pure (NULL);
 
   old_locus = gfc_current_locus;
 


GrÃÃe,
 Thomas

Attachment: pgpnRkT4dIrfd.pgp
Description: PGP signature

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]