mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-20 11:40:18 +02:00
(scm_cell, scm_double_cell): Also allow USE_NULL_THREADS to not
protect the slot initializers.
This commit is contained in:
parent
f6ecc207bf
commit
389626c5ec
1 changed files with 3 additions and 3 deletions
|
@ -137,8 +137,8 @@ scm_cell (scm_t_bits car, scm_t_bits cdr)
|
|||
SCM_GC_SET_CELL_WORD (z, 0, car);
|
||||
|
||||
#ifdef USE_THREADS
|
||||
#ifndef USE_COOP_THREADS
|
||||
/* When we are using non-cooperating threads, we might need to make
|
||||
#if !defined(USE_COOP_THREADS) && !defined(USE_NULL_THREADS)
|
||||
/* When we are using preemtive threads, we might need to make
|
||||
sure that the initial values for the slots are protected until
|
||||
the cell is completely initialized.
|
||||
*/
|
||||
|
@ -188,7 +188,7 @@ scm_double_cell (scm_t_bits car, scm_t_bits cbr,
|
|||
SCM_GC_SET_CELL_WORD (z, 0, car);
|
||||
|
||||
#ifdef USE_THREADS
|
||||
#ifndef USE_COOP_THREADS
|
||||
#if !defined(USE_COOP_THREADS) && !defined(USE_NULL_THREADS)
|
||||
/* When we are using non-cooperating threads, we might need to make
|
||||
sure that the initial values for the slots are protected until
|
||||
the cell is completely initialized.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue