diff options
| author | Enrico Tassi | 2017-12-22 14:11:55 +0100 |
|---|---|---|
| committer | Enrico Tassi | 2017-12-27 14:19:59 +0100 |
| commit | b37d3f199e4521e2ae20cc96f0f2b04acc36c7cc (patch) | |
| tree | 5286af838087a280405b1cf1c7a3248612e7c5aa /plugins | |
| parent | 7e319ad03aba413f3165b848eaf821b364f9291b (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')
| -rw-r--r-- | plugins/.merlin | 1 | ||||
| -rw-r--r-- | plugins/funind/recdef.ml | 2 |
2 files changed, 1 insertions, 2 deletions
diff --git a/plugins/.merlin b/plugins/.merlin index dd6678ba09..2ba6169622 100644 --- a/plugins/.merlin +++ b/plugins/.merlin @@ -1,2 +1 @@ REC -FLG -open API diff --git a/plugins/funind/recdef.ml b/plugins/funind/recdef.ml index 363ad5dfc9..8fe05b4978 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) |