------- 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