From 413c299e5b0bc46e4f3b55447aba4b7694a117d3 Mon Sep 17 00:00:00 2001
From: John Walker <theghostjw@gmail.com>
Date: Thu, 12 Dec 2024 09:23:16 +1100
Subject: [PATCH] fix example

---
 examples/TestCompilerErrorDemo.hs | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/examples/TestCompilerErrorDemo.hs b/examples/TestCompilerErrorDemo.hs
index 6adfb01f..dc112563 100644
--- a/examples/TestCompilerErrorDemo.hs
+++ b/examples/TestCompilerErrorDemo.hs
@@ -88,7 +88,10 @@ data' :: RunConfig -> DataSource Data VS
 data' _rc =
   Items [ ]
 
+
 {-
+
+
 -- #### Compiler Error Data missing Checks #### --
 
 -- Note: this error will only come up in a later phase of compilation
@@ -102,8 +105,8 @@ failsSuite2 =
 testAlt2' :: Fixture ()
 testAlt2' = Full config action2 parseAlt2 data2
 
-action2 ::  RunConfig -> Data2 -> Eff es AS
-action2 _rc _i = 
+action2 :: Data2 -> Eff es AS
+action2 _i = 
   pure $ AS {status = Ready, checkButtonText = "Blah"}
 
 parseAlt2 :: AS -> Either ParseException VS
@@ -119,6 +122,7 @@ data Data2 = Item2
   }
   deriving (Show, Read)
 
+
 -- #### Compiler Error - Data Source Mismatch #### --
 
 
@@ -249,5 +253,4 @@ data Data11 = Item11
     checks :: Checks VS
   }
   deriving (Show, Read)
-
--}
\ No newline at end of file
+-}