diff options
author | Han-Wen Nienhuys <hanwen@xs4all.nl> | 2008-08-16 11:57:27 -0300 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@xs4all.nl> | 2008-08-16 13:21:42 -0300 |
commit | d09752ffd17688b33a1e828cf4c11f66b86c3c3c (patch) | |
tree | 1eb7f19ed5592222011506ac97fb758144e5de18 /libguile/gc.h | |
parent | e89b7b36259edb20f60efc0e3e11fa83e5b35b89 (diff) | |
download | guile-d09752ffd17688b33a1e828cf4c11f66b86c3c3c.tar.gz |
Introduce scm_i_marking to detect when GC mark bits are touched
outside of marking stage.
Diffstat (limited to 'libguile/gc.h')
-rw-r--r-- | libguile/gc.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/gc.h b/libguile/gc.h index 05412bccf..939f80071 100644 --- a/libguile/gc.h +++ b/libguile/gc.h @@ -155,6 +155,8 @@ typedef unsigned long scm_t_c_bvec_long; /* testing and changing GC marks */ #define SCM_GC_MARK_P(x) SCM_GC_CELL_GET_BIT (x) + +void ensure_marking(void); #define SCM_SET_GC_MARK(x) SCM_GC_CELL_SET_BIT (x) #define SCM_CLEAR_GC_MARK(x) SCM_GC_CELL_CLEAR_BIT (x) |