David,

Something smells wrong here. Can you do me a favour and check what the
difference in speed for you is when you run:

"Raw #forceToScreen speed"
	[1 to: 100 do:[:i| Display forceToScreen]] timeToRun.

"Raw BitBlt speed"
	[Display deferUpdates: true.
	1 to: 100 do:[:i| (FormCanvas on: Display) fillColor: Color blue].
	Display deferUpdates: false] timeToRun.

"Raw Balloon speed"
	[Display deferUpdates: true.
	1 to: 100 do:[:i| 
		(BalloonCanvas on: Display) 
			drawRectangle: Display boundingBox 
			color: Color red 
			borderWidth: 0 
			borderColor: nil].
	Display deferUpdates: false] timeToRun.

On my machine (400Mhz PII at 1024x768x16) the above gives:
Display		#forceToScreen	BitBlt	Balloon
1024x768x16 	4367			1323		10362
1024x768x32 	3318			2449		3884

The difference in speed between 16/32 bit Balloon drawing is due to the
dithering taking place in 16bit. Beautiful but a little expensive ;-)

[Note to Bob: Could you run the above on your G3 for reference?!]

  - Andreas