sig type token = Newline | EOF | Section of string | Value of (string * string) val inifile : (Lexing.lexbuf -> Parseini.token) -> Lexing.lexbuf -> (string * (string * string) list) list end