mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-07-06 01:30:22 +02:00
Add gc_can_move_objects() to gc-attrs.h
This commit is contained in:
parent
5c55c26ad4
commit
dda1522ab0
5 changed files with 17 additions and 0 deletions
|
@ -92,4 +92,8 @@ static inline int gc_can_pin_objects(void) {
|
|||
return 1;
|
||||
}
|
||||
|
||||
static inline int gc_can_move_objects(void) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
#endif // BDW_ATTRS_H
|
||||
|
|
|
@ -65,6 +65,7 @@ enum gc_cooperative_safepoint_kind {
|
|||
static inline enum gc_cooperative_safepoint_kind gc_cooperative_safepoint_kind(void) GC_ALWAYS_INLINE;
|
||||
|
||||
static inline int gc_can_pin_objects(void) GC_ALWAYS_INLINE;
|
||||
static inline int gc_can_move_objects(void) GC_ALWAYS_INLINE;
|
||||
|
||||
#ifndef GC_IMPL
|
||||
#ifdef GC_ATTRS
|
||||
|
|
|
@ -117,4 +117,8 @@ static inline int gc_can_pin_objects(void) {
|
|||
return 1;
|
||||
}
|
||||
|
||||
static inline int gc_can_move_objects(void) {
|
||||
return GC_CONSERVATIVE_TRACE ? 0 : 1;
|
||||
}
|
||||
|
||||
#endif // MMC_ATTRS_H
|
||||
|
|
|
@ -89,4 +89,8 @@ static inline int gc_can_pin_objects(void) {
|
|||
return 0;
|
||||
}
|
||||
|
||||
static inline int gc_can_move_objects(void) {
|
||||
return 1;
|
||||
}
|
||||
|
||||
#endif // PCC_ATTRS_H
|
||||
|
|
|
@ -78,4 +78,8 @@ static inline int gc_can_pin_objects(void) {
|
|||
return 0;
|
||||
}
|
||||
|
||||
static inline int gc_can_move_objects(void) {
|
||||
return 1;
|
||||
}
|
||||
|
||||
#endif // SEMI_ATTRS_H
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue