summaryrefslogtreecommitdiff
path: root/rts/Capability.h
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-09-09 09:32:17 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-09-09 09:32:17 +0000
commit9a9803e8dc80ba41bd3e2d31228e64fa6b61060e (patch)
tree7a31b6abc9b585771bd88df29e8502bb0e5da31b /rts/Capability.h
parentb25c93f1c914d81d77aeafeb49263f29bed128aa (diff)
downloadhaskell-9a9803e8dc80ba41bd3e2d31228e64fa6b61060e.tar.gz
Omit visibility pragmas on Windows (fixes warnings/validate failures)
Diffstat (limited to 'rts/Capability.h')
-rw-r--r--rts/Capability.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Capability.h b/rts/Capability.h
index 6fdc002049..3f01bf3d88 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -22,7 +22,7 @@
#include "Task.h"
#include "Sparks.h"
-#pragma GCC visibility push(hidden)
+BEGIN_RTS_PRIVATE
struct Capability_ {
// State required by the STG virtual machine when running Haskell
@@ -332,6 +332,6 @@ contextSwitchCapability (Capability *cap)
cap->context_switch = 1;
}
-#pragma GCC visibility pop
+END_RTS_PRIVATE
#endif /* CAPABILITY_H */