[comp.lang.smalltalk] Bug with ST-80 on HP9000

brian@vuse.vanderbilt.edu (Brian Antao) (04/17/91)

Hi,
	We have run into a bug while using Parcplace rel. 4.0
smalltalk-80 running on the HP9000 -series workstations (330/350).
The bug arises when using the message follow: while: on: ,
usedn essentially to animate display stuff on a GraphicsContext.
Using this message on the HP platforms causes a primitive error.
This message works fine on the other platforms, 386 based machines,
and Sun workstations. BTW, we running X11.
Has anyone else encountered this problem, and know of possible
fixes ?
thanks,
	-- Brian
	brian@vuse.vandebilt.edu

atoenne@julien.uucp (Andreas Toenne) (04/17/91)

In article <1991Apr16.193604.399@vuse.vanderbilt.edu> brian@vuse.vanderbilt.edu (Brian Antao) writes:
>Hi,
>	We have run into a bug while using Parcplace rel. 4.0
>smalltalk-80 running on the HP9000 -series workstations (330/350).
>The bug arises when using the message follow: while: on: ,
>usedn essentially to animate display stuff on a GraphicsContext.
>Using this message on the HP platforms causes a primitive error.
>This message works fine on the other platforms, 386 based machines,
>and Sun workstations. BTW, we running X11.
>Has anyone else encountered this problem, and know of possible
>fixes ?

I've found a bug in this method for images that were released last fall.
One of the two graphics contexts that are computed in follow:while:on:
was incorrect (in fact a Pixmap was built). Your follow:while:on: method
should contain the following two lines (opt. check the arguments to the
subsequent method moveTo:on:restoring:):
backGC := (aGraphicsContext paintBasis retainedMediumWithExtent: ext) graphicsContext.
scratchGC := (aGraphicsContext paintBasis retainedMediumWithExtent: ext * 2) graphicsContext.

	Good luck,

	Andreas Toenne
	atoenne@unido.uucp