From 99fe89385f6590aac5bc2dadf246c3d021986f7c Mon Sep 17 00:00:00 2001 From: Hugo Herbelin Date: Sat, 20 May 2017 18:08:24 +0200 Subject: Using EConstr and more invariants in record.ml. --- engine/eConstr.mli | 2 ++ 1 file changed, 2 insertions(+) (limited to 'engine/eConstr.mli') diff --git a/engine/eConstr.mli b/engine/eConstr.mli index 9d705b4d5..06020c573 100644 --- a/engine/eConstr.mli +++ b/engine/eConstr.mli @@ -266,6 +266,8 @@ val fresh_global : val of_named_decl : (Constr.t, Constr.types) Context.Named.Declaration.pt -> (t, types) Context.Named.Declaration.pt val of_rel_decl : (Constr.t, Constr.types) Context.Rel.Declaration.pt -> (t, types) Context.Rel.Declaration.pt +val to_rel_decl : Evd.evar_map -> (t, types) Context.Rel.Declaration.pt -> (Constr.t, Constr.types) Context.Rel.Declaration.pt + (** {5 Unsafe operations} *) module Unsafe : -- cgit v1.2.3