blob: 66a4ce69eb58ef262bc7fdc6a6ea80984b1dcd5c (
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
|
%************************************************************************
%* *
\subsection[Force_GC.lh]{}
%* *
%************************************************************************
Multi-slurp protection:
\begin{code}
#ifndef Force_GC_H
#define Force_GC_H
#ifdef FORCE_GC
extern I_ force_GC; /* Are we forcing GC ? */
extern I_ GCInterval; /* GC resolution (in words allocated) */
extern I_ alloc_since_last_major_GC; /* words allocated since last major GC */
#define DEFAULT_GC_INTERVAL 5000000
#endif /* FORCE_GC */
\end{code}
End multi-slurp protection:
\begin{code}
#endif /* ! Force_GC_H */
\end{code}
|
