summaryrefslogtreecommitdiff
path: root/rts/Capability.h
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Capability.h')
-rw-r--r--rts/Capability.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/Capability.h b/rts/Capability.h
index fb199e2a3e..6fdc002049 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -22,6 +22,8 @@
#include "Task.h"
#include "Sparks.h"
+#pragma GCC visibility push(hidden)
+
struct Capability_ {
// State required by the STG virtual machine when running Haskell
// code. During STG execution, the BaseReg register always points
@@ -330,4 +332,6 @@ contextSwitchCapability (Capability *cap)
cap->context_switch = 1;
}
+#pragma GCC visibility pop
+
#endif /* CAPABILITY_H */