summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/pr77420_4.f90
blob: 5eee0986b809806b127477ae63996d8926cb70c5 (plain)
1
2
3
4
5
6
7
8
! { dg-do compile { target { ! *-*-* } } }
!
program bug
  use H5GLOBAL
  implicit none
  integer :: i
  i=H5P_DEFAULT_F
end program bug