module Graphics.FreeGame
(
module Graphics.FreeGame.Base,
module Graphics.FreeGame.Data.Bitmap,
module Graphics.FreeGame.Data.Font,
module Graphics.FreeGame.Data.Color,
module Graphics.FreeGame.Input,
module Graphics.FreeGame.Util,
runGame,
runGame'
) where
import Graphics.FreeGame.Base
import Graphics.FreeGame.Input
import Graphics.FreeGame.Util
import Graphics.FreeGame.Data.Bitmap
import Graphics.FreeGame.Data.Font
import Graphics.FreeGame.Data.Color
import qualified Graphics.FreeGame.Backends.GLFW as GLFW
import Control.Monad.Free
runGame :: GameParam -> Game a -> IO (Maybe a)
runGame = GLFW.runGame
runGame' :: GameParam -> (forall m. MonadFree GameAction m => m a) -> IO (Maybe a)
runGame' = GLFW.runGame'