diff options
| author | Matej Kosik | 2016-06-03 12:58:58 +0200 |
|---|---|---|
| committer | Matej Kosik | 2016-06-03 12:58:58 +0200 |
| commit | 961344bd556656b2feb69ce2c0592a5bdcb5c020 (patch) | |
| tree | 77b21cc754c6a1b9cf44e19afb6846ad582196f9 | |
| parent | 5be3b636eec8a376828f8600c0f7e7a1a5fc271c (diff) | |
fixing compilation (with Coq trunk & Coq v8.5)
| -rw-r--r-- | mathcomp/ssreflect/plugin/trunk/ssreflect.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mathcomp/ssreflect/plugin/trunk/ssreflect.ml4 b/mathcomp/ssreflect/plugin/trunk/ssreflect.ml4 index 2ee0d97..a5037ee 100644 --- a/mathcomp/ssreflect/plugin/trunk/ssreflect.ml4 +++ b/mathcomp/ssreflect/plugin/trunk/ssreflect.ml4 @@ -2388,7 +2388,7 @@ END (* Populating the table *) let cache_viewhint (_, (i, lvh)) = - let mem_raw h = List.exists (Notation_ops.eq_glob_constr h) in + let mem_raw h = List.exists (Glob_ops.glob_constr_eq h) in let add_hint h hdb = if mem_raw h hdb then hdb else h :: hdb in viewtab.(i) <- List.fold_right add_hint lvh viewtab.(i) |