mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-02 04:40:29 +02:00
(scm_i_sweep_card): Do not increase/decrease scm_gc_running_p.
Sweeping can happen in parallel with allocation.
This commit is contained in:
parent
b2a339f6e5
commit
443840184b
1 changed files with 0 additions and 3 deletions
|
@ -91,8 +91,6 @@ scm_i_sweep_card (scm_t_cell * p, SCM *free_list, scm_t_heap_segment*seg)
|
|||
int offset =SCM_MAX (SCM_GC_CARD_N_HEADER_CELLS, span);
|
||||
int free_count = 0;
|
||||
|
||||
++ scm_gc_running_p;
|
||||
|
||||
/*
|
||||
I tried something fancy with shifting by one bit every word from
|
||||
the bitvec in turn, but it wasn't any faster, but quite a bit
|
||||
|
@ -263,7 +261,6 @@ scm_i_sweep_card (scm_t_cell * p, SCM *free_list, scm_t_heap_segment*seg)
|
|||
free_count ++;
|
||||
}
|
||||
|
||||
--scm_gc_running_p;
|
||||
return free_count;
|
||||
}
|
||||
#undef FUNC_NAME
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue