CopyWait(screen) register TScreen *screen;
CopyWait(register TScreen *screen)
CopyWait(screen)register TScreen *screen;{	XEvent reply;	XEvent *rep = &reply;	while (1) {		XWindowEvent (screen->display, VWindow(screen), 		  ExposureMask, &reply);		switch (reply.type) {		case Expose:			HandleExposure (screen, &reply);			break;		case NoExpose:		case GraphicsExpose:			if (screen->incopy <= 0) {				screen->incopy = 1;				if (screen->scrolls > 0)					screen->scrolls--;			}			if (reply.type == GraphicsExpose)			    HandleExposure (screen, &reply);			if ((reply.type == NoExpose) ||			    ((XExposeEvent *)rep)->count == 0) {			    if (screen->incopy <= 0 && screen->scrolls > 0)				screen->scrolls--;			    if (screen->scrolls == 0) {				screen->incopy = 0;				return;			    }			    screen->incopy = -1;			}			break;		}	}}