diff options
| -rw-r--r-- | tactics/class_tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/class_tactics.ml b/tactics/class_tactics.ml index 01c9cda49..3fca7f50d 100644 --- a/tactics/class_tactics.ml +++ b/tactics/class_tactics.ml @@ -1217,7 +1217,7 @@ module Search = struct (if Option.is_empty depth then mt() else str" without reaching its limit")) | e -> Proofview.tclZERO ~info:ie e - in Proofview.tclORELSE tac error + in Proofview.tclOR tac error let run_on_evars ?(unique=false) p evm tac = match evars_to_goals p evm with |