Interpreter.Pval current_state_number : 'a env -> intReturns the current lr1 state (the state at the top of the stack)
Returns the stack with the top frame removed, or None for an empty stack
val positions : 'a env -> Lexing.position * Lexing.positionReturns the starting and ending positions of the element at the top of the stack