- helmns -> helm_ns

[helm.git] / helm / ocaml / cic_transformations / misc.ml

diff --git a/helm/ocaml/cic_transformations/misc.ml b/helm/ocaml/cic_transformations/misc.ml
index e42a0c5f7d1117c8ced9e0e7f2fc30f94e27cb03..98f680d8dbdf12060531239def535d6bc3aca656 100644 (file)
--- a/helm/ocaml/cic_transformations/misc.ml
+++ b/helm/ocaml/cic_transformations/misc.ml
@@ -33,8 +33,9 @@
 (*                                                                            *)
 (******************************************************************************)
 
-let domImpl = Gdome.domImplementation ();;
-let helmns = Gdome.domString "http://www.cs.unibo.it/helm";;
+let domImpl = Gdome.domImplementation ()
+let helm_ns = Gdome.domString "http://www.cs.unibo.it/helm"
+let xlink_ns = Gdome.domString "http://www.w3.org/1999/xlink"
 
   (* TODO BRRRRR .... *)
   (** strip first 4 line of a string, used to strip xml declaration and doctype
@@ -43,5 +44,4 @@ let strip_xml_headings =
   let xml_headings_RE = Pcre.regexp "^.*\n.*\n.*\n.*\n" in
   fun s ->
     Pcre.replace ~rex:xml_headings_RE s
-;;