27 lines
667 B
C++
27 lines
667 B
C++
namespace factor {
|
|
|
|
// It is up to the caller to fill in the object's fields in a meaningful
|
|
// fashion!
|
|
|
|
// Allocates memory
|
|
inline object* factor_vm::allot_object(cell type, cell size) {
|
|
FACTOR_ASSERT(!current_gc);
|
|
|
|
bump_allocator *nursery = data->nursery;
|
|
|
|
// If the object is bigger than the nursery, allocate it in tenured space
|
|
if (size >= nursery->size)
|
|
return allot_large_object(type, size);
|
|
|
|
// If the object is smaller than the nursery, allocate it in the nursery,
|
|
// after a GC if needed
|
|
if (nursery->here + size > nursery->end)
|
|
primitive_minor_gc();
|
|
|
|
object* obj = nursery->allot(size);
|
|
obj->initialize(type);
|
|
return obj;
|
|
}
|
|
|
|
}
|