exception Parse_error of string
+(** {3 type shortands} *)
+
+type tactic = (CicAst.term, string) TacticAst.tactic
+type tactical = (CicAst.term, string) TacticAst.tactic TacticAst.tactical
+type command = CicAst.term CommandAst.command
+type script = CicAst.term CommandAst.Script.script
+
(** {2 Parsing functions} *)
-val parse_term: char Stream.t -> CicAst.term
+val parse_term: char Stream.t -> CicAst.term
+val parse_tactic: char Stream.t -> tactic
+val parse_tactical: char Stream.t -> tactical
+val parse_command: char Stream.t -> command
+val parse_script: char Stream.t -> script
(** {2 Grammar extensions} *)
-val term: CicAst.term Grammar.Entry.e (** recursive rule *)
-val term0: CicAst.term Grammar.Entry.e (** top level rule *)
+val term: CicAst.term Grammar.Entry.e (** recursive rule *)
+val term0: CicAst.term Grammar.Entry.e (** top level rule *)
val return_term: CicAst.location -> CicAst.term -> CicAst.term