/*
 * -- $Header: /cec/src/nestor/servers/R3/shXlib/XFreeCurs.c,v 1.2 90/05/14
 * 08:57:25 altenhof Exp $
 */

#include "copyright.h"

/* $XConsortium: XFreeCurs.c,v 11.6 88/09/06 16:07:29 jim Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	 */

/* MULTIPLEX Extension -- */

#include "Xlibint.h"

/* -- additional includes -- */
#include "resources.h"

XFreeCursor (dpy, cursor)
  register Display *dpy;
  Cursor cursor;
{
  register xResourceReq *req;

  /* -- don't free resources that are still referenced -- */
  if (XmuXCursorStillReferenced (dpy, cursor))
    return;
  LockDisplay (dpy);
  GetResReq (FreeCursor, cursor, req);

  /* -- remove the resource info if necessary -- */
  if (XmuXStoreResources (dpy))
    XmuXRemoveCursorInfo (dpy, cursor);

  UnlockDisplay (dpy);
  SyncHandle ();
}