aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/omega/coq_omega.ml
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/omega/coq_omega.ml')
-rw-r--r--plugins/omega/coq_omega.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/plugins/omega/coq_omega.ml b/plugins/omega/coq_omega.ml
index f39549514..72290e681 100644
--- a/plugins/omega/coq_omega.ml
+++ b/plugins/omega/coq_omega.ml
@@ -1857,6 +1857,7 @@ let destructure_goal =
in
Tacticals.New.tclTHEN goal_tac destructure_hyps
in
+ let concl = EConstr.Unsafe.to_constr concl in
(loop concl)
end }