mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-07 04:30:18 +02:00
Code Activity

Add API to inihibit pre-emption

Browse source 
This is really only for BDW.  It uses GC_alloc_lock() /
GC_alloc_unlock().
This commit is contained in:
Andy Wingo 2025-05-15 09:01:28 +02:00
parent cc2a90b494
commit d58aa71281
5 changed files with 28 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

13
api/gc-api.h
View file

@ -301,4 +301,17 @@ static inline void gc_safepoint(struct gc_mutator *mut) {
gc_safepoint_slow(mut);
}
GC_API_ void gc_safepoint_signal_inhibit(struct gc_mutator *mut);
GC_API_ void gc_safepoint_signal_reallow(struct gc_mutator *mut);
static inline void gc_inhibit_preemption(struct gc_mutator *mut) {
if (gc_safepoint_mechanism() == GC_SAFEPOINT_MECHANISM_SIGNAL)
gc_safepoint_signal_inhibit(mut);
}
static inline void gc_reallow_preemption(struct gc_mutator *mut) {
if (gc_safepoint_mechanism() == GC_SAFEPOINT_MECHANISM_SIGNAL)
gc_safepoint_signal_reallow(mut);
}
#endif // GC_API_H_