diff options
| author | Enrico Tassi | 2014-09-09 13:11:16 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2014-09-09 13:11:38 +0200 |
| commit | ba30a3da1f41aec6404b49832cdc8516fdcc78ec (patch) | |
| tree | 413ea748445c8e53d20c2dc551cfa6a39ba363f6 | |
| parent | 6129d83ad15799b6b9318a1c4fa5fc73ddbb5ad9 (diff) | |
Marshalling errors should be bold and red (should never happen actually)
| -rw-r--r-- | stm/stm.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/stm.ml b/stm/stm.ml index da2d0fb38e..e5e156a4db 100644 --- a/stm/stm.ml +++ b/stm/stm.ml @@ -817,7 +817,7 @@ module Task = struct let on_marshal_error s { t_exn_info; t_stop; t_assign; t_loc } = if !fallback_to_lazy_if_marshal_error then begin - msg_warning(strbrk("Marshalling error: "^s^". "^ + msg_error(strbrk("Marshalling error: "^s^". "^ "The system state could not be sent to the worker process. "^ "Falling back to local, lazy, evaluation.")); t_assign(`Comp(build_proof_here t_exn_info t_loc t_stop)); |