xref: /phasta/phSolver/common/posixio.f (revision 7acde132a6def0fe2daaec0d1a712dff0e5c6636)
1*ab645d52SCameron Smith      module posixio
2*ab645d52SCameron Smith      interface
3*ab645d52SCameron Smith        subroutine posixio_setup(handle, mode)
4*ab645d52SCameron Smith     &   bind(C, NAME='posixio_setup')
5*ab645d52SCameron Smith        use :: iso_c_binding
6*ab645d52SCameron Smith          type(c_ptr) :: handle
7*ab645d52SCameron Smith          character(c_char), value :: mode
8*ab645d52SCameron Smith        end subroutine
9*ab645d52SCameron Smith      end interface
10*ab645d52SCameron Smith      end module
11