summaryrefslogtreecommitdiff
path: root/cparser/Rename.ml
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-03-28 13:32:21 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-03-28 13:32:21 +0000
commitbefbc76f89f3d8abc8da17caf91ea4a87ec96eeb (patch)
treed84d76258ca9b2505713552bb62be8c40714787b /cparser/Rename.ml
parent26c166e279ec05837b6b3b5db80a7ef3c520db32 (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/Rename.ml')
-rw-r--r--cparser/Rename.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/cparser/Rename.ml b/cparser/Rename.ml
index 76c3c12..034df24 100644
--- a/cparser/Rename.ml
+++ b/cparser/Rename.ml
@@ -83,8 +83,8 @@ let ident env id =
try
IdentMap.find id env.re_id
with Not_found ->
- Errors.fatal_error "Internal error: Rename: %s__%d unbound"
- id.name id.stamp
+ Cerrors.fatal_error "Internal error: Rename: %s__%d unbound"
+ id.name id.stamp
let rec typ env = function
| TPtr(ty, a) -> TPtr(typ env ty, a)