This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/32550] openmp: COPYPRIVATE of pointer variables fails
- From: "jakub at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 12 Jul 2007 12:17:12 -0000
- Subject: [Bug fortran/32550] openmp: COPYPRIVATE of pointer variables fails
- References: <bug-32550-14710@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #2 from jakub at gcc dot gnu dot org 2007-07-12 12:17 -------
Subject: Bug 32550
Author: jakub
Date: Thu Jul 12 12:16:54 2007
New Revision: 126583
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=126583
Log:
PR fortran/32550
* trans.h (GFC_POINTER_TYPE_P): Define.
* trans-types.c (gfc_sym_type): Set it for types on attr->sym.pointer.
* trans-openmp.c (gfc_omp_privatize_by_reference): Return false
if GFC_POINTER_TYPE_P is set on the type.
* testsuite/libgomp.fortran/pr32550.f90: New test.
* testsuite/libgomp.fortran/crayptr2.f90: New test.
Added:
trunk/libgomp/testsuite/libgomp.fortran/crayptr2.f90
trunk/libgomp/testsuite/libgomp.fortran/pr32550.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/trans-openmp.c
trunk/gcc/fortran/trans-types.c
trunk/gcc/fortran/trans.h
trunk/libgomp/ChangeLog
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32550