hdocs 0.5.2.1 → 0.5.3.0
raw patch · 4 files changed
+12/−5 lines, 4 filesdep ~basedep ~ghcdep ~haddock-apisetup-changedPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base, ghc, haddock-api, haddock-library
API changes (from Hackage documentation)
- HDocs.Haddock: withGhc :: [Flag] -> Ghc a -> IO a
+ HDocs.Haddock: withGhc :: () => [Flag] -> Ghc a -> IO a
Files
- Setup.hs +0/−2
- hdocs.cabal +7/−2
- src/HDocs/Ghc/Compat.hs +1/−1
- tools/hdocs.hs +4/−0
− Setup.hs
@@ -1,2 +0,0 @@-import Distribution.Simple-main = defaultMain
hdocs.cabal view
@@ -1,5 +1,5 @@ name: hdocs -version: 0.5.2.1 +version: 0.5.3.0 synopsis: Haskell docs tool description: Tool and library to get docs for installed packages and source files. @@ -37,10 +37,15 @@ HDocs.Module other-modules: HDocs.Ghc.Compat + if impl(ghc >= 8.3) + build-depends: + ghc >= 8.3, + haddock-api >= 2.20.0 && < 2.21.0, + haddock-library == 1.6.* if impl(ghc >= 8.2) && impl(ghc < 8.3) build-depends: ghc >= 8.2 && < 8.3, - haddock-api >= 2.18.0 && < 2.19.0, + haddock-api >= 2.18.0 && < 2.20.0, haddock-library == 1.4.* if impl(ghc >= 8.0) && impl(ghc < 8.2) build-depends:
src/HDocs/Ghc/Compat.hs view
@@ -34,7 +34,7 @@ #endif unitId :: GHC.PackageConfig -> UnitId -#if __GLASGOW_HASKELL__ == 802 +#if __GLASGOW_HASKELL__ >= 802 unitId = GHC.packageConfigId #elif __GLASGOW_HASKELL__ == 800 unitId = GHC.unitId
tools/hdocs.hs view
@@ -8,6 +8,7 @@ import Data.ByteString.Lazy (toStrict) import qualified Data.Map as M import Data.Monoid (Monoid(..)) +import Data.Semigroup (Semigroup(..)) import qualified Data.Text as T (unpack, pack) import qualified Data.Text.Encoding as T (decodeUtf8) import Documentation.Haddock (Flag(Flag_OptGhc)) @@ -23,6 +24,9 @@ data HDocsOptions = HDocsOptions { optionPretty :: Bool, optionGHC :: [String] } + +instance Semigroup HDocsOptions where + l <> r = HDocsOptions (optionPretty l || optionPretty r) (optionGHC l ++ optionGHC r) instance Monoid HDocsOptions where mempty = HDocsOptions False []