]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/cic_proof_checking/cicLogger.mli
ocaml 3.09 transition
[helm.git] / helm / ocaml / cic_proof_checking / cicLogger.mli
index 848b30573cce84d618929e1f1db4ddb81a670df8..408bc8879998f0da714948589b3b441dc3425460 100644 (file)
@@ -29,5 +29,14 @@ type msg =
  | `Trusting of UriManager.uri
  ]
 
+  (** Stateless logging. Each message is logged with indentation level 1 *)
 val log: msg -> unit
 
+  (** Stateful logging. Each `Start_type_checing message increase the
+  * indentation level by 1, each `Type_checking_completed message decrease it by
+  * the same amount. *)
+class logger:
+  object
+    method log: msg -> unit
+  end
+