mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-27 23:02:16 -05:00
gnu: ghc-9.2: Make the skip-T21694-i686 phase unconditional.
* gnu/packages/haskell.scm (ghc-9.2) [arguments]: Remove match conditional for the skip-T21694-i686 phase.
This commit is contained in:
parent
e6090152a6
commit
e244ea2445
1 changed files with 13 additions and 16 deletions
|
@ -23,6 +23,7 @@
|
|||
;;; Copyright © 2021 Matthew James Kraai <kraai@ftbfs.org>
|
||||
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
|
||||
;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
|
||||
;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -1325,20 +1326,16 @@ (define-public ghc-9.2
|
|||
(substitute-keyword-arguments (package-arguments base)
|
||||
((#:phases phases '%standard-phases)
|
||||
#~(modify-phases #$phases
|
||||
;; File Common.hs has been moved to src/ in this release.
|
||||
(replace 'fix-cc-reference
|
||||
(lambda _
|
||||
(substitute* "utils/hsc2hs/src/Common.hs"
|
||||
(("\"cc\"") "\"gcc\""))))
|
||||
;; FIXME: Remove i686-specific match on the next rebuild cycle.
|
||||
#$@(match (%current-system)
|
||||
("i686-linux"
|
||||
#~((add-after 'skip-more-tests 'skip-T21694-i686
|
||||
(lambda _
|
||||
(substitute* '("testsuite/tests/simplCore/should_compile/all.T")
|
||||
(("^test\\('T21694', \\[ " all)
|
||||
(string-append all "when(arch('i386'), skip), ")))))))
|
||||
(_ #~()))))
|
||||
;; File Common.hs has been moved to src/ in this release.
|
||||
(replace 'fix-cc-reference
|
||||
(lambda _
|
||||
(substitute* "utils/hsc2hs/src/Common.hs"
|
||||
(("\"cc\"") "\"gcc\""))))
|
||||
(add-after 'skip-more-tests 'skip-T21694-i686
|
||||
(lambda _
|
||||
(substitute* '("testsuite/tests/simplCore/should_compile/all.T")
|
||||
(("^test\\('T21694', \\[ " all)
|
||||
(string-append all "when(arch('i386'), skip), ")))))))
|
||||
;; Increase verbosity, so running the test suite does not time out on CI.
|
||||
((#:make-flags make-flags ''())
|
||||
#~(cons "VERBOSE=4" #$make-flags))))
|
||||
|
@ -1350,8 +1347,8 @@ (define-public ghc-9.2
|
|||
,(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://www.haskell.org/ghc/dist/"
|
||||
version "/ghc-" version "-testsuite.tar.xz"))
|
||||
"https://www.haskell.org/ghc/dist/"
|
||||
version "/ghc-" version "-testsuite.tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"19ha0hidrijawy53vm2r0sgml5zkl8126mqy7p0pyacmw3k7913l"))
|
||||
|
|
Loading…
Reference in a new issue