From 1edf90da9e6d02bfb421355266e3c8e3066bdc9b Mon Sep 17 00:00:00 2001 From: Sean Leather Date: Sat, 17 Feb 2024 16:47:59 +0200 Subject: [PATCH] Fix the other prop_show_read test This test used the '[Int]' instances of 'Read' and 'Show' instead of the 'DList Int' instances. See #117. --- tests/DListProperties.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/DListProperties.hs b/tests/DListProperties.hs index b30a666..3599fd4 100644 --- a/tests/DListProperties.hs +++ b/tests/DListProperties.hs @@ -97,7 +97,7 @@ prop_intercalate sep = eqWith (List.intercalate sep) (toList . intercalate (fromList sep) . List.map fromList) prop_show_read :: [Int] -> Bool -prop_show_read = eqWith id (read . show) +prop_show_read = eqWith id (read . show) . fromList prop_read_show :: [Int] -> Bool prop_read_show x = eqWith id (show . f . read) $ "fromList " ++ show x