From 74d858ceedf93c1eb95be2f4cadbdab79f5bdfd8 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 2 Dec 2010 06:20:07 -0700
Subject: [PATCH] gtk: fix GdkAtom type

---
 collects/mred/private/wx/gtk/types.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mred/private/wx/gtk/types.rkt b/collects/mred/private/wx/gtk/types.rkt
index 0dc4d8c1fe..20bb567ccd 100644
--- a/collects/mred/private/wx/gtk/types.rkt
+++ b/collects/mred/private/wx/gtk/types.rkt
@@ -54,7 +54,7 @@
 (define _gfloat _float)
 (define _GdkEventType _int)
 
-(define _GdkAtom _long)
+(define _GdkAtom _intptr)
 
 (define-cstruct _GdkEventButton ([type _GdkEventType]
                                  [window _GdkWindow]