added enum pretty printing tests

2026-03-19 05:20:07 +00:00 · 2022-01-12 14:41:28 +02:00
parent a8c5438d79
commit 07d4cc73e0
10 changed files with 122 additions and 13 deletions
--- a/resources/Enums/haskellEnum2.hs
+++ b/resources/Enums/haskellEnum2.hs
@@ -0,0 +1,13 @@
+{-The enumerated values to specified the period, e.g. day, week.-}
+data EnumWithoutDisplay =
+    {-Day-}
+    D
+    {-Month-}
+    | M
+    {-Year-}
+    | Y
+
+instance Show EnumWithoutDisplay where
+    show D = "D"
+    show M = "M"
+    show Y = "Y"