From 4f33e93d78cef46942b20940513a5924e7172e2f Mon Sep 17 00:00:00 2001 From: jgk Date: Thu, 19 Aug 2021 17:27:45 +0200 Subject: [PATCH] Add dependencies --- appHetris/Hetris.hs | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 appHetris/Hetris.hs diff --git a/appHetris/Hetris.hs b/appHetris/Hetris.hs new file mode 100644 index 000000000..7bf1ed816 --- /dev/null +++ b/appHetris/Hetris.hs @@ -0,0 +1,21 @@ +module Main where +import Loop +import Hetris.Base + +import Control.Lens +--import Foreign (Word32) +import Control.Monad +--import System.Random +import qualified Data.Map as M +import qualified Data.IntMap as IM +import Graphics.Rendering.OpenGL hiding (color, rotate, scale, translate) +import qualified SDL +import qualified SDL.Mixer as Mix + +main :: IO () +main = setupMiniLoop + (600,600) + initWorld + (const $ return ()) + (\w _ -> return w) + return