From 14997bc1a3501cb3b759dc6dff7a2604deb6648b Mon Sep 17 00:00:00 2001
From: Griffin Smith <root@gws.fyi>
Date: Tue, 31 Dec 2019 11:28:51 -0500
Subject: Fix ambiguity error in Opposite tests

For some reason cabal wasn't properly recompiling this file locally to
pick up the introduction of an ambiguity error.
---
 src/Xanthous/Data.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Xanthous/Data.hs')

diff --git a/src/Xanthous/Data.hs b/src/Xanthous/Data.hs
index 8a8a62d0ee08..5e451695825f 100644
--- a/src/Xanthous/Data.hs
+++ b/src/Xanthous/Data.hs
@@ -334,6 +334,7 @@ data Corner
   | BottomLeft
   | BottomRight
   deriving stock (Show, Eq, Ord, Enum, Bounded, Generic)
+  deriving Arbitrary via GenericArbitrary Corner
 
 instance Opposite Corner where
   opposite TopLeft = BottomRight
@@ -347,6 +348,7 @@ data Edge
   | RightEdge
   | BottomEdge
   deriving stock (Show, Eq, Ord, Enum, Bounded, Generic)
+  deriving Arbitrary via GenericArbitrary Edge
 
 instance Opposite Edge where
   opposite TopEdge = BottomEdge
-- 
cgit 1.4.1