>># 
>># 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: staccsscnt.m,v 1.4 92/06/11 17:16:13 rws Exp $
>># 
>>#      SCCS:  @(#)  EAcc4.mc Rel 1.7	    (10/2/91)
>>#      SCCS:  @(#)  EVal.mc Rel 1.5	    (10/10/91)
>>#
>>TITLE XSetAccessControl CH07
>>ASSERTION B XSetAccessControl-1
When mode is EnableAccess, then the use of the access
control list is enabled at each connection setup.
>>STRATEGY
Report UNTESTED
>>ASSERTION B XSetAccessControl-2
When mode is DisableAccess, then the use of the access
control list is disabled at each connection setup.
>>STRATEGY
Get current host list.
Attempt to remove all hosts from list.
If this fails with BadAccess:
  Report that this host does not have permission to do this.
  (Will not have permission for the next part either).
  Result is untested.
Disable access control with XSetAccessControl.
Verify that state returned by XListHosts is DisableAccess.
Verify that a new connection can be made.
>>ASSERTION A XSetAccessControl-3
When an attempt is made to modify the access control list
from a client that is not authorised in a server-dependent
way to do so, then a BadAccess error occurs.
>>STRATEGY
Call XSetAccessControl.
If error occurs.
  If error is BadAccess
	Report Pass.
  else
	Report Fail.
else
  Report client is authorised.
  Result is untested.
>>ASSERTION A XSetAccessControl-4
When the value of mode is other than EnableAccess or
DisableAccess, then a BadValue error occurs.
>>STRATEGY
Obtain a sequence of values which are not in the list specified by VALUE_LIST.
For each value:
  Call test function with this value in the VALUE_ARG argument.
  Verify that a BadValue error occurs.
