/*
 * -- $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();
}