diff options
author | Xavier Leroy <xavierleroy@users.noreply.github.com> | 2017-02-17 13:47:54 +0100 |
---|---|---|
committer | GitHub <noreply@github.com> | 2017-02-17 13:47:54 +0100 |
commit | 920686c5feabda7a7b7310e89e9d0e18a822284e (patch) | |
tree | 78971539decbd3f8d7abca5ff1107e0295d275a9 /cparser/Cutil.ml | |
parent | 9b63d90b40974eed35bd199fcfc6ccbabb1ed5b7 (diff) | |
parent | db98d9de791c997ccb659ede00239d74926f68f4 (diff) | |
download | compcert-920686c5feabda7a7b7310e89e9d0e18a822284e.tar.gz compcert-920686c5feabda7a7b7310e89e9d0e18a822284e.zip |
Merge pull request #172 from AbsInt/std_noreturn_fun
Treat as _Noreturn the standard C11 functions that are _Noreturn but not always declared as such in header files.
Diffstat (limited to 'cparser/Cutil.ml')
-rw-r--r-- | cparser/Cutil.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/cparser/Cutil.ml b/cparser/Cutil.ml index 6cafaf17..124560e5 100644 --- a/cparser/Cutil.ml +++ b/cparser/Cutil.ml @@ -954,6 +954,10 @@ let is_debug_stmt s = is_debug_call e | _ -> false +let is_call_to_fun e s = + match e.edesc with + | EVar id -> id.C.name = s + | _ -> false (* Assignment compatibility check over attributes. Standard attributes ("const", "volatile", "restrict") can safely |