Function DeleteBitmap

micropolis-activity/src/tk/tkcvbmap.c:309–331

(itemPtr)

 * Side effects:
 *	Resources associated with itemPtr are released.
 *
 *--------------------------------------------------------------
 */

static void
DeleteBitmap(itemPtr)
    Tk_Item *itemPtr;			/* Item that is being deleted. */
{
    register BitmapItem *bmapPtr = (BitmapItem *) itemPtr;

    if (bmapPtr->bitmap != None) {
#if defined(USE_XPM3)
        Tk_FreePixmap(bmapPtr->bitmap);
#else
        Tk_FreeBitmap(bmapPtr->bitmap);
#endif
    }
    if (bmapPtr->fgColor != NULL) {
	Tk_FreeColor(bmapPtr->fgColor);
    }
    if (bmapPtr->bgColor != NULL) {
	Tk_FreeColor(bmapPtr->bgColor);
    }
    if (bmapPtr->gc != NULL) {
	Tk_FreeGC(bmapPtr->gc);
    }