about summary refs log tree commit diff
path: root/src/Xanthous
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xanthous')
-rw-r--r--src/Xanthous/Data.hs2
1 files changed, 2 insertions, 0 deletions
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