Below is the file 'basic_io_lexer.mli' from this revision. You can also download the file.

type v =
  | ID of string
  | STRING of string
  | MULT of string list
  | NONE
type stanza = (string * v) list
type t = stanza list

val get_stanza : Lexing.lexbuf -> stanza option
val parse      : Lexing.lexbuf -> t

val string_of_elem : v -> string