sig
type ('a, 'b) t = ('a, 'b) Mock.t
exception Unexpected_value of string
exception End_of_sequence
val from_mapping :
?cmp:('a -> 'a -> int) ->
?prn:('a -> string) -> ('a * 'b) list -> ('a, 'b) Mock.t
val from_sequence :
?cmp:('a -> 'a -> int) ->
?prn:('a -> string) -> ('a * 'b) list -> ('a, 'b) Mock.t
val from_function : ?cmp:('a -> 'a -> int) -> ('a -> 'b) -> ('a, 'b) Mock.t
val func : ('a, 'b) Mock.t -> 'a -> 'b
val func2 : ('a1 * 'a2, 'b) Mock.t -> 'a1 -> 'a2 -> 'b
val func3 : ('a1 * 'a2 * 'a3, 'b) Mock.t -> 'a1 -> 'a2 -> 'a3 -> 'b
val func4 :
('a1 * 'a2 * 'a3 * 'a4, 'b) Mock.t -> 'a1 -> 'a2 -> 'a3 -> 'a4 -> 'b
val func5 :
('a1 * 'a2 * 'a3 * 'a4 * 'a5, 'b) Mock.t ->
'a1 -> 'a2 -> 'a3 -> 'a4 -> 'a5 -> 'b
val count : ('a, 'b) Mock.t -> 'a -> int
val total : ('a, 'b) Mock.t -> int
val calls : ('a, 'b) Mock.t -> 'a list
end