aboutsummaryrefslogtreecommitdiff
path: root/engine/evd.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2020-11-12 13:33:21 +0100
committerPierre-Marie Pédrot2020-11-12 13:33:21 +0100
commitc53abd9bf4517ba66c732034fb5f9aedef6d0930 (patch)
treeb31f4b01a1e30edc1045c118c1f285b57583ea5e /engine/evd.ml
parent0245aa233e671372e9d3fb34f3b34706fd9f4bf7 (diff)
parente7b39c73f48279980f8ea2238632bfbf6e3d4178 (diff)
Merge PR #13289: Cosmetic cleaning of uState.ml: a bit of doc, more unity in naming
Ack-by: gares Reviewed-by: ppedrot
Diffstat (limited to 'engine/evd.ml')
-rw-r--r--engine/evd.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/engine/evd.ml b/engine/evd.ml
index 4ae1d034d7..498a9d9825 100644
--- a/engine/evd.ml
+++ b/engine/evd.ml
@@ -832,9 +832,9 @@ let empty = {
extras = Store.empty;
}
-let from_env e = { empty with universes = UState.from_env e }
+let from_env ?binders e = { empty with universes = UState.from_env ?binders e }
-let from_ctx ctx = { empty with universes = ctx }
+let from_ctx uctx = { empty with universes = uctx }
let has_undefined evd = not (EvMap.is_empty evd.undf_evars)