'->
object
  val lst_resp : 'a
  method destroy : unit -> SFFtp.listingResponse -> unit
  method getListing : unit -> SFFtp.listingResponse -> string array
  method getMessage : unit -> SFFtp.listingResponse -> string
  method getStatus : unit -> SFFtp.listingResponse -> SFFtp.status
  method isOk : unit -> SFFtp.listingResponse -> bool
end