Add hppa*-*-* to dg-error targets at line 5
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr95690.f90
blob1432937438acb976581d33b88d8b8969df5e6d7f
1 ! { dg-do compile }
2 module m
3 contains
4 subroutine s
5 print *, (erfc) ! { dg-error "not a floating constant" "" { target i?86-*-* x86_64-*-* sparc*-*-* cris-*-* hppa*-*-* } }
6 end ! { dg-error "not a floating constant" "" { target { ! "i?86-*-* x86_64-*-* sparc*-*-* cris-*-* hppa*-*-*" } } }
7 function erfc()
8 end
9 end