public inbox for gentoo-commits@lists.gentoo.org
 help / color / mirror / Atom feed
From: "Sergei Trofimovich" <slyfox@gentoo.org>
To: gentoo-commits@lists.gentoo.org
Subject: [gentoo-commits] repo/gentoo:master commit in: dev-haskell/testpack/files/, dev-haskell/testpack/
Date: Mon, 21 Sep 2015 21:27:50 +0000 (UTC)	[thread overview]
Message-ID: <1442870856.45b650a0f158ec844470ff81cb64999c93196cfd.slyfox@gentoo> (raw)

commit:     45b650a0f158ec844470ff81cb64999c93196cfd
Author:     Sergei Trofimovich <slyfox <AT> gentoo <DOT> org>
AuthorDate: Mon Sep 21 21:25:33 2015 +0000
Commit:     Sergei Trofimovich <slyfox <AT> gentoo <DOT> org>
CommitDate: Mon Sep 21 21:27:36 2015 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=45b650a0

dev-haskell/testpack: tweak for QuickCheck-2.8, bug #561010

Reported-by: Toralf Förster
Bug: https://bugs.gentoo.org/561010

Package-Manager: portage-2.2.20

 dev-haskell/testpack/files/testpack-2.1.3.0-HUnit-1.3.patch | 13 +++++++++++++
 dev-haskell/testpack/files/testpack-2.1.3.0-qc28.patch      |  2 +-
 dev-haskell/testpack/testpack-2.1.3.0-r1.ebuild             |  1 +
 3 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/dev-haskell/testpack/files/testpack-2.1.3.0-HUnit-1.3.patch b/dev-haskell/testpack/files/testpack-2.1.3.0-HUnit-1.3.patch
new file mode 100644
index 0000000..599615a
--- /dev/null
+++ b/dev-haskell/testpack/files/testpack-2.1.3.0-HUnit-1.3.patch
@@ -0,0 +1,13 @@
+diff --git a/src/Test/HUnit/Tools.hs b/src/Test/HUnit/Tools.hs
+index a24a510..6b8a25e 100644
+--- a/src/Test/HUnit/Tools.hs
++++ b/src/Test/HUnit/Tools.hs
+@@ -97,3 +97,7 @@ runVerbTestText (HU.PutText put us) t = do
+   reportFailure = reportProblem "Failure:" "Failure in: "
+-  reportProblem p0 p1 msg ss us = put line True us
++  reportProblem p0 p1
++#if MIN_VERSION_HUnit(1,3,0)
++                      _loc
++#endif
++                           msg ss us = put line True us
+    where line  = "### " ++ kind ++ path' ++ '\n' : msg

diff --git a/dev-haskell/testpack/files/testpack-2.1.3.0-qc28.patch b/dev-haskell/testpack/files/testpack-2.1.3.0-qc28.patch
index 1bc9537..4ca1848 100644
--- a/dev-haskell/testpack/files/testpack-2.1.3.0-qc28.patch
+++ b/dev-haskell/testpack/files/testpack-2.1.3.0-qc28.patch
@@ -116,7 +116,7 @@ index 712c9bf..506686f 100644
 -                  reason = "Result: expected " ++ show expected ++ ", got " ++ show actual,
 -                  stamp = [], callbacks = []}
 -    
-+        P.result { P.ok = Just (expected == actual)
++        P.failed { P.ok = Just (expected == actual)
 +                 , P.reason = "Result: expected " ++ show expected ++ ", got " ++ show actual
 +                 }
  {- | Like '@=?', but with args in a different order. -}

diff --git a/dev-haskell/testpack/testpack-2.1.3.0-r1.ebuild b/dev-haskell/testpack/testpack-2.1.3.0-r1.ebuild
index a3fa62e..97ca628 100644
--- a/dev-haskell/testpack/testpack-2.1.3.0-r1.ebuild
+++ b/dev-haskell/testpack/testpack-2.1.3.0-r1.ebuild
@@ -30,4 +30,5 @@ DEPEND="${RDEPEND}
 
 src_prepare() {
 	epatch "${FILESDIR}"/${P}-qc28.patch
+	epatch "${FILESDIR}"/${P}-HUnit-1.3.patch
 }


                 reply	other threads:[~2015-09-21 21:27 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1442870856.45b650a0f158ec844470ff81cb64999c93196cfd.slyfox@gentoo \
    --to=slyfox@gentoo.org \
    --cc=gentoo-commits@lists.gentoo.org \
    --cc=gentoo-dev@lists.gentoo.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox