X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Fparse.icl;h=f1c76209cb94746f0551e03508df860961e38e76;hb=39ec3b9396a095d914f703163ff02ea5028eea26;hp=bc93239ce593a977e713e887dfef96072be1c53a;hpb=051a7614b88beaea2912dd9f76d04d9a90ec2f99;p=cc1516.git

diff --git a/src/parse.icl b/src/parse.icl
index bc93239..f1c7620 100644
--- a/src/parse.icl
+++ b/src/parse.icl
@@ -218,7 +218,7 @@ printStatements [s:ss] i = (case s of
 		printCodeBlock [] _ = ["{}"]
 		printCodeBlock [x] i = ["\n":printStatements [x] (i+1)]
 		printCodeBlock x i =
-			["{\n":printStatements x (i+1)] ++ indent i ["}"]
+			["{\n":printStatements x (i+1)] ++ indent i ["}\n"]
 
 		indent :: Int [String] -> [String]
 		indent i rest = replicate i "\t" ++ rest