[Gaim-commits] SF.net SVN: gaim: [16248] trunk/plugins/tcl/tcl_glib.c

[<ebl...@us...>]

Revision: 16248
Author:   eblanton
Date:     2006-06-10 12:27:21 -0700 (Sat, 10 Jun 2006)
ViewCVS:  http://svn.sourceforge.net/gaim/?rev=16248&view=rev

Log Message:
-----------
Fix some 64-bit nonos in tcl_glib

Modified Paths:
--------------
    trunk/plugins/tcl/tcl_glib.c
Modified: trunk/plugins/tcl/tcl_glib.c
===================================================================
--- trunk/plugins/tcl/tcl_glib.c	2006-06-10 19:16:58 UTC (rev 16247)
+++ trunk/plugins/tcl/tcl_glib.c	2006-06-10 19:27:21 UTC (rev 16248)
@@ -1,7 +1,7 @@
 /*
  * Tcl/Glib glue
  *
- * Copyright (C) 2003, 2004 Ethan Blanton <ebl...@cs...>
+ * Copyright (C) 2003, 2004, 2006 Ethan Blanton <ebl...@cs...>
  *
  * This file is dual-licensed under the two sets of terms below.  You may
  * use, redistribute, or modify it pursuant to either the set of conditions
@@ -157,8 +157,8 @@
 	GIOChannel *channel;
 	GIOCondition cond = 0;
 
-	if (g_hash_table_lookup(tcl_file_handlers, (gpointer)fd))
-		tcl_delete_file_handler(fd);
+	if (g_hash_table_lookup(tcl_file_handlers, GINT_TO_POINTER(fd)))
+            tcl_delete_file_handler(fd);
 	
 	if (mask & TCL_READABLE)
 		cond |= G_IO_IN;
@@ -176,7 +176,7 @@
 	tfh->source = g_io_add_watch_full(channel, G_PRIORITY_DEFAULT, cond, tcl_file_callback, tfh, g_free);
 	g_io_channel_unref(channel);
 
-	g_hash_table_insert(tcl_file_handlers, (gpointer)fd, tfh);
+	g_hash_table_insert(tcl_file_handlers, GINT_TO_POINTER(fd), tfh);
 
 	Tcl_ServiceAll();
 }
@@ -189,7 +189,7 @@
 		return;
 
 	g_source_remove(tfh->source);
-	g_hash_table_remove(tcl_file_handlers, (gpointer)fd);
+	g_hash_table_remove(tcl_file_handlers, GINT_TO_POINTER(fd));
 
 	Tcl_ServiceAll();
 }
@@ -241,7 +241,7 @@
 		return 0;
 	}
 
-	tfh = g_hash_table_lookup(tcl_file_handlers, (gpointer)fev->fd);
+	tfh = g_hash_table_lookup(tcl_file_handlers, GINT_TO_POINTER(fev->fd));
 	if (tfh == NULL)
 		return 1;
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.