diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1995-05-04 10:15:53 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1995-05-04 10:15:53 +0000 |
| commit | 61bd8ace6bdb2652f4d51d64e3239a7105f56c26 (patch) | |
| tree | e8b957df0957c1b483d41d68973824e280445548 /byterun/minor_gc.h | |
| parent | 8f9ea2a7b886e3e0a5cfd76b11fe79d083a7f20c (diff) | |
| download | ocaml-61bd8ace6bdb2652f4d51d64e3239a7105f56c26.tar.gz | |
Passage a la version bootstrappee (franchissement du Rubicon)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/minor_gc.h')
| -rw-r--r-- | byterun/minor_gc.h | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/byterun/minor_gc.h b/byterun/minor_gc.h new file mode 100644 index 0000000000..112ba58a97 --- /dev/null +++ b/byterun/minor_gc.h @@ -0,0 +1,19 @@ +#ifndef _minor_gc_ +#define _minor_gc_ + + +#include "misc.h" + +extern char *young_start, *young_ptr, *young_end; +extern value **ref_table_ptr, **ref_table_limit; +extern asize_t minor_heap_size; + +#define Is_young(val) \ + ((addr)(val) > (addr)young_start && (addr)(val) < (addr)young_end) + +extern void set_minor_heap_size P((asize_t)); +extern void minor_collection P((void)); +extern void realloc_ref_table P((void)); + + +#endif /* _minor_gc_ */ |