diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-12-15 13:55:18 +0100 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-12-15 13:55:18 +0100 |
| commit | c1f7436d3e5e65c956fb7e5976e308a83f4d68bb (patch) | |
| tree | c7d553a6eb6d66372349702b817afd0e13d5a531 /driver | |
| parent | dd34b354f8c29f318204d74780f8ebc00be443df (diff) | |
| download | compcert-c1f7436d3e5e65c956fb7e5976e308a83f4d68bb.tar.gz compcert-c1f7436d3e5e65c956fb7e5976e308a83f4d68bb.zip | |
Check errors at the end. Bug 19872
Diffstat (limited to 'driver')
| -rw-r--r-- | driver/Driver.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/driver/Driver.ml b/driver/Driver.ml index 145de6c5..998c67ff 100644 --- a/driver/Driver.ml +++ b/driver/Driver.ml @@ -537,5 +537,6 @@ let _ = if (not nolink) && linker_args <> [] then begin linker (output_filename_default "a.out") linker_args end; + Cerrors.check_errors () with Sys_error msg -> eprintf "I/O error: %s.\n" msg; exit 2 |