aboutsummaryrefslogtreecommitdiff
path: root/engine/eConstr.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-12-15 17:54:44 +0100
committerMaxime Dénès2017-12-15 17:54:44 +0100
commit50bd89748af03bb28ad7024f2ceef500489a91b0 (patch)
tree3f0b5c3eca5412b00e187cac7fde54c1a3d10ca9 /engine/eConstr.ml
parent8fe59e96aae527655c5450603b5627f852a368c7 (diff)
parent7799626c67c39c6bd2c5faf247456efb2c26ae82 (diff)
Merge PR #6392: [econstr] Cleanup in `vernac/classes.ml`
Diffstat (limited to 'engine/eConstr.ml')
-rw-r--r--engine/eConstr.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/engine/eConstr.ml b/engine/eConstr.ml
index d303038c5d..53123c9334 100644
--- a/engine/eConstr.ml
+++ b/engine/eConstr.ml
@@ -150,6 +150,8 @@ type rel_declaration = (constr, types) Context.Rel.Declaration.pt
type named_context = (constr, types) Context.Named.pt
type rel_context = (constr, types) Context.Rel.pt
+type 'a puniverses = 'a * EInstance.t
+
let in_punivs a = (a, EInstance.empty)
let mkProp = of_kind (Sort (ESorts.make Sorts.prop))