nybble
/
waterdeep
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

simplify imports in Waterdeep.Types

This commit is contained in:
Jesse D. McDonald 2014-07-26 17:07:47 -05:00
parent 62260d2d28
commit a8d2a603be
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/Waterdeep/Types.hs
View File

@ -111,8 +111,6 @@ import Control.Monad.State.Class
import Control.Monad.Trans import Control.Monad.Trans
import Control.Monad.Trans.Maybe (MaybeT, runMaybeT) import Control.Monad.Trans.Maybe (MaybeT, runMaybeT)
import Control.Monad.Trans.State (StateT, runStateT) import Control.Monad.Trans.State (StateT, runStateT)
import Data.IntMap (IntMap)
import Data.Map (Map)
import Data.Maybe import Data.Maybe
import Data.Monoid import Data.Monoid
import Lens.Family2 import Lens.Family2
@ -123,7 +121,6 @@ import Lens.Family2.Unchecked (lens)
import System.Random (StdGen) import System.Random (StdGen)
import qualified Data.IntMap as IM import qualified Data.IntMap as IM
import qualified Data.Map as M
import qualified Data.MultiSet as MS import qualified Data.MultiSet as MS
import qualified System.Random as R import qualified System.Random as R
@ -200,7 +197,7 @@ data BuildingState =
data WaterdeepState = data WaterdeepState =
WaterdeepState WaterdeepState
{ _gamePlayerStates :: IntMap PlayerState { _gamePlayerStates :: IM.IntMap PlayerState
, _gameNumberOfPlayers :: Int , _gameNumberOfPlayers :: Int
, _gameFirstPlayer :: PlayerID , _gameFirstPlayer :: PlayerID
, _gameCurrentRound :: Int , _gameCurrentRound :: Int
@ -214,9 +211,9 @@ data WaterdeepState =
, _gameIntrigueDiscard :: [IntrigueCard] , _gameIntrigueDiscard :: [IntrigueCard]
, _gameBuildingDeck :: [Building] , _gameBuildingDeck :: [Building]
, _gameBuildingDiscard :: [Building] , _gameBuildingDiscard :: [Building]
, _gameBuildersHall :: IntMap BuildingState , _gameBuildersHall :: IM.IntMap BuildingState
, _gameBuildings :: IntMap BuildingState , _gameBuildings :: IM.IntMap BuildingState
, _gameWaterdeepHarbor :: IntMap BuildingState , _gameWaterdeepHarbor :: IM.IntMap BuildingState
, _gameReassigningAgents :: Bool , _gameReassigningAgents :: Bool
, _gameStdGen :: StdGen , _gameStdGen :: StdGen
} }