Module Smart.NegotiationSource
Sourcetype 'uid t = private | ACK of 'uid| ACK_continue of 'uid| ACK_ready of 'uid| ACK_common of 'uid| NAK
Sourceval is_common : 'uid t -> bool Sourceval is_ready : 'uid t -> bool Sourceval map : f:('a -> 'b) -> 'a t -> 'b t