summaryrefslogtreecommitdiff
path: root/rts/sm
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2010-06-17 10:57:58 +0000
committerSimon Marlow <marlowsd@gmail.com>2010-06-17 10:57:58 +0000
commit51b85031ce99f1e9d4c72249d6d85672188f0fbd (patch)
tree6fefe3ba6a0ee5507ce31d8a9eb884af47b0717e /rts/sm
parenta998343dfabe92da17b2f60c78968eff2f444050 (diff)
downloadhaskell-51b85031ce99f1e9d4c72249d6d85672188f0fbd.tar.gz
Fix the symbol visibility pragmas
Diffstat (limited to 'rts/sm')
-rw-r--r--rts/sm/BlockAlloc.h4
-rw-r--r--rts/sm/Compact.h4
-rw-r--r--rts/sm/Evac.h4
-rw-r--r--rts/sm/GC.h4
-rw-r--r--rts/sm/GCThread.h4
-rw-r--r--rts/sm/GCUtils.h4
-rw-r--r--rts/sm/MarkStack.h4
-rw-r--r--rts/sm/MarkWeak.h4
-rw-r--r--rts/sm/OSMem.h4
-rw-r--r--rts/sm/Sanity.h4
-rw-r--r--rts/sm/Scav.h4
-rw-r--r--rts/sm/Storage.h4
12 files changed, 24 insertions, 24 deletions
diff --git a/rts/sm/BlockAlloc.h b/rts/sm/BlockAlloc.h
index b6d451f39f..c195baa43a 100644
--- a/rts/sm/BlockAlloc.h
+++ b/rts/sm/BlockAlloc.h
@@ -9,7 +9,7 @@
#ifndef BLOCK_ALLOC_H
#define BLOCK_ALLOC_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
/* Debugging -------------------------------------------------------------- */
@@ -26,6 +26,6 @@ void reportUnmarkedBlocks (void);
extern lnat n_alloc_blocks; // currently allocated blocks
extern lnat hw_alloc_blocks; // high-water allocated blocks
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* BLOCK_ALLOC_H */
diff --git a/rts/sm/Compact.h b/rts/sm/Compact.h
index efd7351b58..0dce3d0cb6 100644
--- a/rts/sm/Compact.h
+++ b/rts/sm/Compact.h
@@ -14,7 +14,7 @@
#ifndef SM_COMPACT_H
#define SM_COMPACT_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
INLINE_HEADER void
mark(StgPtr p, bdescr *bd)
@@ -48,6 +48,6 @@ is_marked(StgPtr p, bdescr *bd)
void compact (StgClosure *static_objects);
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_COMPACT_H */
diff --git a/rts/sm/Evac.h b/rts/sm/Evac.h
index 52346b1fd2..c95658a1bf 100644
--- a/rts/sm/Evac.h
+++ b/rts/sm/Evac.h
@@ -14,7 +14,7 @@
#ifndef SM_EVAC_H
#define SM_EVAC_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
// Use a register argument for evacuate, if available.
// Earlier, the regparm attribute was used whenever __GNUC__ >= 2, but this
@@ -37,7 +37,7 @@ REGPARM1 void evacuate1 (StgClosure **p);
extern lnat thunk_selector_depth;
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_EVAC_H */
diff --git a/rts/sm/GC.h b/rts/sm/GC.h
index e871f4c56c..38fc87ca44 100644
--- a/rts/sm/GC.h
+++ b/rts/sm/GC.h
@@ -14,7 +14,7 @@
#ifndef SM_GC_H
#define SM_GC_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
void GarbageCollect(rtsBool force_major_gc, nat gc_type, Capability *cap);
@@ -53,6 +53,6 @@ void releaseGCThreads (Capability *cap);
#define WORK_UNIT_WORDS 128
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_GC_H */
diff --git a/rts/sm/GCThread.h b/rts/sm/GCThread.h
index 7d46232513..65554c47c4 100644
--- a/rts/sm/GCThread.h
+++ b/rts/sm/GCThread.h
@@ -16,7 +16,7 @@
#include "WSDeque.h"
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
/* -----------------------------------------------------------------------------
General scheme
@@ -276,7 +276,7 @@ extern StgWord8 the_gc_thread[];
#endif
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif // SM_GCTHREAD_H
diff --git a/rts/sm/GCUtils.h b/rts/sm/GCUtils.h
index 1fbbe3c377..070a5545b0 100644
--- a/rts/sm/GCUtils.h
+++ b/rts/sm/GCUtils.h
@@ -14,7 +14,7 @@
#ifndef SM_GCUTILS_H
#define SM_GCUTILS_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
bdescr *allocBlock_sync(void);
void freeChain_sync(bdescr *bd);
@@ -61,6 +61,6 @@ recordMutableGen_GC (StgClosure *p, nat gen_no)
*bd->free++ = (StgWord)p;
}
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_GCUTILS_H */
diff --git a/rts/sm/MarkStack.h b/rts/sm/MarkStack.h
index bf445b327a..db79ca4520 100644
--- a/rts/sm/MarkStack.h
+++ b/rts/sm/MarkStack.h
@@ -14,7 +14,7 @@
#ifndef SM_MARKSTACK_H
#define SM_MARKSTACk_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
INLINE_HEADER void
push_mark_stack(StgPtr p)
@@ -66,6 +66,6 @@ mark_stack_empty(void)
return (((W_)mark_sp & BLOCK_MASK) == 0 && mark_stack_bd->link == NULL);
}
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_MARKSTACK_H */
diff --git a/rts/sm/MarkWeak.h b/rts/sm/MarkWeak.h
index 5c05ab2499..64ccb0f027 100644
--- a/rts/sm/MarkWeak.h
+++ b/rts/sm/MarkWeak.h
@@ -14,7 +14,7 @@
#ifndef SM_MARKWEAK_H
#define SM_MARKWEAK_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
extern StgWeak *old_weak_ptr_list;
extern StgTSO *resurrected_threads;
@@ -24,6 +24,6 @@ void initWeakForGC ( void );
rtsBool traverseWeakPtrList ( void );
void markWeakPtrList ( void );
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_MARKWEAK_H */
diff --git a/rts/sm/OSMem.h b/rts/sm/OSMem.h
index ee6b810f39..3349140529 100644
--- a/rts/sm/OSMem.h
+++ b/rts/sm/OSMem.h
@@ -9,7 +9,7 @@
#ifndef SM_OSMEM_H
#define SM_OSMEM_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
void osMemInit(void);
void *osGetMBlocks(nat n);
@@ -17,6 +17,6 @@ void osFreeAllMBlocks(void);
lnat getPageSize (void);
void setExecutable (void *p, lnat len, rtsBool exec);
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_OSMEM_H */
diff --git a/rts/sm/Sanity.h b/rts/sm/Sanity.h
index 5c963b4c23..602be54724 100644
--- a/rts/sm/Sanity.h
+++ b/rts/sm/Sanity.h
@@ -11,7 +11,7 @@
#ifdef DEBUG
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
# if defined(PAR)
# define PVM_PE_MASK 0xfffc0000
@@ -42,7 +42,7 @@ void memInventory (rtsBool show);
void checkBQ (StgTSO *bqe, StgClosure *closure);
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* DEBUG */
diff --git a/rts/sm/Scav.h b/rts/sm/Scav.h
index ad466c8488..699e48cbac 100644
--- a/rts/sm/Scav.h
+++ b/rts/sm/Scav.h
@@ -14,7 +14,7 @@
#ifndef SM_SCAV_H
#define SM_SCAV_H
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
void scavenge_loop (void);
void scavenge_mutable_list (bdescr *bd, generation *gen);
@@ -26,7 +26,7 @@ void scavenge_mutable_list1 (bdescr *bd, generation *gen);
void scavenge_capability_mut_Lists1 (Capability *cap);
#endif
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_SCAV_H */
diff --git a/rts/sm/Storage.h b/rts/sm/Storage.h
index f8532e03c1..f6c50ad2f5 100644
--- a/rts/sm/Storage.h
+++ b/rts/sm/Storage.h
@@ -11,7 +11,7 @@
#include "Capability.h"
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
/* -----------------------------------------------------------------------------
Initialisation / De-initialisation
@@ -151,6 +151,6 @@ void move_TSO (StgTSO *src, StgTSO *dest);
extern StgClosure * caf_list;
extern StgClosure * revertible_caf_list;
-END_RTS_PRIVATE
+#include "EndPrivate.h"
#endif /* SM_STORAGE_H */