X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fgc.h;h=35f9d126b253630e251d4272ca3aa40b302c95ce;hb=07ab1e4811ab16f95a9a5e8d767426a0787f22c0;hp=6da2236bb6ab4a3ce85cc86ff82d83fedf20bec0;hpb=a608f5895479f67690a819a781cdb75641b13c61;p=sbcl.git diff --git a/src/runtime/gc.h b/src/runtime/gc.h index 6da2236..35f9d12 100644 --- a/src/runtime/gc.h +++ b/src/runtime/gc.h @@ -16,9 +16,20 @@ #ifndef _GC_H_ #define _GC_H_ +#include "sbcl.h" + +#ifdef LISP_FEATURE_GENCGC +#define PAGE_BYTES GENCGC_PAGE_BYTES +#else +#define PAGE_BYTES BACKEND_PAGE_BYTES +#endif + +typedef signed long page_index_t; +typedef signed char generation_index_t; + extern void gc_init(void); extern void gc_initialize_pointers(void); -extern void collect_garbage(unsigned last_gen); +extern void collect_garbage(generation_index_t last_gen); extern void gc_init_tables(void); @@ -27,8 +38,12 @@ extern void gc_init_tables(void); extern void set_auto_gc_trigger(os_vm_size_t usage); extern void clear_auto_gc_trigger(void); -extern int maybe_gc_pending; - #include "fixnump.h" +#include "pseudo-atomic.h" + +extern boolean maybe_gc(os_context_t *context); + +extern unsigned long bytes_consed_between_gcs; + #endif /* _GC_H_ */