aboutsummaryrefslogtreecommitdiff
path: root/theories/Pattern.v
diff options
context:
space:
mode:
Diffstat (limited to 'theories/Pattern.v')
-rw-r--r--theories/Pattern.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Pattern.v b/theories/Pattern.v
index ff7776b682..8d1fb0cd8a 100644
--- a/theories/Pattern.v
+++ b/theories/Pattern.v
@@ -125,7 +125,7 @@ Ltac2 lazy_goal_match0 rev pats :=
in
Control.plus cur next
end in
- interp pats ().
+ Control.once (fun () => interp pats) ().
Ltac2 multi_goal_match0 rev pats :=
let rec interp m := match m with