aboutsummaryrefslogtreecommitdiff
path: root/vernac/command.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-03-20 14:01:05 +0100
committerMaxime Dénès2017-03-20 14:01:05 +0100
commitfbd4464f4a43a714a6356db9caa704983190d212 (patch)
tree89a1937e3f28baa23e2b579df6f13a30621acfc4 /vernac/command.ml
parent75dad64e8c5d7c09145491518290bdb749b2d03c (diff)
parent3502cc7c3bbad154dbfe76558d411d2c76109668 (diff)
Merge PR#479: [future] Remove unused parameter greedy.
Diffstat (limited to 'vernac/command.ml')
-rw-r--r--vernac/command.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/command.ml b/vernac/command.ml
index 049f58aa26..4b4f4d2711 100644
--- a/vernac/command.ml
+++ b/vernac/command.ml
@@ -81,7 +81,7 @@ let red_constant_entry n ce sigma = function
let Sigma (c, _, _) = redfun.e_redfun env sigma c in
c
in
- { ce with const_entry_body = Future.chain ~greedy:true ~pure:true proof_out
+ { ce with const_entry_body = Future.chain ~pure:true proof_out
(fun ((body,ctx),eff) -> (under_binders env sigma redfun n body,ctx),eff) }
let warn_implicits_in_term =