diff options
Diffstat (limited to 'tactics/auto.ml')
| -rw-r--r-- | tactics/auto.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/auto.ml b/tactics/auto.ml index 853720877..b5586bbd9 100644 --- a/tactics/auto.ml +++ b/tactics/auto.ml @@ -1110,7 +1110,7 @@ let (forward_interp_tactic, extern_interp) = Hook.make () let conclPattern concl pat tac gl = let constr_bindings = match pat with - | None -> [] + | None -> Id.Map.empty | Some pat -> try matches pat concl with PatternMatchingFailure -> error "conclPattern" in |