aboutsummaryrefslogtreecommitdiffhomepage
path: root/vernac/lemmas.ml
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2017-10-20 11:03:09 +0200
committerGravatar Maxime Dénès <mail@maximedenes.fr>2017-10-20 11:03:09 +0200
commit8492fa8d2aa0e77b7c571956ee21097977b1df15 (patch)
tree1ac1bd71bb93cef862f4527f0a31923cb5b03cb7 /vernac/lemmas.ml
parent09525d09e414d3582595ffd141702e69a9a2efb9 (diff)
parent286d387082fb0f86858dce661c789bdcb802c295 (diff)
Merge PR #1095: [stm] Remove state handling from Futures
Diffstat (limited to 'vernac/lemmas.ml')
-rw-r--r--vernac/lemmas.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/lemmas.ml b/vernac/lemmas.ml
index d45665dd4..9ab89c883 100644
--- a/vernac/lemmas.ml
+++ b/vernac/lemmas.ml
@@ -60,7 +60,7 @@ let adjust_guardness_conditions const = function
(* Try all combinations... not optimal *)
let env = Global.env() in
{ const with const_entry_body =
- Future.chain ~pure:true const.const_entry_body
+ Future.chain const.const_entry_body
(fun ((body, ctx), eff) ->
match kind_of_term body with
| Fix ((nv,0),(_,_,fixdefs as fixdecls)) ->