diff options
| author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-02-29 09:49:21 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-02-29 09:49:21 +0000 |
| commit | f4954776822ac0b32d5ed659301f2377950f9ca1 (patch) | |
| tree | 84ad301e3470fbe81ae6c82241fa189e59942c70 /cparser/Parse.ml | |
| parent | c42d68fdeeef7d08b64a900f52d6b295ad31f4f0 (diff) | |
| download | compcert-kvx-f4954776822ac0b32d5ed659301f2377950f9ca1.tar.gz compcert-kvx-f4954776822ac0b32d5ed659301f2377950f9ca1.zip | |
Problems with multiple declarations of publically-visible identifiers
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1831 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cparser/Parse.ml')
| -rw-r--r-- | cparser/Parse.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Parse.ml b/cparser/Parse.ml index 2c467a76..0fc85bf3 100644 --- a/cparser/Parse.ml +++ b/cparser/Parse.ml @@ -44,7 +44,7 @@ let preprocessed_file transfs name sourcefile = let ic = open_in sourcefile in let p = try - Rename.program (transform_program t (Elab.elab_preprocessed_file name ic)) + transform_program t (Elab.elab_preprocessed_file name ic) with Parsing.Parse_error -> Errors.error "Error during parsing"; [] | Errors.Abort -> |