Skip to content

Commit

Permalink
Steel.Effect.Common: mark init_resolve_tac as a plugin
Browse files Browse the repository at this point in the history
  • Loading branch information
mtzguido committed Sep 30, 2020
1 parent 4592e12 commit 021bdeb
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion ulib/experimental/Steel.Effect.Common.fst
Original file line number Diff line number Diff line change
Expand Up @@ -1082,7 +1082,7 @@ let rec filter_goals (l:list goal) : Tac (list goal * list goal) =
| App t _ -> if term_eq t (`squash) then hd::slgoals, loggoals else slgoals, loggoals
| _ -> slgoals, loggoals

[@@ resolve_implicits; framing_implicit]
[@@ resolve_implicits; framing_implicit; plugin]
let init_resolve_tac () : Tac unit =
let slgs, loggs = filter_goals (goals()) in
set_goals slgs;
Expand Down

0 comments on commit 021bdeb

Please sign in to comment.