Skip to content

Commit

Permalink
Don't use vmcast to convert the reified goal and actual goal
Browse files Browse the repository at this point in the history
VM can't avoid computing subterms of the goal that should be left alone.

Fix #133
  • Loading branch information
SkySkimmer committed Feb 26, 2024
1 parent 3fc2fb1 commit e8cfc65
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/aac_rewrite.ml
Original file line number Diff line number Diff line change
Expand Up @@ -135,7 +135,7 @@ let by_aac_reflexivity zero
(* This convert is required to deal with evars in a proper
way *)
let convert_to = mkApp (r, [| mkApp (eval,[| t |]); mkApp (eval, [|t'|])|]) in
let convert = Tactics.convert_concl ~cast:true ~check:true convert_to Constr.VMcast in
let convert = Tactics.convert_concl ~cast:true ~check:true convert_to Constr.DEFAULTcast in
let apply_tac = Tactics.apply decision_thm in
let open Proofview in
Coq.tclRETYPE decision_thm
Expand Down

0 comments on commit e8cfc65

Please sign in to comment.