Factor out PearSprite.