c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr71859.f90
blob0dc617786ce176e80b4843a8da6bc45e550b36d2
1 ! { dg-do compile }
2 program p
3 call s(1)
4 x = abs(s) ! { dg-error "must have a numeric type" }
5 end
6 subroutine s(n)
7 print *, n
8 end