>># 
>># Copyright 1990, 1991 by the Massachusetts Institute of Technology and
>># UniSoft Group Limited.
>># 
>># Permission to use, copy, modify, distribute, and sell this software and
>># its documentation for any purpose is hereby granted without fee,
>># provided that the above copyright notice appear in all copies and that
>># both that copyright notice and this permission notice appear in
>># supporting documentation, and that the names of MIT and UniSoft not be
>># used in advertising or publicity pertaining to distribution of the
>># software without specific, written prior permission.  MIT and UniSoft
>># make no representations about the suitability of this software for any
>># purpose.  It is provided "as is" without express or implied warranty.
>># 
>># $XConsortium: staftrfnct.m,v 1.7 92/06/11 17:25:34 rws Exp $
>># 
>>#
>>TITLE XSetAfterFunction CH08
>>ASSERTION A XSetAfterFunction-1
A call to XSetAfterFunction sets the after function to
procedure.
>>STRATEGY
Create window.
Verify that afterfunction was not called.
Call XSetAfterFunction to set the after function to afterfunction.
Create window.
Verify that the after function was called.
>>ASSERTION A XSetAfterFunction-2
A call to XSetAfterFunction returns the previous after
function.
>>STRATEGY
Call XSetAfterFunction to set after function to afterfunction.
Call XSetAfterFunction to set after function to _afterfunction.
Verify that XSetAfterFunction returned afterfunction.
Call XSetAfterFunction to set after function to afterfunction.
Verify that XSetAfterFunction returned _afterfunction.
>>ASSERTION B XSetAfterFunction-3
After a call to XSetAfterFunction, all Xlib functions that
generate protocol requests call procedure before returning.
>>STRATEGY
Report UNTESTED
