X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_transformations%2FcicAst.mli;h=89f8907fa32fe45648996bffc44146697a147a11;hb=349a0e23813a7f33853e1f8fe48230276ac22934;hp=8abd4f3c9d571e36624cb62136cfec18b800e9a7;hpb=29d132244b797aaaa79319d81e0be4edf05ba7ae;p=helm.git

diff --git a/helm/ocaml/cic_transformations/cicAst.mli b/helm/ocaml/cic_transformations/cicAst.mli
index 8abd4f3c9..89f8907fa 100644
--- a/helm/ocaml/cic_transformations/cicAst.mli
+++ b/helm/ocaml/cic_transformations/cicAst.mli
@@ -26,6 +26,7 @@
 (** {2 Parsing related types} *)
 
 type location = Lexing.position * Lexing.position
+val pp_location: location -> string
 
   (** maps old style (i.e. <= 3.07) lexer location to new style location,
   * padding with dummy values where needed *)
@@ -50,7 +51,6 @@ type term_attribute =
 
 type term =
   | AttributedTerm of term_attribute * term
-
   | Appl of term list
   | Binder of binder_kind * capture_variable * term (* kind, name, body *)
   | Case of term * string option * term option * (case_pattern * term) list