From 6c55be7a476d04db91881bc8870d2a1e838ea521 Mon Sep 17 00:00:00 2001 From: defanor Date: Sat, 16 Dec 2017 18:19:20 +0300 Subject: Add more instances --- test/Test.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'test') diff --git a/test/Test.hs b/test/Test.hs index 4d965c9..c1559fe 100644 --- a/test/Test.hs +++ b/test/Test.hs @@ -8,6 +8,7 @@ import Data.Proxy import Test.Tasty.Travis import Data.Word import Data.Int +import Data.Complex import Coalpit @@ -31,7 +32,7 @@ instance Arbitrary Record where arbitrary = genericArbitraryU data Sum = Foo Int Bool | Bar - | Baz (Int8, (Float, Word16), Rational) + | Baz (Int8, (Complex Float, Word16), Rational) deriving (Generic, Eq, Show, Coalpit) instance Arbitrary Sum where arbitrary = genericArbitraryU -- cgit v1.2.3