From b2f4262749dbc601f2e66901d2575003271ac683 Mon Sep 17 00:00:00 2001
From: Evan Rutledge Borden <eborden@frontrowed.com>
Date: Sun, 3 Nov 2019 21:04:42 -0600
Subject: [PATCH] Isolate deriving via test

---
 src-literatetests/10-tests.blt | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src-literatetests/10-tests.blt b/src-literatetests/10-tests.blt
index d12ba21..3a188de 100644
--- a/src-literatetests/10-tests.blt
+++ b/src-literatetests/10-tests.blt
@@ -363,6 +363,12 @@ data Foo = Bar
   deriving anyclass (Show, Eq, Monad, Functor)
   deriving newtype Show
   deriving newtype (Traversable, Foldable)
+
+#test record deriving via
+data Foo = Bar
+  { foo  :: Baz
+  , bars :: Bizzz
+  }
   deriving ToJSON via (SomeType)
   deriving (ToJSON, FromJSON) via (SomeType)