projects / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 99c1f1c) | patch
re PR fortran/32550 (openmp: COPYPRIVATE of pointer variables fails)
authorJakub Jelinek <jakub@redhat.com>
Thu, 12 Jul 2007 12:16:54 +0000 (14:16 +0200)
committerJakub Jelinek <jakub@gcc.gnu.org>
Thu, 12 Jul 2007 12:16:54 +0000 (14:16 +0200)
commite1c8221962aa8dfba5b2462449bccfe10c2d561e
tree393a1c7458b43284abbfb7883e8b69cce2548c5ftree
parent99c1f1ceed0d85eb785cb6f49ef23cad965922d2commit | 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 | history
gcc/fortran/trans-openmp.c diff | blob | history
gcc/fortran/trans-types.c diff | blob | history
gcc/fortran/trans.h diff | blob | history
libgomp/ChangeLog diff | blob | 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