diff options
Diffstat (limited to 'debugger/unix_tools.ml')
| -rw-r--r-- | debugger/unix_tools.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/debugger/unix_tools.ml b/debugger/unix_tools.ml index ec4f4079c..9de33ca5b 100644 --- a/debugger/unix_tools.ml +++ b/debugger/unix_tools.ml @@ -40,7 +40,7 @@ let convert_address address = (*** Report an unix error. ***) let report_error = function - Unix_error (err, fun_name, arg) -> + | Unix_error (err, fun_name, arg) -> prerr_string "Unix error : '"; prerr_string fun_name; prerr_string "' failed"; |