aboutsummaryrefslogtreecommitdiff
path: root/pretyping/detyping.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2019-06-03 14:32:18 +0200
committerGaëtan Gilbert2019-06-03 14:32:18 +0200
commit4541d28ba3c50bc8e45c4ccf418bbdd225454dec (patch)
tree2e308e2f0d081519f608969152b309e7922f2637 /pretyping/detyping.ml
parent7032085c809993d6a173e51aec447c02828ae070 (diff)
Expose set interface to option tables
This lets us avoid having to cache the SearchBlacklist.elements call in search as we can just use the set module's for_all function.
Diffstat (limited to 'pretyping/detyping.ml')
-rw-r--r--pretyping/detyping.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/detyping.ml b/pretyping/detyping.ml
index 82726eccf0..505dc529cf 100644
--- a/pretyping/detyping.ml
+++ b/pretyping/detyping.ml
@@ -182,7 +182,7 @@ module PrintingInductiveMake =
end) ->
struct
type t = inductive
- let compare = ind_ord
+ module Set = Indset
let encode = Test.encode
let subst subst obj = subst_ind subst obj
let printer ind = Nametab.pr_global_env Id.Set.empty (IndRef ind)