Legend:
Library
Module
Module type
Parameter
Class
Class type
Library
Module
Module type
Parameter
Class
Class type
type ('value, 'state, 'tag) t = ('value, 'state, 'tag) De_base.visitor = {
visit_int : 'state De_base.ctx -> int -> ('value, error) result;
visit_string : 'state De_base.ctx -> string -> ('value, error) result;
}
val default : ('a, 'b, 'c) De_base.visitor
val make :
?visit_int:('a De_base.ctx -> int -> ('b, error) result) ->
?visit_string:('c De_base.ctx -> string -> ('d, error) result) ->
unit ->
('b, 'a, 'e) t
val visit_string :
'a De_base.ctx ->
('b, 'a, 'c) t ->
string ->
('b, error) result
val visit_int : 'a De_base.ctx -> ('b, 'a, 'c) t -> int -> ('b, error) result