[ |font provider string converter stringExtents|
	font := StandardFonts defaultFont.
	provider := CairoScaledFont fromFreetypeFont: font realFont.
	string := 'abcdefghijklmnopqrstuvwxyz 0123456789!@#$%^&*()_+'.
	converter := CairoUTF8Converter new.
	converter convert: string from: 1 to: string size.
	stringExtents := CairoTextExtents new.
	1 to: 10000 do: [ :i |
		provider getExtentsOf: converter buffer into: stringExtents ].
	stringExtents
] timeToRun