Add config.json file and Aeson dependency in package.yaml

This commit is contained in:
jgk
2021-03-22 21:36:24 +01:00
parent bc4aeef35e
commit 553c6978d6
4 changed files with 6 additions and 13 deletions
+4
View File
@@ -0,0 +1,4 @@
{
"windowxsize": 800,
"windowysize": 600
}
+2 -1
View File
@@ -28,7 +28,7 @@ dependencies:
- sdl2-mixer
- text
- OpenGL
- OpenGLRaw
#- OpenGLRaw
- raw-strings-qq
- bytestring
- lens
@@ -44,6 +44,7 @@ dependencies:
- transformers
- foldl
- linear
- aeson
library:
source-dirs: src
-2
View File
@@ -112,8 +112,6 @@ withRandomDir acc f cid w = over (creatures . ix cid . crDir) (\d -> d - a)
withVelWthHiteff :: Point2 -> Float -> HitEffect -> Int -> World -> World
withVelWthHiteff vel width hiteff cid w
= over particles' ((:) newbul)
-- . over tempLightSources ((:) (tLightAt 4 pos))
-- . lowLightAt pos2
$ set randGen g
w
where cr = _creatures w IM.! cid
-10
View File
@@ -25,16 +25,6 @@ winConfig x y = defaultWindow
, windowResizable =True
}
--setupLoop :: String
-- -> CInt
-- -> CInt
-- -> IO setupParams
-- -> (setupParams -> IO ())
-- -> world
-- -> (setupParams -> world -> IO setupParams)
-- -> (world -> Event -> Maybe world)
-- -> (world -> Maybe world)
-- -> IO ()
setupLoop :: String
-> CInt
-> CInt