summaryrefslogtreecommitdiff
path: root/ghc/runtime/storage/SMextn.lh
blob: ed2e3a86e6c28aacce4add9b5ad407ab9b45b40b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
\section[SMextensions-header]{Header file for SMextensions}

\begin{code}
#ifndef PAR

extern void initExtensions PROTO((smInfo *sm));

#if defined(_INFO_COPYING)

extern void evacSPTable PROTO((smInfo *sm));
extern void reportDeadMallocPtrs PROTO((StgPtr oldMPList, StgPtr new, StgPtr *newMPLust));

#endif /* _INFO_COPYING */

#if defined(_INFO_COMPACTING)

extern void sweepUpDeadMallocPtrs PROTO((
					 P_ MallocPtrList,
					 P_ base,
					 BitWord *bits
					 ));

#endif /* _INFO_COMPACTING */

extern void TrashMem PROTO(( P_ from, P_ to ));

#if defined(DEBUG)

extern void Trash_MallocPtr_Closure PROTO((P_ mptr));
extern void Validate_MallocPtrList PROTO(( P_ MallocPtrList ));

extern void Trace_MPdies  PROTO((void));
extern void Trace_MPlives PROTO((void));
extern void Trace_MPforwarded PROTO(( P_ MPPtr, P_ newAddress ));


#endif /* DEBUG */

#endif /* !PAR */
\end{code}