This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/52531] [OOP] Compilation fails with polymorphic dummy argument and OpenMP


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

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]