X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Flibrary%2FlibraryMisc.ml;h=3f1931e42ce0e979e080c566381f47f572ddbdf8;hb=b5619c04607ec92594e7645847409c351129709b;hp=2b6d64f6300c1bd887fb9cae119828d5ae7c8832;hpb=0ac236dda6f80f6dc86a7f12d8c88b25e64e3251;p=helm.git

diff --git a/helm/ocaml/library/libraryMisc.ml b/helm/ocaml/library/libraryMisc.ml
index 2b6d64f63..3f1931e42 100644
--- a/helm/ocaml/library/libraryMisc.ml
+++ b/helm/ocaml/library/libraryMisc.ml
@@ -23,7 +23,16 @@
  * http://helm.cs.unibo.it/
  *)
 
+(* $Id$ *)
 
 let obj_file_of_baseuri ~basedir ~baseuri =
  let path = basedir ^ "/xml" ^ Pcre.replace ~pat:"^cic:" ~templ:"" baseuri in
   path ^ ".moo"
+
+let lexicon_file_of_baseuri ~basedir ~baseuri =
+ let path = basedir ^ "/xml" ^ Pcre.replace ~pat:"^cic:" ~templ:"" baseuri in
+  path ^ ".lexicon"
+
+let metadata_file_of_baseuri ~basedir ~baseuri =
+ let path = basedir ^ "/xml" ^ Pcre.replace ~pat:"^cic:" ~templ:"" baseuri in
+  path ^ ".metadata"