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
@@ -31,7 +31,7 @@ import LensHelp

 --import Data.Maybe
 --import Data.Tree
--import qualified Data.IntMap.Strict as IM
+--import qualified IntMapHelp as IM

 powerFakeout' :: RandomGen g => State g (MetaTree Room String)
 powerFakeout' = tToBTree "powerFakeout'" <$> powerFakeout