aboutsummaryrefslogtreecommitdiff
path: root/user-contrib/Ltac2
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2019-05-22 17:29:22 +0200
committerEmilio Jesus Gallego Arias2019-06-09 14:26:58 +0200
commit879475156ccbfb14687ed9a02b04f8cf2422d698 (patch)
treef582f419374c6d249b64e77ba7fd81123fea2c76 /user-contrib/Ltac2
parentcb84805a1758ab52506f74207dacd80a8f07224e (diff)
[proof] Uniformize Proof_global API
We rename modify to map [more in line with the rest of the system] and make the endline function specific, as it is only used in one case.
Diffstat (limited to 'user-contrib/Ltac2')
-rw-r--r--user-contrib/Ltac2/tac2entries.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/user-contrib/Ltac2/tac2entries.ml b/user-contrib/Ltac2/tac2entries.ml
index 10dd1c4f58..3ab82b6e9b 100644
--- a/user-contrib/Ltac2/tac2entries.ml
+++ b/user-contrib/Ltac2/tac2entries.ml
@@ -856,7 +856,7 @@ let print_ltac qid =
(** Calling tactics *)
let solve ~pstate default tac =
- let pstate, status = Proof_global.with_proof begin fun etac p ->
+ let pstate, status = Proof_global.map_fold_proof_endline begin fun etac p ->
let with_end_tac = if default then Some etac else None in
let g = Goal_select.get_default_goal_selector () in
let (p, status) = Pfedit.solve g None tac ?with_end_tac p in