diff options
Diffstat (limited to 'caml')
| -rw-r--r-- | caml/Main2.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/caml/Main2.ml b/caml/Main2.ml index 88f5b72d..ff9f3509 100644 --- a/caml/Main2.ml +++ b/caml/Main2.ml @@ -64,8 +64,10 @@ let process_c_file sourcename = try Frontc.parse preproname () with - Frontc.ParseError msg -> + | Frontc.ParseError msg -> eprintf "Error during parsing: %s\n" msg; + exit 2 + | Errormsg.Error -> exit 2 in Sys.remove preproname; (* Restore source file name before preprocessing *) |