From 50e06edf7e43bc11e3c5e38a949c5c8e7801a9eb Mon Sep 17 00:00:00 2001 From: Mart Lubbers Date: Mon, 29 Feb 2016 14:03:44 +0100 Subject: [PATCH] printen beetje gefixt --- src/parse.icl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/parse.icl b/src/parse.icl index c28fb4c..6c888ac 100644 --- a/src/parse.icl +++ b/src/parse.icl @@ -222,7 +222,7 @@ printStatements [s:ss] i = (case s of ) ++ printStatements ss i where printCodeBlock :: [Stmt] Int -> [String] - printCodeBlock [] _ = ["{}"] + printCodeBlock [] _ = ["{}\n"] printCodeBlock [x] i = ["\n":printStatements [x] (i+1)] printCodeBlock x i = ["{\n":printStatements x (i+1)] ++ indent i ["}\n"] -- 2.20.1