module Context : sig ... endmodule For_cst : sig ... endmodule Kind : sig ... endmodule Mode : sig ... endmodule State : sig ... endtype ('u, 's) t = ('u, 's) State.tval create :
?initial_pos:Positions.pos ->
('u, 's) Mode.t ->
('u, 's) Kind.t ->
('u, 's) tval reset : ?pos:Positions.pos -> (_, _) t -> unitval positions : (Positions.Builder.t, _) t -> Positions.tval offset : (_, _) t -> intNumber of characters fed to the parser
val line : (_, _) t -> intPosition in the text
val column : (_, _) t -> intval has_unclosed_paren : ('u, 's) t -> boolWhether there are some unclosed parentheses
val set_error_state : (_, _) t -> unit