sig exception Invalid of string type record = string * string * string * string val enum_input : Batteries.IO.input -> record Batteries.Enum.t end