diff options
Diffstat (limited to 'kernel/inductive.ml')
| -rw-r--r-- | kernel/inductive.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/inductive.ml b/kernel/inductive.ml index e564feb692..e3e636e4aa 100644 --- a/kernel/inductive.ml +++ b/kernel/inductive.ml @@ -419,7 +419,7 @@ type subterm_spec = | Dead_code | Not_subterm -let eq_wf_paths = Rtree.eq_rtree Declareops.eq_recarg +let eq_wf_paths = Rtree.equal Declareops.eq_recarg let spec_of_tree t = lazy (if eq_wf_paths (Lazy.force t) mk_norec |