projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1997-09-05 14:11:05 by simonm]
[ghc-hetmet.git]
/
ghc
/
includes
/
SMinterface.lh
diff --git
a/ghc/includes/SMinterface.lh
b/ghc/includes/SMinterface.lh
index
6b27286
..
88a7eb7
100644
(file)
--- a/
ghc/includes/SMinterface.lh
+++ b/
ghc/includes/SMinterface.lh
@@
-78,14
+78,14
@@
Question: Where are the stable pointer roots? (JSM)
Answer: They're on the heap in a "Stable Pointer Table". (ADR)
\begin{code}
#ifndef CONCURRENT
Answer: They're on the heap in a "Stable Pointer Table". (ADR)
\begin{code}
#ifndef CONCURRENT
-# define SM_MAXROOTS 8 /* 8 Vanilla Regs */
+# define SM_MAXROOTS 9 /* 8 Vanilla Regs + stable pointer table*/
#else
# ifndef PAR
# ifdef GRAN
# define SM_MAXROOTS (10 + (MAX_PROC*2) + 2 )
/* unthreaded + hd/tl thread queues + Current/Main TSOs */
# else
#else
# ifndef PAR
# ifdef GRAN
# define SM_MAXROOTS (10 + (MAX_PROC*2) + 2 )
/* unthreaded + hd/tl thread queues + Current/Main TSOs */
# else
-# define SM_MAXROOTS 5 /* See c-as-asm/HpOverflow.lc */
+# define SM_MAXROOTS 6 /* See c-as-asm/HpOverflow.lc */
# endif
# else
# define SM_MAXROOTS 6 /* See c-as-asm/HpOverflow.lc */
# endif
# else
# define SM_MAXROOTS 6 /* See c-as-asm/HpOverflow.lc */
@@
-106,7
+106,7
@@
IF_RTS(rtsBool initThreadPools (STG_NO_ARGS);)
IF_RTS(void init_gr_profiling PROTO((int, char **, int, char **));)
#endif
IF_RTS(void init_gr_profiling PROTO((int, char **, int, char **));)
#endif
-I_ collectHeap PROTO((W_ reqsize, smInfo *sm, rtsBool do_full_collection));
+I_ collectHeap PROTO((W_ reqsize, smInfo *sm, rtsBool do_full_collection));
IF_RTS(void unmapMiddleStackPage PROTO((char *, int));) /* char * == caddr_t ? */
IF_RTS(void unmapMiddleStackPage PROTO((char *, int));) /* char * == caddr_t ? */
@@
-124,9
+124,8
@@
void end_init(STG_NO_ARGS);
#ifdef PAR
void EvacuateLocalGAs PROTO((rtsBool full));
#ifdef PAR
void EvacuateLocalGAs PROTO((rtsBool full));
-void RebuildGAtables PROTO((rtsBool full));
+void RebuildGAtables PROTO((rtsBool full));
#endif
#endif
-
\end{code}
@initSM@ finalizes any runtime parameters of the storage manager.
\end{code}
@initSM@ finalizes any runtime parameters of the storage manager.