vm: make reallot_array for same size a no-op
parent
055196d4b7
commit
59f0b93290
|
@ -35,6 +35,9 @@ template<typename Array> Array *factor_vm::reallot_array(Array *array_, cell cap
|
|||
{
|
||||
data_root<Array> array(array_,this);
|
||||
|
||||
if (array_capacity(array) == capacity)
|
||||
return array.untagged();
|
||||
|
||||
if(reallot_array_in_place_p(array.untagged(),capacity))
|
||||
{
|
||||
array->capacity = tag_fixnum(capacity);
|
||||
|
|
Loading…
Reference in New Issue