X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fgc.h;h=224ae6ca32309013a39e21fd53732d32a6359a1c;hb=04ee798422795a1e3d664c257a6b02b833eec4c6;hp=90e94bf55da12d5bd54b4a83e7ac389c0d318180;hpb=fd225cfc39c6e4ba6f778b4201423cd3e83e0418;p=sbcl.git diff --git a/src/runtime/gc.h b/src/runtime/gc.h index 90e94bf..224ae6c 100644 --- a/src/runtime/gc.h +++ b/src/runtime/gc.h @@ -15,6 +15,15 @@ #ifndef _GC_H_ #define _GC_H_ + +#include "sbcl.h" + +#ifdef LISP_FEATURE_GENCGC +#define PAGE_BYTES GENCGC_PAGE_SIZE +#else +#define PAGE_BYTES 0x1000 +#endif + typedef signed long page_index_t; typedef signed char generation_index_t; @@ -29,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_ */