From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 25323 invoked by alias); 3 May 2006 12:51:42 -0000 Received: (qmail 25260 invoked by alias); 3 May 2006 12:51:38 -0000 Date: Wed, 03 May 2006 12:51:00 -0000 Message-ID: <20060503125138.25259.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/27395] Problem with arrays in the OpenMP REDUCTION clause in Fortran In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "jakub at gcc dot gnu dot org" Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2006-05/txt/msg00270.txt.bz2 List-Id: ------- Comment #2 from jakub at gcc dot gnu dot org 2006-05-03 12:51 ------- Subject: Bug 27395 Author: jakub Date: Wed May 3 12:51:33 2006 New Revision: 113494 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=113494 Log: PR fortran/27395 * gimplify.c (gimplify_scan_omp_clauses): Compare OMP_CLAUSE_CODE rather than TREE_CODE to OMP_CLAUSE_REDUCTION. Set also GOVD_SEEN bit for OMP_CLAUSE_REDUCTION_PLACEHOLDER. * testsuite/libgomp.fortran/pr27395-1.f90: New test. * testsuite/libgomp.fortran/pr27395-2.f90: New test. Added: trunk/libgomp/testsuite/libgomp.fortran/pr27395-1.f90 trunk/libgomp/testsuite/libgomp.fortran/pr27395-2.f90 Modified: trunk/gcc/ChangeLog trunk/gcc/gimplify.c trunk/libgomp/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=27395