diff options
Diffstat (limited to 'proofs/refiner.ml')
| -rw-r--r-- | proofs/refiner.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/proofs/refiner.ml b/proofs/refiner.ml index 8e358adea2..eb7118398e 100644 --- a/proofs/refiner.ml +++ b/proofs/refiner.ml @@ -432,6 +432,7 @@ let tclORELSE0 t1 t2 g = t1 g with | e when catchable_exception e -> t2 g + | _ -> failwith "ICI!" | FailError lvl -> if lvl = 0 then t2 g |