| bytes ms | self testCount: 0. 1 timesRepeat: [ ms := [ bytes := Snapshot contents ] ms. self print: 'snapshot #',self newTestCount,' ' ,bytes size ,#bytes ,' in ' ,ms ,#ms. ].