From a817d950ddbc645d0562d8f984d45a7ca4666033 Mon Sep 17 00:00:00 2001 From: Rick Winfrey Date: Thu, 3 Nov 2016 17:09:28 -0500 Subject: [PATCH] Add Generic instance to Range --- src/Range.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Range.hs b/src/Range.hs index fe6cfc8c7..04d5f4a12 100644 --- a/src/Range.hs +++ b/src/Range.hs @@ -10,7 +10,7 @@ import Test.QuickCheck -- | A half-open interval of integers, defined by start & end indices. data Range = Range { start :: Int, end :: Int } - deriving (Eq, Show) + deriving (Eq, Show, Generic) -- | Make a range at a given index. rangeAt :: Int -> Range