1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
From d2e4be528ee0ec48a51fdec63b24e1186390e8d6 Mon Sep 17 00:00:00 2001
From: Ben Gamari <ben@smart-cactus.org>
Date: Fri, 28 Feb 2025 18:01:33 -0500
Subject: [PATCH] quickcheck-instances now provides instances for primitive
Vectors
---
serialise/tests/Tests/Orphanage.hs | 2 ++
1 file changed, 2 insertions(+)
diff --git a/serialise/tests/Tests/Orphanage.hs b/serialise/tests/Tests/Orphanage.hs
index d852c8f0..0a984d31 100644
--- a/tests/Tests/Orphanage.hs
+++ b/tests/Tests/Orphanage.hs
@@ -195,9 +195,11 @@ instance Arbitrary BSS.ShortByteString where
arbitrary = BSS.pack <$> arbitrary
#endif
+#if !MIN_VERSION_quickcheck_instances(0,3,32)
instance (Vector.Primitive.Prim a, Arbitrary a
) => Arbitrary (Vector.Primitive.Vector a) where
arbitrary = Vector.Primitive.fromList <$> arbitrary
+#endif
#if MIN_VERSION_base(4,7,0) && !MIN_VERSION_QuickCheck(2,10,0)
instance Arbitrary (Proxy a) where
|
