Display abstract tree of placement, stout

2021-11-11 18:41:59 +00:00
parent da22d9833a
commit 8c45a02e46
4 changed files with 48 additions and 76 deletions
@@ -27,7 +27,7 @@ firstWorld = do
 --    putStrLn $ "Had to go through "++ show n ++ " random generators"
    roomList <- layoutLevelFromSeed i
    return $ generateLevelFromRoomList roomList 
-        $ initialWorld -- note this uses a random generator defined elsewhere
+         initialWorld -- note this uses a random generator defined elsewhere

 initialWorld :: World
 initialWorld = defaultWorld