sig
  external destroy : SFFtp.directoryResponse -> unit
    = "caml_sfFtpDirectoryResponse_destroy"
  external isOk : SFFtp.directoryResponse -> bool
    = "caml_sfFtpDirectoryResponse_isOk"
  external getStatus : SFFtp.directoryResponse -> SFFtp.status
    = "caml_sfFtpDirectoryResponse_getStatus"
  external getMessage : SFFtp.directoryResponse -> string
    = "caml_sfFtpDirectoryResponse_getMessage"
  external getDirectory : SFFtp.directoryResponse -> string
    = "caml_sfFtpDirectoryResponse_getDirectory"
end