diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2016-03-06 10:23:18 +0100 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2016-03-06 10:23:18 +0100 |
commit | 2b5f5cb0bb6d8dbf302ab6d84c27eda30252912d (patch) | |
tree | aea549d4f8a35fe5ca70a4eb7c21c2bafdc9781d /common/PrintAST.ml | |
parent | be2315351761e4fc0430b91ac791d66eec0e0cd7 (diff) | |
download | compcert-kvx-2b5f5cb0bb6d8dbf302ab6d84c27eda30252912d.tar.gz compcert-kvx-2b5f5cb0bb6d8dbf302ab6d84c27eda30252912d.zip |
Add support for EF_runtime externals
Also: in Events, use Senv.equiv to state invariance wrt changes of global envs.
Diffstat (limited to 'common/PrintAST.ml')
-rw-r--r-- | common/PrintAST.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/common/PrintAST.ml b/common/PrintAST.ml index 39481bfb..766f586b 100644 --- a/common/PrintAST.ml +++ b/common/PrintAST.ml @@ -39,6 +39,7 @@ let name_of_chunk = function let name_of_external = function | EF_external(name, sg) -> sprintf "extern %S" (camlstring_of_coqstring name) | EF_builtin(name, sg) -> sprintf "builtin %S" (camlstring_of_coqstring name) + | EF_runtime(name, sg) -> sprintf "runtime %S" (camlstring_of_coqstring name) | EF_vload chunk -> sprintf "volatile load %s" (name_of_chunk chunk) | EF_vstore chunk -> sprintf "volatile store %s" (name_of_chunk chunk) | EF_malloc -> "malloc" |