14 lines
No EOL
225 B
Haskell
14 lines
No EOL
225 B
Haskell
module Render ( render
|
|
) where
|
|
|
|
|
|
import Game
|
|
|
|
import Control.Monad.State
|
|
import Graphics.Rendering.OpenGL.GL.Framebuffer (clear, ClearBuffer(..))
|
|
|
|
|
|
render :: Game ()
|
|
render = do
|
|
liftIO $ clear [ColorBuffer]
|
|
|