Fix -generations=1
parent
74085b897e
commit
9373df5c4c
|
@ -315,7 +315,7 @@ INLINE void* allot_object(CELL type, CELL a)
|
||||||
{
|
{
|
||||||
CELL *object;
|
CELL *object;
|
||||||
|
|
||||||
if(nursery->size - ALLOT_BUFFER_ZONE > a)
|
if(HAVE_NURSERY_P && nursery->size - ALLOT_BUFFER_ZONE > a)
|
||||||
{
|
{
|
||||||
/* If there is insufficient room, collect the nursery */
|
/* If there is insufficient room, collect the nursery */
|
||||||
if(nursery->here + ALLOT_BUFFER_ZONE + a > nursery->end)
|
if(nursery->here + ALLOT_BUFFER_ZONE + a > nursery->end)
|
||||||
|
|
Loading…
Reference in New Issue