Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

34 lines (28 sloc) 0.695 kB
namespace factor
{
/*
* It is up to the caller to fill in the object's fields in a meaningful
* fashion!
*/
inline object *factor_vm::allot_object(cell type, cell size)
{
#ifdef FACTOR_DEBUG
FACTOR_ASSERT(!current_gc);
#endif
/* If the object is smaller than the nursery, allocate it in the nursery,
after a GC if needed */
if(nursery.size > size)
{
/* If there is insufficient room, collect the nursery */
if(nursery.here + size > nursery.end)
primitive_minor_gc();
object *obj = nursery.allot(size);
obj->initialize(type);
return obj;
}
/* If the object is bigger than the nursery, allocate it in
tenured space */
else
return allot_large_object(type,size);
}
}
Jump to Line
Something went wrong with that request. Please try again.