aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEnrico Tassi2015-02-27 17:18:16 +0100
committerEnrico Tassi2015-02-27 17:19:12 +0100
commiteb3e8efaaafd0de673184db85b9b647cfa24dd92 (patch)
tree0612a1ca1e831eb5974ecf3a28f978ff1e6a46b3
parentb3c66b03da5e7f3335960eb38a37f5f85f84119b (diff)
STM: Considering Stack_overflow as a normal tactic error (Close #3576)
-rw-r--r--stm/stm.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/stm.ml b/stm/stm.ml
index 5edf480446..b38407c045 100644
--- a/stm/stm.ml
+++ b/stm/stm.ml
@@ -1067,7 +1067,7 @@ end = struct (* {{{ *)
ignore(Future.join checked_proof);
RespBuiltProof(proof,time)
with
- | e when Errors.noncritical e ->
+ | e when Errors.noncritical e || e = Stack_overflow ->
let (e, info) = Errors.push e in
(* This can happen if the proof is broken. The error has also been
* signalled as a feedback, hence we can silently recover *)