aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorYann Herklotz <git@yannherklotz.com>2022-03-13 16:35:30 +0000
committerYann Herklotz <git@yannherklotz.com>2022-03-13 16:35:30 +0000
commit9c72ffe762dc2f90109d5991f74ee0ee4e9a8ec3 (patch)
tree350be186a64d5dd2474605ab71f384bffb95cbfc
parent5987aafe3bf6b6382f0a90c9209a7c79be1cab3c (diff)
downloadcompcert-kvx-9c72ffe762dc2f90109d5991f74ee0ee4e9a8ec3.tar.gz
compcert-kvx-9c72ffe762dc2f90109d5991f74ee0ee4e9a8ec3.zip
Add always inlining
-rw-r--r--backend/Inliningaux.ml5
1 files changed, 1 insertions, 4 deletions
diff --git a/backend/Inliningaux.ml b/backend/Inliningaux.ml
index cf308962..0607547b 100644
--- a/backend/Inliningaux.ml
+++ b/backend/Inliningaux.ml
@@ -90,9 +90,6 @@ let small_enough (f : coq_function) =
let should_inline (io: inlining_info) (id: ident) (f: coq_function) =
if !Clflags.option_finline then begin
- match C2C.atom_inline id with
- | C2C.Inline -> true
- | C2C.Noinline -> false
- | C2C.No_specifier -> static_called_once id io || small_enough f
+ true
end else
false