
/* icfade.c
 *
 * Wimp function library
 *  Joseph Heenan, 1998.
 *
 *
 *
 *
 * $Log: icfade,v $
 * Revision 1.2  1998/05/10 20:13:10  jogu
 * Added names to file headers
 * Added implicit cast for frontend_taskname to wimp_report_error
 *   (it defines 'name' without 'const')
 *
 * Revision 1.1.1.1  1998/05/10 19:56:03  jogu
 * WimpCLib V1.00 (created from newshound c.wimpc rev 1.2)
 *
 *
 */

#include <stdlib.h>
#include <string.h>
#include <stdarg.h>

#include "swis.h"
#include "wimplib.h"

#include "wimpclib.h"

void wimpc_iconfade(int window, int icon, int fade)
{
  WimpSetIconStateBlock block;

  block.window_handle=window;
  block.icon_handle=icon;
  block.EOR_word = fade ? WimpIcon_Shaded : 0; /* set/clear bit */
  block.clear_word = WimpIcon_Shaded; /* clear selected bit */

  E_CHECK( wimp_set_icon_state(&block) );
}
