aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/funind/indfun_common.ml
diff options
context:
space:
mode:
authorGravatar Hugo Herbelin <Hugo.Herbelin@inria.fr>2017-04-22 18:59:15 +0200
committerGravatar Hugo Herbelin <Hugo.Herbelin@inria.fr>2017-04-22 19:13:55 +0200
commit4d88b789d27f465409c71380cdf43991e429093b (patch)
tree82436020ef6acff7e1d521c54f040b31649a20f8 /plugins/funind/indfun_common.ml
parent323af0fd83d1d23c9b0324b19f2fa542419653ab (diff)
parent59b0041147a9d2dddc1fe14f624a2cf5695f2ea2 (diff)
Merge branch v8.6 into trunk
Note: I removed what seemed to be dead code in recdef.ml (local_assum and local_def introduced with econstr branch), assuming that this is what should be done.
Diffstat (limited to 'plugins/funind/indfun_common.ml')
-rw-r--r--plugins/funind/indfun_common.ml5
1 files changed, 5 insertions, 0 deletions
diff --git a/plugins/funind/indfun_common.ml b/plugins/funind/indfun_common.ml
index 20da12f39..7b0d7d27d 100644
--- a/plugins/funind/indfun_common.ml
+++ b/plugins/funind/indfun_common.ml
@@ -543,3 +543,8 @@ let prodn n env b =
(* compose_prod [xn:Tn;..;x1:T1] b = (x1:T1)..(xn:Tn)b *)
let compose_prod l b = prodn (List.length l) l b
+
+type tcc_lemma_value =
+ | Undefined
+ | Value of Constr.constr
+ | Not_needed