Fixup for czipwith and Update stack.yaml

pull/35/head
Lennart Spitzner 2017-05-14 19:27:16 +02:00
parent 22300d9c62
commit 68e77c9337
3 changed files with 6 additions and 2 deletions

View File

@ -151,6 +151,7 @@ executable brittany
, filepath >=1.4.1.0 && <1.5 , filepath >=1.4.1.0 && <1.5
, either , either
, ghc-boot-th , ghc-boot-th
, czipwith
} }
hs-source-dirs: src-brittany hs-source-dirs: src-brittany
default-language: Haskell2010 default-language: Haskell2010

View File

@ -14,6 +14,8 @@ import qualified Data.Map as Map
import qualified Data.Text.Lazy.Builder as Text.Builder import qualified Data.Text.Lazy.Builder as Text.Builder
import Data.CZipWith
import qualified Debug.Trace as Trace import qualified Debug.Trace as Trace
import Language.Haskell.Brittany.Types import Language.Haskell.Brittany.Types
@ -220,7 +222,7 @@ mainCmdParser helpDesc = do
then trace "----" then trace "----"
else id else id
readConfigs :: ConfigF Option -> [System.IO.FilePath] -> MaybeT IO Config readConfigs :: CConfig Option -> [System.IO.FilePath] -> MaybeT IO Config
readConfigs cmdlineConfig configPaths = do readConfigs cmdlineConfig configPaths = do
let defLocalConfigPath = "brittany.yaml" let defLocalConfigPath = "brittany.yaml"
userBritPath <- liftIO $ Directory.getAppUserDataDirectory "brittany" userBritPath <- liftIO $ Directory.getAppUserDataDirectory "brittany"
@ -235,4 +237,4 @@ readConfigs cmdlineConfig configPaths = do
paths -> foldl (\prev p -> prev >>= readMergePersConfig p False) paths -> foldl (\prev p -> prev >>= readMergePersConfig p False)
(return cmdlineConfig) (return cmdlineConfig)
paths paths
return $ cZip fromOptionIdentity staticDefaultConfig merged return $ cZipWith fromOptionIdentity staticDefaultConfig merged

View File

@ -3,6 +3,7 @@ resolver: lts-8.4
extra-deps: extra-deps:
- monad-memo-0.4.1 - monad-memo-0.4.1
- unsafe-0.0 - unsafe-0.0
- czipwith-1.0.0.0
packages: packages:
- . - .