src/Gyehoek/Stack/Syntax.hs

@@ -25,7 +25,8 @@ import Effectful
 
 
 newtype Program = MkProgram
-  { blocks :: HashMap Name Block }
+  { blocks :: HashMap Name Block
+  }
   deriving stock (Show, Generic, Data)
 
 newtype Block = MkBlock { code :: List Instr }