diff --git a/vm/generic_arrays.hpp b/vm/generic_arrays.hpp
index 4c3620277c..de4566bdf6 100755
--- a/vm/generic_arrays.hpp
+++ b/vm/generic_arrays.hpp
@@ -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);