diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-28 13:32:21 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-28 13:32:21 +0000 |
| commit | befbc76f89f3d8abc8da17caf91ea4a87ec96eeb (patch) | |
| tree | d84d76258ca9b2505713552bb62be8c40714787b /cparser/Elab.ml | |
| parent | 26c166e279ec05837b6b3b5db80a7ef3c520db32 (diff) | |
checklink: first import of Valentin Robert's validator for asm and link
cparser: renamed Errors to Cerrors; removed packing into Cparser.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1856 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cparser/Elab.ml')
| -rw-r--r-- | cparser/Elab.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/cparser/Elab.ml b/cparser/Elab.ml index f9b70c4..2473cf2 100644 --- a/cparser/Elab.ml +++ b/cparser/Elab.ml @@ -16,7 +16,7 @@ (* Elaboration from Cabs parse tree to C simplified, typed syntax tree *) open Format -open Errors +open Cerrors open Machine open Cabs open Cabshelper @@ -29,13 +29,13 @@ open Env (* Error reporting *) let fatal_error loc fmt = - Errors.fatal_error ("%a: Error:@ " ^^ fmt) format_cabsloc loc + Cerrors.fatal_error ("%a: Error:@ " ^^ fmt) format_cabsloc loc let error loc fmt = - Errors.error ("%a: Error:@ " ^^ fmt) format_cabsloc loc + Cerrors.error ("%a: Error:@ " ^^ fmt) format_cabsloc loc let warning loc fmt = - Errors.warning ("%a: Warning:@ " ^^ fmt) format_cabsloc loc + Cerrors.warning ("%a: Warning:@ " ^^ fmt) format_cabsloc loc (* Error reporting for Env functions *) |