From 7d7c187b4a12f1bb350e85cdb0115e19537cc704 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 5 Aug 2009 10:21:59 +0000 Subject: Declare RTS-private prototypes with __attribute__((visibility("hidden"))) This has no effect with static libraries, but when the RTS is in a shared library it does two things: - it prevents the function from being exposed by the shared library - internal calls to the function can use the faster non-PLT calls, because the function cannot be overriden at link time. --- rts/Apply.h | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'rts/Apply.h') diff --git a/rts/Apply.h b/rts/Apply.h index 76e36cb9fb..70faed4cb9 100644 --- a/rts/Apply.h +++ b/rts/Apply.h @@ -11,19 +11,19 @@ // canned slow entry points, indexed by arg type (ARG_P, ARG_PP, etc.) #ifdef IN_STG_CODE -extern StgWord stg_ap_stack_entries[]; +extern RTS_PRIVATE StgWord stg_ap_stack_entries[]; #else -extern StgFun *stg_ap_stack_entries[]; +extern RTS_PRIVATE StgFun *stg_ap_stack_entries[]; #endif // canned register save code for heap check failure in a function #ifdef IN_STG_CODE -extern StgWord stg_stack_save_entries[]; +extern RTS_PRIVATE StgWord stg_stack_save_entries[]; #else -extern StgFun *stg_stack_save_entries[]; +extern RTS_PRIVATE StgFun *stg_stack_save_entries[]; #endif // canned bitmap for each arg type -extern StgWord stg_arg_bitmaps[]; +extern RTS_PRIVATE StgWord stg_arg_bitmaps[]; #endif /* APPLY_H */ -- cgit v1.2.1