aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/funind
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2017-12-22 14:11:55 +0100
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2017-12-27 14:19:59 +0100
commitb37d3f199e4521e2ae20cc96f0f2b04acc36c7cc (patch)
tree5286af838087a280405b1cf1c7a3248612e7c5aa /plugins/funind
parent7e319ad03aba413f3165b848eaf821b364f9291b (diff)
[API] remove large file containing duplicate interfaces
... in favor of having Public/Internal sub modules in each and every module grouping functions according to their intended client.
Diffstat (limited to 'plugins/funind')
-rw-r--r--plugins/funind/recdef.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/recdef.ml b/plugins/funind/recdef.ml
index 363ad5dfc..8fe05b497 100644
--- a/plugins/funind/recdef.ml
+++ b/plugins/funind/recdef.ml
@@ -861,7 +861,7 @@ let rec prove_le g =
| App (c, [| x0 ; _ |]) ->
EConstr.isVar sigma x0 &&
Id.equal (destVar sigma x0) (destVar sigma x) &&
- is_global sigma (le ()) c
+ EConstr.is_global sigma (le ()) c
| _ -> false
in
let (h,t) = List.find (fun (_,t) -> matching_fun t) (pf_hyps_types g)