aboutsummaryrefslogtreecommitdiff
path: root/Sil/Util
diff options
context:
space:
mode:
Diffstat (limited to 'Sil/Util')
-rw-r--r--Sil/Util/Printer.icl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Sil/Util/Printer.icl b/Sil/Util/Printer.icl
index 3ed15fb..55c2498 100644
--- a/Sil/Util/Printer.icl
+++ b/Sil/Util/Printer.icl
@@ -68,9 +68,9 @@ where
instance PrettyPrinter Program
where
- print st prog = p st prog.p_funs
+ print st prog = p st prog.p_globals <+ "\r\n" <+ p st prog.p_funs
where
- p :: PrintState [Function] -> String
+ p :: PrintState [a] -> String | PrettyPrinter a
p _ [] = ""
p st [f] = print st f
p st [f:fs] = print st f <+ "\r\n\r\n" <+ p st fs