!
! fortran_gethostbyname interface
!
interface
  subroutine fortran_gethostbyname(namestring, address, stat)
    character(len=*), intent(inout) :: namestring
    integer, dimension(4), intent(out) :: address
    integer, intent(out) :: stat
  end subroutine fortran_gethostbyname
end interface
interface
  subroutine fortran_mkserver(port, handle, stat)
    integer, intent(in) :: port
    integer, intent(out) :: handle, stat
  end subroutine fortran_mkserver
end interface
interface
  subroutine fortran_accept(handle, connection, istat)
    integer, intent(in) :: handle
    integer, intent(out) :: connection, istat
  end subroutine fortran_accept
end interface
interface
  subroutine fortran_send(connection, ostring, istat)
    integer, intent(in) :: connection
    character (len=*) :: ostring
    integer, intent(out) :: istat
  end subroutine fortran_send
end interface
interface
  subroutine fortran_receive(connection, istring, istat)
    integer, intent(in) :: connection
    character (len=*) :: istring
    integer, intent(out) :: istat
  end subroutine fortran_receive
end interface