aboutsummaryrefslogtreecommitdiff
path: root/engine/evarutil.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2020-07-04 19:49:37 +0200
committerPierre-Marie Pédrot2020-07-08 00:20:42 +0200
commitc6391a7edfd12a876f663bbac6d24386c021d148 (patch)
tree23fd0904d59800dec523f2e0cb63204060f91503 /engine/evarutil.ml
parent7ba8eaf750689ab14910069a806233b7635bec91 (diff)
Remove Evarutil.new_pure_evar_full from the API.
Diffstat (limited to 'engine/evarutil.ml')
-rw-r--r--engine/evarutil.ml5
1 files changed, 0 insertions, 5 deletions
diff --git a/engine/evarutil.ml b/engine/evarutil.ml
index a60e521923..e30f908df0 100644
--- a/engine/evarutil.ml
+++ b/engine/evarutil.ml
@@ -409,11 +409,6 @@ let push_rel_context_to_named_context ?hypnaming env sigma typ =
let default_source = Loc.tag @@ Evar_kinds.InternalHole
-let new_pure_evar_full evd ?typeclass_candidate evi =
- let (evd, evk) = Evd.new_evar evd ?typeclass_candidate evi in
- let evd = Evd.declare_future_goal evk evd in
- (evd, evk)
-
let new_pure_evar ?(src=default_source) ?(filter = Filter.identity) ?(abstract_arguments = Abstraction.identity)
?candidates ?(naming = IntroAnonymous) ?typeclass_candidate ?(principal=false) sign evd typ =
let name = match naming with