Correctly reduce left click item delay

2022-09-04 10:22:53 +01:00
parent 920bfdbc8e
commit 8c0ad639ad
9 changed files with 30 additions and 56 deletions
@@ -453,6 +453,7 @@ markWallSeen :: World -> Int -> World
 markWallSeen !w !i = w & cWorld . walls .~ IM.adjust markSeen i (_walls (_cWorld w))

 markSeen :: Wall -> Wall
+{-# INLINE markSeen #-}
 markSeen wl = wl{_wlSeen = True}

 checkEndGame :: Universe -> Universe