From acdf6b81fddf9459286b4cf3fd9bbc9d2542f5f1 Mon Sep 17 00:00:00 2001 From: Maximilian Algehed Date: Wed, 20 Mar 2024 15:06:22 +0100 Subject: [PATCH] only one of these instances is overlapping, what will ghc 7 say? --- src/Test/QuickCheck/Arbitrary.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Test/QuickCheck/Arbitrary.hs b/src/Test/QuickCheck/Arbitrary.hs index b2d468c4..94aec03f 100644 --- a/src/Test/QuickCheck/Arbitrary.hs +++ b/src/Test/QuickCheck/Arbitrary.hs @@ -409,7 +409,7 @@ instance GSubtermsIncl f a => GSubtermsIncl (M1 i c f) a where instance OVERLAPPING_ GSubtermsIncl (K1 i a) a where gSubtermsIncl (K1 x) = [x] -instance OVERLAPPING_ GSubtermsIncl (K1 i a) b where +instance GSubtermsIncl (K1 i a) b where gSubtermsIncl (K1 _) = [] #endif