Module type CamlinternalMenhirLib.IncrementalEngine.INCREMENTAL_ENGINE

module type INCREMENTAL_ENGINE = sig .. end
type token 
type production 
type 'a env 
type 'a checkpoint = private 
| InputNeeded of 'a env
| Shifting of 'a env
* 'a env *
bool
| AboutToReduce of 'a env
* production
| HandlingError of 'a env
| Accepted of 'a
| Rejected
val offer : 'a checkpoint ->       token *       CamlinternalMenhirLib.IncrementalEngine.position *       CamlinternalMenhirLib.IncrementalEngine.position ->       'a checkpoint
type strategy = [ `Legacy | `Simplified ] 
val resume : ?strategy:strategy ->       'a checkpoint ->       'a checkpoint
type supplier = unit ->       token *       CamlinternalMenhirLib.IncrementalEngine.position *       CamlinternalMenhirLib.IncrementalEngine.position 
val lexer_lexbuf_to_supplier : (Lexing.lexbuf ->        token) ->       Lexing.lexbuf ->       supplier
val loop : ?strategy:strategy ->       supplier ->       'a checkpoint ->       'a
val loop_handle : ('a -> 'answer) ->       ('a checkpoint ->        'answer) ->       supplier ->       'a checkpoint ->       'answer
val loop_handle_undo : ('a -> 'answer) ->       ('a checkpoint ->        'a checkpoint ->        'answer) ->       supplier ->       'a checkpoint ->       'answer
val shifts : 'a checkpoint ->       'a env option
val acceptable : 'a checkpoint ->       token ->       CamlinternalMenhirLib.IncrementalEngine.position -> bool
type 'a lr1state 
val number : 'a lr1state -> int
val production_index : production -> int
val find_production : int -> production
type element = 
| Element : 'a lr1state * 'a
* CamlinternalMenhirLib.IncrementalEngine.position
* CamlinternalMenhirLib.IncrementalEngine.position
-> element
type stack = element       CamlinternalMenhirLib.General.stream 
val stack : 'a env ->       stack
val top : 'a env ->       element option
val pop_many : int ->       'a env ->       'a env option
val get : int ->       'a env ->       element option
val current_state_number : 'a env -> int
val equal : 'a env ->       'a env -> bool
val positions : 'a env ->       CamlinternalMenhirLib.IncrementalEngine.position *       CamlinternalMenhirLib.IncrementalEngine.position
val env_has_default_reduction : 'a env -> bool
val state_has_default_reduction : 'a lr1state ->       bool
val pop : 'a env ->       'a env option
val force_reduction : production ->       'a env ->       'a env
val input_needed : 'a env ->       'a checkpoint