From a9cde766a59152713ad488a8c0b3a37b1bfe5e3b Mon Sep 17 00:00:00 2001 From: ericm Date: Mon, 30 Oct 2000 20:04:16 +0000 Subject: Added type cast to (ClientData) for &CustomOption in option tests. --- generic/tkTest.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/generic/tkTest.c b/generic/tkTest.c index 891e7f6..b047b2d 100644 --- a/generic/tkTest.c +++ b/generic/tkTest.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkTest.c,v 1.14 2000/09/29 17:55:31 ericm Exp $ + * RCS: @(#) $Id: tkTest.c,v 1.15 2000/10/30 20:04:16 ericm Exp $ */ #include "tkInt.h" @@ -784,7 +784,7 @@ TestobjconfigObjCmd(clientData, interp, objc, objv) {TK_OPTION_CUSTOM, "-custom", (char *) NULL, (char *) NULL, "", Tk_Offset(TypesRecord, customPtr), -1, - TK_CONFIG_NULL_OK, &CustomOption, 0x4000}, + TK_CONFIG_NULL_OK, (ClientData)&CustomOption, 0x4000}, {TK_OPTION_SYNONYM, "-synonym", (char *) NULL, (char *) NULL, (char *) NULL, 0, -1, 0, (ClientData) "-color", @@ -1100,7 +1100,7 @@ TestobjconfigObjCmd(clientData, interp, objc, objv) {TK_OPTION_CUSTOM, "-custom", (char *) NULL, (char *) NULL, "", -1, Tk_Offset(InternalRecord, custom), - TK_CONFIG_NULL_OK, &CustomOption, 0x4000}, + TK_CONFIG_NULL_OK, (ClientData)&CustomOption, 0x4000}, {TK_OPTION_SYNONYM, "-synonym", (char *) NULL, (char *) NULL, (char *) NULL, -1, -1, 0, (ClientData) "-color", -- cgit v0.12