https://gcc.gnu.org/bugzilla/show_bug.cgi?id=52531
Harald Anlauf <anlauf at gmx dot de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gmx dot de
--- Comment #11 from Harald Anlauf <anlauf at gmx dot de> ---
(In reply to Dominique d'Humieres from comment #10)
> > The code compiles with 4.8.5, 4.9.3, 5.2.0, and to trunk (6.0), but not
> > with 4.8.2 or 4.9.0. The change occurred between revisions r215860
> > (2014-10-03, error) and r216098 (2014-10-10, compiles).
>
> Does someone care to add a test case? Otherwise this PR can be closed as
> FIXED.
Why not simply add the code from comment #0 to testsuite/gfortran.dg/gomp/
and the close this PR?
! PR fortran/52531
! { dg-do compile }
module test_mod
type, public :: test_type
end type
contains
subroutine foo(bar)
type(test_type) :: bar
!$omp parallel default(none) shared(bar) ! Compiles if one removes
default(none)
call question(bar)
!$omp end parallel
end subroutine
subroutine question(var)
class(test_type), intent(in) :: var ! Compiles if one replaces class by
type
end subroutine
end module
