1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-20 02:30:23 +02:00

Introduce scm_i_marking to detect when GC mark bits are touched

outside of marking stage.
This commit is contained in:
Han-Wen Nienhuys 2008-08-16 11:57:27 -03:00
parent e89b7b3625
commit d09752ffd1
3 changed files with 15 additions and 2 deletions

View file

@ -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)