blob: ad6b27fc4db47f5b3e8f492cebcbe98a902c4869 [file] [log] [blame]
! { dg-do compile }
! { dg-options "-std=legacy" }
! PR fortran/85780
subroutine s(*) bind(c)
end