OSDN Git Service

* gfortran.dg/isnan_1.f90: Add -mieee for sh.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / io_constraints_2.f90
index 9e83561..fa6cbdb 100644 (file)
@@ -17,7 +17,7 @@ contains
   subroutine foo (i)
     integer :: i
     write (*, 100) i
- 100 format (1h , "i=", i6)                     ! This is OK.
+ 100 format (1h , "i=", i6) ! { dg-warning "H format specifier" }
   end subroutine foo
 
 end module global