Monadius-0.99: src/Game.hs

module Game (Game(..)) where

import           Graphics.UI.GLUT.Callbacks.Window

-- | An abstracted game as a state machine.
class Game g where
  update :: [Key] -> g -> g
  render :: g -> IO ()
  isGameover :: g -> Bool