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

Reply via email to