diff options
| -rw-r--r-- | toplevel/protectedtoplevel.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/toplevel/protectedtoplevel.ml b/toplevel/protectedtoplevel.ml index 322a28fa1b..26ca3b1cc2 100644 --- a/toplevel/protectedtoplevel.ml +++ b/toplevel/protectedtoplevel.ml @@ -127,7 +127,10 @@ let rec parse_one_command_group input_channel = output_results_nl (acknowledge_command !global_request_id rank (Some e1)) - | e -> raise e)); + | e -> + output_results_nl + (acknowledge_command + !global_request_id rank (Some e)))); rearm_break(); flush_until_end_of_stream stream_tail end |