justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Update stack lts

Browse Source
This commit is contained in:
justin
2024-10-22 10:07:13 +01:00
parent f6e32ff6ef
commit e2330618f2
24 changed files with 222 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Room/Containing.hs
+1
View File
@@ -15,6 +15,7 @@ import Dodge.Tree
import Geometry
import LensHelp
import RandomHelp
import Control.Monad
roomsContaining :: RandomGen g => [Creature] -> [Item] -> State g (MetaTree Room String)
roomsContaining crs its = tToBTree str <$> roomsContaining' crs its