evntsqd.m

[Jamey Sharp]

Update of /cvs/xtest/xtest/xts5/tset/Xlib12/evntsqd
In directory gabe:/tmp/cvs-serv22489/tset/Xlib12/evntsqd

Modified Files:
	evntsqd.m 
Log Message:
Check for an auto-flushing Xlib and report UNTESTED in that case.


Index: evntsqd.m
===================================================================
RCS file: /cvs/xtest/xtest/xts5/tset/Xlib12/evntsqd/evntsqd.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- evntsqd.m	3 Nov 2005 08:42:34 -0000	1.2
+++ evntsqd.m	18 Dec 2005 11:25:59 -0000	1.3
@@ -31,6 +31,9 @@
 >># 
 >># Modifications:
 >># $Log$
+>># Revision 1.3  2005/12/18 11:25:59  jamey
+>># Check for an auto-flushing Xlib and report UNTESTED in that case.
+>>#
 >># Revision 1.2  2005/11/03 08:42:34  jmichael
 >># clean up all vsw5 paths to use xts5 instead.
 >>#
@@ -332,6 +335,14 @@
 		CHECK;
 /* Discard all events on the event queue. */
 	XSync(display, True);
+/* Check whether this Xlib auto-flushes. */
+	XNoOp(display);
+	if (!XTestDiscard(display))
+	{
+		report("Flushing appears to happen automatically");
+		UNTESTED;
+		return;
+	}
 /* Create pixmap. */
 	/* avoid using makepixm() */
 	pm = XCreatePixmap(display, DRW(display), 10, 10, 1);