Bob Arning wrote:

> BitBlt test1
> "
> | f where what poker |
> f _ Form extent: 10 at 10 depth: 32.
> poker _ BitBlt bitPokerToForm: f.
> where _ 2 at 2.
> what _ 1.
> MessageTally spyOn: [6000 timesRepeat: [poker pixelAt: where put: what]].


Andres,

note that Bob uses "bitPokerToForm:" here. This is not obvious, but makes a
_big_ difference to writing a lot of pixels into the Form one by one without
it.

Henrik