Add some newlines in the output.

[matthijs/master-project/cλash.git] / Translator.hs

diff --git a/Translator.hs b/Translator.hs
index d11d29e4d09559c97528c8a8e8c09f3520da4589..ed560ec59e136830a9433fe41a88174e7f4f5f58 100644 (file)
--- a/Translator.hs
+++ b/Translator.hs
@@ -61,6 +61,7 @@ listBind filename name = do
   let binds = findBinds core [name]
   putStr "\n"
   putStr $ prettyShow binds
+  putStr "\n\n"
   putStr $ showSDoc $ ppr binds
   putStr "\n\n"