]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/matitaMisc.ml
Porting to ocaml 5
[helm.git] / matita / matita / matitaMisc.ml
index 53d1d1f67ec2440c2c3ce45df0958ab52b9edfd3..e773fc977c6efb27a6328ab6c5d368377b72ff63 100644 (file)
@@ -38,8 +38,8 @@ let strip_suffix ~suffix s =
 let absolute_path file =
   if file.[0] = '/' then file else Unix.getcwd () ^ "/" ^ file
   
-let is_proof_script _fname = true  (** TODO Zack *)
-let is_proof_object _fname = true  (** TODO Zack *)
+let is_proof_script _fname = true  (* TODO Zack *)
+let is_proof_object _fname = true  (* TODO Zack *)
 
 let append_phrase_sep s =
   if not (Pcre.pmatch ~pat:(sprintf "%s$" BuildTimeConf.phrase_sep) s) then