dynamic-cabal 0.3.1 → 0.3.2

raw patch · 4 files changed

+7/−6 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• dynamic-cabal.cabal +1/−1
• src/Distribution/Client/Dynamic/LocalBuildInfo.hs +4/−3
• src/Distribution/Client/Dynamic/PackageDescription.hs +2/−1
• tests/Main.hs +0/−1

@@ -1,5 +1,5 @@ name:          dynamic-cabal-version:       0.3.1+version:       0.3.2 license:       BSD3 category:      Distribution  cabal-version: >= 1.10

@@ -1,18 +1,19 @@ module Distribution.Client.Dynamic.LocalBuildInfo where +import Control.Applicative import Distribution.Client.Dynamic.PackageDescription import Distribution.Client.Dynamic.Query import Language.Haskell.Exts.Syntax import Language.Haskell.Generate import Prelude hiding ((.), id) --- | A package db is either the user package db (often at ~/.ghc/ghc-....), the global package+-- | A package db is either the user package db (often at @~/.ghc/ghc-....@), the global package -- or a specific file or directory. data PackageDB = UserDB | GlobalDB | SpecificDB FilePath deriving (Eq, Ord, Show, Read)  -- | Get the package dbs that ghc will use when compiling this package. packageDBs :: Query LocalBuildInfo [PackageDB]-packageDBs = fmap (map deserialize) $ query packageDBStack+packageDBs = map deserialize <$> query packageDBStack   where packageDBStack' :: ExpG (LocalBuildInfo -> [PackageDB])         packageDBStack' = useValue "Distribution.Simple.LocalBuildInfo" $ Ident "withPackageDB" @@ -20,7 +21,7 @@         packageDBStack = selector $ const $ applyE map' (expr serialize') <>. packageDBStack'          serialize' :: ExpG PackageDB -> ExpG (Either Bool FilePath)-        serialize' db = do +        serialize' db = do           fileVar <- newName "file_"           globalDB   <- useCon "Distribution.Simple.Compiler" $ Ident "GlobalPackageDB"           userDB     <- useCon "Distribution.Simple.Compiler" $ Ident "UserPackageDB"

@@ -83,7 +83,8 @@      -- | The extensions to enable/disable. The elements are like GHC's -X flags, a disabled extension     -- is represented as the extension name prefixed by 'No'.-    -- Example value: extensions = ["ScopedTypeVariables", "NoMultiParamTypeClasses"]+    --+    -- Example value: @extensions = ["ScopedTypeVariables", "NoMultiParamTypeClasses"]@   , extensions   :: [String]      -- | The 'buildable' field in the package description.

@@ -4,7 +4,6 @@ import           Data.Version import           Distribution.Client.Dynamic import           System.Directory-import           Test.HUnit import           Test.Tasty.HUnit import           Test.Tasty.TH