aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/Cleanup.ml
diff options
context:
space:
mode:
Diffstat (limited to 'cparser/Cleanup.ml')
-rw-r--r--cparser/Cleanup.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/cparser/Cleanup.ml b/cparser/Cleanup.ml
index 63ac8ac1..b15e150c 100644
--- a/cparser/Cleanup.ml
+++ b/cparser/Cleanup.ml
@@ -131,9 +131,9 @@ let visible_decl (sto, id, ty, init) =
let visible_fundef f =
match f.fd_storage with
- | Storage_default -> not f.fd_inline
- | Storage_extern -> true
- | Storage_static -> false
+ | Storage_default | Storage_thread_local -> not f.fd_inline
+ | Storage_extern | Storage_thread_local_extern -> true
+ | Storage_static | Storage_thread_local_static -> false
| Storage_auto | Storage_register -> assert false
let rec add_init_globdecls accu = function