From f0c92790e6966ffac3b81e55597e5486bccc5541 Mon Sep 17 00:00:00 2001
From: hobbs <hobbs>
Date: Fri, 21 Sep 2001 21:22:09 +0000
Subject: 	* unix/tkUnixPort.h: 	* mac/tkMacPort.h: add (int*) cast to
 TkpScanWindowId. 	These may need to be changed to Window* (ulong).

---
 mac/tkMacPort.h   | 7 ++++---
 unix/tkUnixPort.h | 9 +++++----
 2 files changed, 9 insertions(+), 7 deletions(-)

diff --git a/mac/tkMacPort.h b/mac/tkMacPort.h
index 98f0f74..027fa06 100644
--- a/mac/tkMacPort.h
+++ b/mac/tkMacPort.h
@@ -10,7 +10,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkMacPort.h,v 1.9 2000/04/17 02:17:05 jingham Exp $
+ * RCS: @(#) $Id: tkMacPort.h,v 1.10 2001/09/21 21:22:09 hobbs Exp $
  */
 
 #ifndef _TKMACPORT
@@ -120,17 +120,18 @@ extern int		strncasecmp _ANSI_ARGS_((CONST char *s1,
 
 /*
  * This macro stores a representation of the window handle in a string.
+ * This should perhaps use the real size of an XID.
  */
 
 #define TkpPrintWindowId(buf,w) \
 	sprintf((buf), "0x%x", (unsigned int) (w))
-	    
+
 /*
  * TkpScanWindowId is just an alias for Tcl_GetInt on Unix.
  */
 
 #define TkpScanWindowId(i,s,wp) \
-	Tcl_GetInt((i),(s),(wp))
+	Tcl_GetInt((i),(s),(int *)(wp))
 
 /*
  * Magic pixel values for dynamic (or active) colors.
diff --git a/unix/tkUnixPort.h b/unix/tkUnixPort.h
index 242d127..e2895dc 100644
--- a/unix/tkUnixPort.h
+++ b/unix/tkUnixPort.h
@@ -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: tkUnixPort.h,v 1.5 1999/04/16 01:51:47 stanton Exp $
+ * RCS: @(#) $Id: tkUnixPort.h,v 1.6 2001/09/21 21:22:09 hobbs Exp $
  */
 
 #ifndef _UNIXPORT
@@ -200,18 +200,19 @@ extern int errno;
 
 /*
  * This macro stores a representation of the window handle in a string.
+ * This should perhaps use the real size of an XID.
  */
 
 #define TkpPrintWindowId(buf,w) \
 	sprintf((buf), "0x%x", (unsigned int) (w))
-	    
+
 /*
  * TkpScanWindowId is just an alias for Tcl_GetInt on Unix.
  */
 
 #define TkpScanWindowId(i,s,wp) \
-	Tcl_GetInt((i),(s),(wp))
-	    
+	Tcl_GetInt((i),(s),(int *)(wp))
+
 /*
  * This macro indicates that entry and text widgets should display
  * the selection highlight regardless of which window has the focus.
-- 
cgit v0.12