Module `MenhirLib.ErrorReports`

type 'a buffer

val wrap : 
  (Stdlib.Lexing.lexbuf -> 'token) ->
  (Stdlib.Lexing.position * Stdlib.Lexing.position)
    Ocaml_preprocess.MenhirLib.ErrorReports.buffer
  * (Stdlib.Lexing.lexbuf ->
  'token)

val wrap_supplier : 
  (unit -> 'token * Stdlib.Lexing.position * Stdlib.Lexing.position) ->
  (Stdlib.Lexing.position * Stdlib.Lexing.position)
    Ocaml_preprocess.MenhirLib.ErrorReports.buffer
  * (unit ->
  'token * Stdlib.Lexing.position * Stdlib.Lexing.position)

val show : 
  ('a -> string) ->
  'a Ocaml_preprocess.MenhirLib.ErrorReports.buffer ->
  string

val last : 'a Ocaml_preprocess.MenhirLib.ErrorReports.buffer -> 'a

val extract : 
  string ->
  (Stdlib.Lexing.position * Stdlib.Lexing.position) ->
  string

val sanitize : string -> string

val compress : string -> string

val shorten : int -> string -> string

val expand : (int -> string) -> string -> string

Module MenhirLib.ErrorReports

Module `MenhirLib.ErrorReports`