107 |
#define SCM_GC_CLEAR_CARD_FLAG(card, shift) \ |
#define SCM_GC_CLEAR_CARD_FLAG(card, shift) \ |
108 |
(SCM_GC_SET_CARD_FLAGS (card, SCM_GC_GET_CARD_FLAGS(card) & ~(1L << (shift)))) |
(SCM_GC_SET_CARD_FLAGS (card, SCM_GC_GET_CARD_FLAGS(card) & ~(1L << (shift)))) |
109 |
|
|
110 |
#define SCM_GC_CARDF_DOUBLECELL 0 |
/* |
111 |
|
Remove card flags. They hamper lazy initialization, and aren't used |
112 |
#define SCM_GC_CARD_DOUBLECELLP(card) SCM_GC_GET_CARD_FLAG (card, SCM_GC_CARDF_DOUBLECELL) |
anyways. |
113 |
#define SCM_GC_SET_CARD_DOUBLECELL(card) SCM_GC_SET_CARD_FLAG (card, SCM_GC_CARDF_DOUBLECELL) |
*/ |
114 |
|
|
115 |
/* card addressing. for efficiency, cards are *always* aligned to |
/* card addressing. for efficiency, cards are *always* aligned to |
116 |
SCM_GC_CARD_SIZE. */ |
SCM_GC_CARD_SIZE. */ |