gentoo-ebuilds/dev-haskell/quickcheck-classes-base/files/quickcheck-classes-base-0.6.2.0-laws.patch
Sergei Trofimovich c16eca8aec
dev-haskell/quickcheck-classes-base: fix USE="binary-laws -unary-laws" case
Reported-by: Toralf Förster
Closes: https://bugs.gentoo.org/804870
Package-Manager: Portage-3.0.20, Repoman-3.0.3
Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
2021-07-30 23:30:08 +01:00

51 lines
1.6 KiB
Diff
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

From b59ab822c261283004c2e87cffc653dc2b35c030 Mon Sep 17 00:00:00 2001
From: Sergei Trofimovich <slyfox@gentoo.org>
Date: Fri, 30 Jul 2021 23:23:19 +0100
Subject: [PATCH] quickcheck-classes-base: move qe1_q under UNARY_LAWS define
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
In https://bugs.gentoo.org/804870 Toralf noticed a build failure:
```
$ cabal build --flags=binary-laws --flags=-unary-laws
Configuring quickcheck-classes-base-0.6.2.0...
Preprocessing library for quickcheck-classes-base-0.6.2.0..
Building library for quickcheck-classes-base-0.6.2.0..
[ 1 of 30] Compiling Test.QuickCheck.Classes.Internal ( src/Test/QuickCheck/Classes/Internal.hs, dist/build/Test/QuickCheck/Classes/Internal.o, dist/build/Test/QuickCheck/Classes/Internal.dyn_o )
src/Test/QuickCheck/Classes/Internal.hs:79:5: error:
Not in scope: eq1_2
|
79 | , eq1_2
| ^^^^^
```
In happens due to a mismatch between export and definition #ifdef guards.
The change fised declaration to match definition.
Reported-by: Toralf Förster
Bug: https://bugs.gentoo.org/804870
Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
---
quickcheck-classes-base/src/Test/QuickCheck/Classes/Internal.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
--- a/src/Test/QuickCheck/Classes/Internal.hs
+++ b/src/Test/QuickCheck/Classes/Internal.hs
@@ -73,10 +73,10 @@ module Test.QuickCheck.Classes.Internal
, isTrue#
#if HAVE_UNARY_LAWS
, eq1
+ , eq1_2
#endif
#if HAVE_BINARY_LAWS
, eq2
- , eq1_2
#endif
, readMaybe
) where
--
2.32.0