diff options
Diffstat (limited to 'generic/tkBitmap.c')
-rw-r--r-- | generic/tkBitmap.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tkBitmap.c b/generic/tkBitmap.c index a47d10d..fc445f6 100644 --- a/generic/tkBitmap.c +++ b/generic/tkBitmap.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkBitmap.c,v 1.8 2000/09/30 18:46:03 drh Exp $ + * RCS: @(#) $Id: tkBitmap.c,v 1.9 2001/08/15 15:44:36 dkf Exp $ */ #include "tkPort.h" @@ -125,7 +125,7 @@ static void InitBitmapObj _ANSI_ARGS_((Tcl_Obj *objPtr)); * ptr1 field of the Tcl_Obj points to a TkBitmap object. */ -static Tcl_ObjType bitmapObjType = { +Tcl_ObjType tkBitmapObjType = { "bitmap", /* name */ FreeBitmapObjProc, /* freeIntRepProc */ DupBitmapObjProc, /* dupIntRepProc */ @@ -168,7 +168,7 @@ Tk_AllocBitmapFromObj(interp, tkwin, objPtr) { TkBitmap *bitmapPtr; - if (objPtr->typePtr != &bitmapObjType) { + if (objPtr->typePtr != &tkBitmapObjType) { InitBitmapObj(objPtr); } bitmapPtr = (TkBitmap *) objPtr->internalRep.twoPtrValue.ptr1; @@ -900,7 +900,7 @@ GetBitmapFromObj(tkwin, objPtr) Tcl_HashEntry *hashPtr; TkDisplay *dispPtr = ((TkWindow *) tkwin)->dispPtr; - if (objPtr->typePtr != &bitmapObjType) { + if (objPtr->typePtr != &tkBitmapObjType) { InitBitmapObj(objPtr); } @@ -975,7 +975,7 @@ InitBitmapObj(objPtr) if ((typePtr != NULL) && (typePtr->freeIntRepProc != NULL)) { (*typePtr->freeIntRepProc)(objPtr); } - objPtr->typePtr = &bitmapObjType; + objPtr->typePtr = &tkBitmapObjType; objPtr->internalRep.twoPtrValue.ptr1 = (VOID *) NULL; } |