Use strict-containers for IntMaps

2022-07-21 15:27:00 +01:00
parent 22787abf8f
commit cf5ec4a261
92 changed files with 103 additions and 98 deletions
@@ -6,7 +6,7 @@ import Dodge.Data
 import Geometry

 import Data.Maybe
-import qualified Data.IntMap.Lazy as IM
+import qualified IntMapHelp as IM

 lightsToRender :: Configuration -> World -> [(Point3,Float,Point3)]
 lightsToRender cfig w = mapMaybe getLS (IM.elems $ _lightSources w)