diff --git a/library/init/meta/interactive.lean b/library/init/meta/interactive.lean index 04091fc6b4..0e5835c227 100644 --- a/library/init/meta/interactive.lean +++ b/library/init/meta/interactive.lean @@ -640,7 +640,7 @@ tactic.any_goals `focus { t }` temporarily hides all goals other than the first, applies `t`, and then restores the other goals. It fails if there are no goals. -/ meta def focus (tac : itactic) : tactic unit := -tactic.focus [tac] +tactic.focus1 tac private meta def assume_core (n : name) (ty : pexpr) := do t ← target, diff --git a/tests/lean/interactive/focus.lean.expected.out b/tests/lean/interactive/focus.lean.expected.out index 7b474dcd02..0e09695851 100644 --- a/tests/lean/interactive/focus.lean.expected.out +++ b/tests/lean/interactive/focus.lean.expected.out @@ -1,5 +1,4 @@ -{"msgs":[{"caption":"","file_name":"f","pos_col":2,"pos_line":4,"severity":"error","text":"focus tactic failed, insufficient number of tactics\nstate:\na b c : ℕ,\na_1 : a = b,\na_2 : b = 0\n⊢ b = a"}],"response":"all_messages"} {"message":"file invalidated","response":"ok","seq_num":0} {"record":{"doc":"`focus { t }` temporarily hides all goals other than the first, applies `t`, and then restores the other goals. It fails if there are no goals.","source":,"state":"a b c : ℕ,\na_1 : a = b,\na_2 : b = 0\n⊢ a = 0","tactic_param_idx":0,"tactic_params":["{ tactic }"],"text":"focus","type":"tactic.interactive.itactic → tactic unit"},"response":"ok","seq_num":5} {"record":{"doc":"`focus { t }` temporarily hides all goals other than the first, applies `t`, and then restores the other goals. It fails if there are no goals.","source":,"state":"b c : ℕ,\na_2 : b = 0\n⊢ b = 0","tactic_param_idx":0,"tactic_params":["{ tactic }"],"text":"focus","type":"tactic.interactive.itactic → tactic unit"},"response":"ok","seq_num":7} -{"response":"ok","seq_num":9} +{"record":{"state":"b c : ℕ,\na_2 : b = 0\n⊢ b = 0\n\na b c : ℕ,\na_1 : a = b,\na_2 : b = 0\n⊢ b = a"},"response":"ok","seq_num":9}