aboutsummaryrefslogtreecommitdiff
path: root/kernel/vars.ml
diff options
context:
space:
mode:
authorPierre Letouzey2014-03-05 16:50:04 +0100
committerPierre Letouzey2014-03-05 16:57:45 +0100
commit8fc2509f354b02ec4e0a3eb6fabc329109686c47 (patch)
treebf7f0738e36d861d57029985ea4f2d3e73d23c15 /kernel/vars.ml
parentadfd437f8ae6aaf893119fa4730edecf067dede7 (diff)
Remove some dead-code (thanks to ocaml warnings)
The removed code isn't used locally and isn't exported in the signature
Diffstat (limited to 'kernel/vars.ml')
-rw-r--r--kernel/vars.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/vars.ml b/kernel/vars.ml
index cb22a2e2fa..f23d5fc2cf 100644
--- a/kernel/vars.ml
+++ b/kernel/vars.ml
@@ -104,7 +104,7 @@ let lift n = liftn n 1
type info = Closed | Open | Unknown
type 'a substituend = { mutable sinfo: info; sit: 'a }
-let rec lift_substituend depth s =
+let lift_substituend depth s =
match s.sinfo with
| Closed -> s.sit
| Open -> lift depth s.sit