diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-12-30 16:47:00 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-12-30 16:47:00 +0000 |
| commit | c67f5803d5cd84dae8bd78901f9056a1f2eff700 (patch) | |
| tree | e64197602c6b05d992e10d8658534b8d5cea2a9d /cparser/Cerrors.ml | |
| parent | 51e8bc524d570439f868ec0bdbf718cb53ca7669 (diff) | |
Catch and report Env errors arising out of some Cutil functions
(incomplete_type, sizeof, etc).
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2393 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cparser/Cerrors.ml')
| -rw-r--r-- | cparser/Cerrors.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Cerrors.ml b/cparser/Cerrors.ml index 188531e..83cd019 100644 --- a/cparser/Cerrors.ml +++ b/cparser/Cerrors.ml @@ -31,7 +31,7 @@ let fatal_error fmt = kfprintf (fun _ -> raise Abort) err_formatter - ("@[<hov 2>" ^^ fmt ^^ ".@]@.@[<hov 0>Fatal error.@]@.") + ("@[<hov 2>" ^^ fmt ^^ ".@]@.@[<hov 0>Fatal error; compilation aborted.@]@.") let error fmt = incr num_errors; |