Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gfortran.dg/generic_33.f90 @ 152:2b5abeee2509
update gcc11
author | anatofuz |
---|---|
date | Mon, 25 May 2020 07:50:57 +0900 |
parents | 84e7813d76e9 |
children |
line wrap: on
line source
! { dg-do compile } ! ! PR 45521: [F08] GENERIC resolution with ALLOCATABLE/POINTER and PROCEDURE ! ! Contributed by Janus Weil <janus@gcc.gnu.org> type :: t end type interface test procedure testAlloc procedure testPtr end interface contains logical function testAlloc(obj) class(t), allocatable :: obj testAlloc = .true. end function logical function testPtr(obj) class(t), pointer :: obj testPtr = .false. end function end