functor (G : Netsys_gssapi.GSSAPI) -> sig val delete_context : G.context option -> unit -> unit val format_status : ?fn:string -> ?minor_status:int32 -> Netsys_gssapi.major_status -> string end