------- Comment #1 from dfranke at gcc dot gnu dot org 2007-06-22 20:28 -------
Reduced testcase:
$> cat pr32467.f90
use omp_lib
integer, save, allocatable :: a(:)
!$omp threadprivate(a)
allocate(a(2))
a = 1
!$omp parallel copyin(a)
print *, a(1)
!$omp end parallel
deallocate(a)
end
This code is accepted by gfortran and ifort alike, but rejected by sunf95.
the original code with allocatable array components is accepted by sunf95 as
well.
--
dfranke at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |dfranke at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
GCC build triplet|x86_64-suse-linux |
GCC host triplet|x86_64-suse-linux |
GCC target triplet|x86_64-suse-linux |
Keywords| |accepts-invalid, openmp
Known to fail| |4.2.1 4.3.0
Last reconfirmed|0000-00-00 00:00:00 |2007-06-22 20:28:31
date| |
Summary|STRUCTURE CONTAINING |structure containing
|ALLOCATABLE ARRAY 'A' |allocatable array is
|APPEARS IN COPYIN CLAUSE |accepted in COPYIN clause
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32467