From 654760d5b8bd24e124fbd182ef954a08e503cad9 Mon Sep 17 00:00:00 2001
From: Bryan O'Sullivan <bos@serpentine.com>
Date: Tue, 11 Nov 2014 20:51:19 -0800
Subject: [PATCH] YA attempt at GHC 7.0 build fix :-(
---
tests/Tests/QuickCheckUtils.hs | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/tests/Tests/QuickCheckUtils.hs b/tests/Tests/QuickCheckUtils.hs
index b4865ff6..c086af43 100644
--- a/tests/Tests/QuickCheckUtils.hs
+++ b/tests/Tests/QuickCheckUtils.hs
@@ -89,6 +89,10 @@ instance Random Word where
randomR = integralRandomR
random = randomR (minBound,maxBound)
+instance Random Word8 where
+ randomR = integralRandomR
+ random = randomR (minBound,maxBound)
+
instance Random Word64 where
randomR = integralRandomR
random = randomR (minBound,maxBound)
--
GitLab