aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxime Dénès2016-11-08 15:06:14 +0100
committerMaxime Dénès2016-11-08 15:06:14 +0100
commit64027824d8217edbb1938394bc8a4fd4035bbf73 (patch)
tree1adb7fe792c637459c9062d2057a70b8a37cad94
parent8c1d788ee024fb78b2aa05451f1f702203fed548 (diff)
parentb385fbbbb7868f0994d5ec00cb918cea1e8f18cf (diff)
Merge commit 'b385fbb' into v8.6
Was PR#347: Fix performance problem in pose proof
-rw-r--r--proofs/tacmach.mli8
1 files changed, 8 insertions, 0 deletions
diff --git a/proofs/tacmach.mli b/proofs/tacmach.mli
index f79fa1d4b3..59f296f64e 100644
--- a/proofs/tacmach.mli
+++ b/proofs/tacmach.mli
@@ -108,8 +108,16 @@ module New : sig
val pf_env : ('a, 'r) Proofview.Goal.t -> Environ.env
val pf_concl : ([ `NF ], 'r) Proofview.Goal.t -> types
+ (** WRONG: To be avoided at all costs, it typechecks the term entirely but
+ forgets the universe constraints necessary to retypecheck it *)
val pf_unsafe_type_of : ('a, 'r) Proofview.Goal.t -> Term.constr -> Term.types
+
+ (** This function does no type inference and expects an already well-typed term.
+ It recomputes its type in the fastest way possible (no conversion is ever involved) *)
val pf_get_type_of : ('a, 'r) Proofview.Goal.t -> Term.constr -> Term.types
+
+ (** This function entirely type-checks the term and computes its type
+ and the implied universe constraints. *)
val pf_type_of : ('a, 'r) Proofview.Goal.t -> Term.constr -> evar_map * Term.types
val pf_conv_x : ('a, 'r) Proofview.Goal.t -> Term.constr -> Term.constr -> bool