ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-08 16:06:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: ghc-haddock: Update to 2.19.0.1.

Browse source 
* gnu/packages/haskell.scm (ghc-haddock): Update to 2.19.0.1.
[arguments]: Add a phase that deletes four test suites to avoid a
dependency on haddock-test.
[native-inputs]: Remove ghc-haddock-test.
This commit is contained in:
Timothy Sample 2018-08-29 00:31:02 -04:00 committed by Ricardo Wurmus
parent 69054c9285
commit 1b29af3d16
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 29 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

37
gnu/packages/haskell.scm
View file

@ -1049,7 +1049,7 @@ (define-public ghc-haddock-test
(define-public ghc-haddock
(package
(name "ghc-haddock")
(version "2.17.4")
(version "2.19.0.1")
(source
(origin
(method url-fetch)
@ -1059,16 +1059,37 @@ (define-public ghc-haddock
".tar.gz"))
(sha256
(base32
"1z3h3v7w84dzsm47iavdppc2w899mr4c1agq9fzghgz902i0a655"))))
"1g1j9j0hf2yhyyh0gwz6bzbvfvliqz9x8a8hnkmwghm7w3xa6sb7"))))
(build-system haskell-build-system)
;; FIXME: Tests fail with this error:
;; driver-test/Main.hs:4:1: error:
;; Failed to load interface for ‘ResponseFileSpec’
(arguments `(#:tests? #f))
(arguments
`(#:phases
(modify-phases %standard-phases
;; There are four test suites that require the ghc-haddock-test
;; package, which no longer builds with GHC 8.4.3. This phase
;; removes these four test suites from the Cabal file, so that we
;; do not need ghc-haddock-test as an input.
(add-before 'configure 'remove-haddock-test-test-suites
(lambda _
(use-modules (ice-9 rdelim))
(with-atomic-file-replacement "haddock.cabal"
(lambda (in out)
(let loop ((line (read-line in 'concat)) (deleting? #f))
(cond
((eof-object? line) #t)
((string-every char-set:whitespace line)
(unless deleting? (display line out))
(loop (read-line in 'concat) #f))
((member line '("test-suite html-test\n"
"test-suite hypsrc-test\n"
"test-suite latex-test\n"
"test-suite hoogle-test\n"))
(loop (read-line in 'concat) #t))
(else
(unless deleting? (display line out))
(loop (read-line in 'concat) deleting?)))))))))))
(inputs `(("ghc-haddock-api" ,ghc-haddock-api)))
(native-inputs
`(("ghc-hspec" ,ghc-hspec)
("ghc-haddock-test" ,ghc-haddock-test)))
`(("ghc-hspec" ,ghc-hspec)))
(home-page "https://www.haskell.org/haddock/")
(synopsis
"Documentation-generation tool for Haskell libraries")