git.ipfire.org Git - thirdparty/gcc.git/commit

]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/trans.h

projects / thirdparty / gcc.git / commit

author	Jakub Jelinek <jakub@redhat.com>
	Thu, 12 Jul 2007 12:16:54 +0000 (14:16 +0200)
committer	Jakub Jelinek <jakub@gcc.gnu.org>
	Thu, 12 Jul 2007 12:16:54 +0000 (14:16 +0200)
commit	e1c8221962aa8dfba5b2462449bccfe10c2d561e
tree	393a1c7458b43284abbfb7883e8b69cce2548c5f	tree \| snapshot
parent	99c1f1ceed0d85eb785cb6f49ef23cad965922d2	commit \| diff

re PR fortran/32550 (openmp: COPYPRIVATE of pointer variables fails)

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.

From-SVN: r126583

gcc/fortran/ChangeLog		diff \| blob \| blame \| history
gcc/fortran/trans-openmp.c		diff \| blob \| blame \| history
gcc/fortran/trans-types.c		diff \| blob \| blame \| history
gcc/fortran/trans.h		diff \| blob \| blame \| history
libgomp/ChangeLog		diff \| blob \| blame \| history
libgomp/testsuite/libgomp.fortran/crayptr2.f90	[new file with mode: 0644]	blob
libgomp/testsuite/libgomp.fortran/pr32550.f90	[new file with mode: 0644]	blob

Mirror of https://gcc.gnu.org/git/gcc.git

RSS Atom