Module Driver

module Driver: sig .. end

type token = 
| EOF
| KEY of string
| BOOLEAN
| INTEGER
| REAL
| INT of Cil_types.ikind
| FLT of Cil_types.fkind
| ID of string
| LINK of string
val keywords : (string * token) list
val ident : input -> string
val newline : Lexing.lexbuf -> unit
val __ocaml_lex_tables : Lexing.lex_tables
val tok : Lexing.lexbuf -> token
val __ocaml_lex_tok_rec : Lexing.lexbuf -> int -> token
val comment : Lexing.lexbuf -> token
val __ocaml_lex_comment_rec : Lexing.lexbuf -> int -> token
val pretty : Format.formatter -> token -> unit
type input = {
   lexbuf :Lexing.lexbuf;
   mutable current :token;
}
val skip : input -> unit
val token : input -> token
val key : input -> string -> bool
val skipkey : input -> string -> unit
val ident : input -> string
val kind : input -> LogicBuiltins.kind
val parameter : input -> LogicBuiltins.kind
val parameters : input -> LogicBuiltins.kind list
val signature : input -> LogicBuiltins.kind list
val depend : input -> string list
val link : input -> string
val op : 'a Qed.Logic.operator
val op_elt : input -> Lang.lfun Qed.Logic.element
val op_link : Lang.balance ->
Lang.lfun Qed.Logic.operator ->
input -> Lang.balance * Lang.lfun Qed.Logic.category * string
val logic_link : input -> Lang.balance * Lang.lfun Qed.Logic.category * string
val parse : string -> input -> unit
val load : string -> unit
val loaded : bool Pervasives.ref
val load_drivers : unit -> unit