startmacro
!
! Test for race conditions in PLOT.
!
! See BUGs 72 and 1520
!
! Author:  J. Hallam
! Version: $Id: test_plot_race_condition.mm,v 1.4 2009/11/06 13:28:02 jwb Exp $
!
  
	plot/bg world
  
  message FUNC=sendw ID=plot NAME=ZOOM DATA={XMIN=90,XMAX=70,YMIN=30,YMAX=45}

	assert/text="BUG #72: PLOT ZOOM RACE CONDITION: XMIN / XMAX in bounds" &
                       reg.plot.xmin GE 68 AND reg.plot.xmin LE 71 AND &
                       reg.plot.xmax GE 89 AND reg.plot.xmax LE 92 
 mess send plot ,,exit
     
endmacro

