vm: make reallot_array for same size a no-op

db4
Joe Groff 2011-10-12 12:34:30 -07:00
parent 055196d4b7
commit 59f0b93290
1 changed files with 3 additions and 0 deletions

View File

@ -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);