-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | GLFW utility functions to use together with monad-task.
--   
--   GLFW (<a>http://hackage.haskell.org/package/GLFW</a>) is a Haskell
--   binding to the GLFW C library for writing OpenGL programs. This
--   package provides some utility functions for writing GLFW programs
--   using the monad-task library
--   (<a>http://hackage.haskell.org/package/GLFW-task</a>). An example is
--   provided in the package source to demonstrate its usage.
@package GLFW-task
@version 0.3.0


-- | GLFW helper functions for use with a <a>TaskT</a> monad transformer
--   (from monad-task package).
module Graphics.UI.GLFW.Task

-- | <tt>Event</tt> is a unified data type for all GLFW events.
data Event
KeyEvent :: Key -> KeyButtonState -> Event
CharEvent :: Char -> KeyButtonState -> Event
MouseButtonEvent :: MouseButton -> KeyButtonState -> Event
MousePosEvent :: Position -> Event
MouseWheelEvent :: Int -> Event
WindowSizeEvent :: Size -> Event
WindowCloseEvent :: Event
WindowRefreshEvent :: Event
onKey :: Event -> Maybe (Key, KeyButtonState)
onChar :: Event -> Maybe (Char, KeyButtonState)
onButton :: Event -> Maybe (MouseButton, KeyButtonState)
onPos :: Event -> Maybe Position
onWheel :: Event -> Maybe Int
onSize :: Event -> Maybe Size
onClose :: Event -> Maybe ()
onRefresh :: Event -> Maybe ()
isKey :: Enum a => a -> Key -> Maybe ()
isChar :: Char -> Char -> Maybe ()
isButton :: MouseButton -> MouseButton -> Maybe ()
isPress :: (a, KeyButtonState) -> Maybe a
isRelease :: (a, KeyButtonState) -> Maybe a

-- | <tt>registerTaskCallbacks</tt> sets up all event callbacks, and
--   returns a <a>waitEvent</a> equivalent function for task monad, which
--   must be called repeatedly in order to pump events to other task
--   co-routines.
--   
--   These task co-routines should use <a>watch</a> to select event of
--   interest, and they should be forked prior to the waitEvent call.
registerTaskCallbacks :: (MonadIO m, MonadTask Event m) => IO (m ())
instance GHC.Show.Show Graphics.UI.GLFW.Task.Event
instance GHC.Classes.Eq Graphics.UI.GLFW.Task.Event