Module Async_ssl_bindings__Ffi_bindings.Progress_callback

type fn = int -> int -> unit Ctypes_static.ptr -> unit
type t
val t : t Ctypes.typ
val t_opt : t option Ctypes.typ
val free : t -> unit
val of_fun : fn -> t
val with_fun : fn -> (t -> 'c) -> 'c