Private.Automaton
module Stack : sig ... end
module Context : sig ... end
module For_cst : sig ... end
module Kind : sig ... end
module Mode : sig ... end
module State : sig ... end
type ('u, 's) t = ('u, 's) State.t
val create :
?initial_pos:Positions.pos ->
('u, 's) Mode.t ->
('u, 's) Kind.t ->
('u, 's) t
val reset : ?pos:Positions.pos -> (_, _) t -> unit
val positions : (Positions.Builder.t, _) t -> Positions.t
val offset : (_, _) t -> int
Number of characters fed to the parser
val line : (_, _) t -> int
Position in the text
val column : (_, _) t -> int
val has_unclosed_paren : ('u, 's) t -> bool
Whether there are some unclosed parentheses
val set_error_state : (_, _) t -> unit
val feed_bytes : (_, 'stack) t -> bytes -> 'stack -> 'stack
val feed_string : (_, 'stack) t -> string -> 'stack -> 'stack
val feed_subbytes :
(_, 'stack) t ->
bytes ->
pos:int ->
len:int ->
'stack ->
'stack
val feed_substring :
(_, 'stack) t ->
string ->
pos:int ->
len:int ->
'stack ->
'stack
val feed : ('a, 'b) t -> char -> 'b -> 'b
val feed_eoi : ('a, 'b) t -> 'b -> 'b
val old_parser_cont_state : ('a, 'b) t -> Old_parser_cont_state.t