! { dg-do compile { target { ! *-*-* } } } ! program bug use H5GLOBAL implicit none integer :: i i=H5P_DEFAULT_F end program bug