aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--cfrontend/C2C.ml1
-rw-r--r--cparser/Elab.ml1
2 files changed, 2 insertions, 0 deletions
diff --git a/cfrontend/C2C.ml b/cfrontend/C2C.ml
index eecda71b..3bd1eea0 100644
--- a/cfrontend/C2C.ml
+++ b/cfrontend/C2C.ml
@@ -271,6 +271,7 @@ let attributes = [
("packed", Cutil.Attr_struct);
(* function-related *)
("noreturn", Cutil.Attr_function);
+ ("noinline",Cutil.Attr_function);
(* name-related *)
("section", Cutil.Attr_name);
("unused", Cutil.Attr_name)
diff --git a/cparser/Elab.ml b/cparser/Elab.ml
index 050bdf6c..07351c46 100644
--- a/cparser/Elab.ml
+++ b/cparser/Elab.ml
@@ -2365,6 +2365,7 @@ let elab_fundef env spec name defs body loc =
&& can_return then
warning loc Invalid_noreturn "function '%s' declared 'noreturn' should not return" s;
(* Build and emit function definition *)
+ let inline = inline && find_custom_attributes ["noinline";"__noinline__"] attr = [] in
let fn =
{ fd_storage = sto1;
fd_inline = inline;