add: newElement (current = values size) ifTrue: [ self reallocate ]. current <- current + 1. values at: current put: newElement