diff options
author | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-25 16:03:57 +0200 |
---|---|---|
committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-25 16:03:57 +0200 |
commit | ec95665e087d39e29ece455b90e7d5918dc88cee (patch) | |
tree | f4d63da0c4becb9d80a72adf4bd84880eed54ebe /cparser/Env.ml | |
parent | 640babdc9ea0958de967ce8b5ac84bb0309b3835 (diff) | |
download | compcert-kvx-ec95665e087d39e29ece455b90e7d5918dc88cee.tar.gz compcert-kvx-ec95665e087d39e29ece455b90e7d5918dc88cee.zip |
Reuse types from parameters in function definitons
In order to allow introducing structs in parameter definitions the
environment must keep the type information.
Bug 19602
Diffstat (limited to 'cparser/Env.ml')
-rw-r--r-- | cparser/Env.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/cparser/Env.ml b/cparser/Env.ml index dae79ef2..4d902e09 100644 --- a/cparser/Env.ml +++ b/cparser/Env.ml @@ -251,6 +251,9 @@ let add_enum env id info = { env with env_enum = IdentMap.add id info env.env_enum } info.ei_members +let add_types env_old env_new = + { env_new with env_ident = env_old.env_ident;} + (* Error reporting *) open Printf |