aboutsummaryrefslogtreecommitdiff
path: root/src/Game/Entities/Common.hs
diff options
context:
space:
mode:
authorJuan J. Martinez <jjm@usebox.net>2023-02-20 22:57:00 +0000
committerJuan J. Martinez <jjm@usebox.net>2023-02-20 22:57:00 +0000
commitfd74ead510f4ca326e36450fa23dee0d681c296b (patch)
treecef7ed6d7117d10290eaa60240614afe1cfb917b /src/Game/Entities/Common.hs
parented585355b1f78de15885e803138a98b75ca2b1e2 (diff)
downloadspace-plat-hs-fd74ead510f4ca326e36450fa23dee0d681c296b.tar.gz
space-plat-hs-fd74ead510f4ca326e36450fa23dee0d681c296b.zip
Useless comment is useless
Diffstat (limited to 'src/Game/Entities/Common.hs')
-rw-r--r--src/Game/Entities/Common.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/Game/Entities/Common.hs b/src/Game/Entities/Common.hs
index b79c3db..f72c33a 100644
--- a/src/Game/Entities/Common.hs
+++ b/src/Game/Entities/Common.hs
@@ -74,8 +74,6 @@ applyGravity isBlocked v e
isGoingDown = e.gravity >= gravityDown
change = if isGoingDown then 1 else -1
--- | Update gravity.
---
-- XXX: hardcoded to 16x24 pixels sprite.
updateGravity :: IsBlocked -> Entity -> Entity
updateGravity isBlocked e