view gcc/testsuite/gfortran.dg/pr83939.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 }
elemental function f() result(s) ! { dg-error "shall not have an ALLOCATABLE or POINTER" }
  allocatable s
  allocate(s)
  s = 3.5
end function

elemental function g() result(s) ! { dg-error "shall not have an ALLOCATABLE or POINTER" }
  pointer s
  allocate(s)
  s = 3.5
end function