3 ! PR 47710: [OOP] Improve ambiguity check for GENERIC TBP w/ PASS and NOPASS
5 ! Contributed by Janus Weil <janus@gcc.gnu.org>
11 procedure, nopass :: baseproc_nopass => baseproc1
12 procedure, pass :: baseproc_pass => baseproc2
13 generic :: some_proc => baseproc_pass, baseproc_nopass ! { dg-error "are ambiguous" }
18 subroutine baseproc1 (this)
22 subroutine baseproc2 (this, that)
23 class(base_t) :: this, that
28 ! { dg-final { cleanup-modules "m" } }