>># 
>># 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: gtwmclntmc.m,v 1.8 92/06/11 17:28:36 rws Exp $
>># 
>>#      SCCS:  @(#)  EWin.mc Rel 1.4	    (7/19/91)
>>#
>>TITLE XGetWMClientMachine CH09
>>ASSERTION A XGetWMClientMachine-1
When the WM_CLIENT_MACHINE property is set on the window w,
then a call to XGetWMClientMachine stores the data, which
can be freed with XFree, in the value field, the type of the
data in the encoding field, the format of the data in the
format field, and the number of items of data in the nitems
field of the XTextProperty structure named by the
text_prop_return argument and returns non-zero.
>>STRATEGY
Create a window with XCreateWindow.
Set the property WM_CLIENT_MACHINE for the window with XSetWMClientMachine.
Obtain the value of the WM_CLIENT_MACHINE property with XGetWMClientMachine.
Verify that the function returned non-zero.
Verify that the encoding, format, value and nitems fields of the returned structure are correct.
Release the allocated memory using XFree.
>>ASSERTION A XGetWMClientMachine-2
When the WM_CLIENT_MACHINE property is not set on the
window w, then a call to XGetWMClientMachine sets the value
field to NULL, the encoding field to None, the format field
to 0 and the nitems field to 0 of the XTextProperty
structure named by the text_prop_return argument and returns
zero.
>>STRATEGY
Create a window with XCreateWindow.
Get the value of the unset property WM_CLIENT_MACHINE with XGetWMClientMachine.
Verify that the call returned False.
Verify that in the returned XTextProperty structure the encoding field was none,
  the format component was 0, the nitems component was 0 and the
  value component was NULL.
>>ASSERTION A XGetWMClientMachine-3
When a window argument does not name a valid Window, then a
BadWindow error occurs.
>>STRATEGY
Create a bad window by creating and destroying a window.
Call test function using bad window as the window argument.
Verify that a BadWindow error occurs.
