summaryrefslogtreecommitdiff
path: root/libs/util.ml
diff options
context:
space:
mode:
authorAlex AUVOLAT <alex.auvolat@ens.fr>2014-05-07 16:13:31 +0200
committerAlex AUVOLAT <alex.auvolat@ens.fr>2014-05-07 16:13:31 +0200
commit73fa920959d22c084265fe847f4788564bf49700 (patch)
tree9e99d91203b475ebe74fa0b484a86ada05caacf1 /libs/util.ml
parentbcde99fbe99174a094f38fdda70ad69d65a423f4 (diff)
downloadSemVerif-Projet-73fa920959d22c084265fe847f4788564bf49700.tar.gz
SemVerif-Projet-73fa920959d22c084265fe847f4788564bf49700.zip
Achieve nothing.
Diffstat (limited to 'libs/util.ml')
-rw-r--r--libs/util.ml8
1 files changed, 8 insertions, 0 deletions
diff --git a/libs/util.ml b/libs/util.ml
new file mode 100644
index 0000000..b2838b6
--- /dev/null
+++ b/libs/util.ml
@@ -0,0 +1,8 @@
+
+module VarMap = Mapext.Make(String)
+
+let rec fix f s =
+ let fs = f s in
+ if fs = s
+ then fs
+ else fix f fs