From 2070fcccbe7d676a7c64aa1387c296dca1d4ca6d Mon Sep 17 00:00:00 2001 From: brandon s allbery kf8nh Date: Sat, 27 Apr 2024 12:09:48 -0400 Subject: [PATCH] update type signature of waitForEvent and major version bump per PVP --- Graphics/X11/Xlib/Event.hsc | 2 +- X11.cabal | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Graphics/X11/Xlib/Event.hsc b/Graphics/X11/Xlib/Event.hsc index 842fc2f..23f368e 100644 --- a/Graphics/X11/Xlib/Event.hsc +++ b/Graphics/X11/Xlib/Event.hsc @@ -397,7 +397,7 @@ get_ConfigureEvent p = peekXConfigureEvent (castPtr p) -- | Reads an event with a timeout (in microseconds). -- Returns True if timeout occurs. -waitForEvent :: Display -> Word32 -> IO Bool +waitForEvent :: Display -> Word64 -> IO Bool waitForEvent display usecs = with (TimeVal (fromIntegral usecs `div` 1000000) (fromIntegral usecs `mod` 1000000)) $ \ tv_ptr -> allocaBytes #{size fd_set} $ \ readfds -> diff --git a/X11.cabal b/X11.cabal index 86adb14..587b101 100644 --- a/X11.cabal +++ b/X11.cabal @@ -1,5 +1,5 @@ name: X11 -version: 1.10.3.10 +version: 1.11 synopsis: A binding to the X11 graphics library description: A Haskell binding to the X11 graphics library. The binding is a direct translation of the C binding; for documentation of these calls, refer