From d4fbd62b86c0b1129fd66c4efe4bfb3b2e0ecb4f Mon Sep 17 00:00:00 2001 From: David Robillard Date: Sat, 14 May 2011 05:40:21 +0000 Subject: Improve pretty-printing spacing (don't double space flat IR). git-svn-id: http://svn.drobilla.net/resp/trunk@418 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/pprint.cpp | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/pprint.cpp') diff --git a/src/pprint.cpp b/src/pprint.cpp index 4adb568..44a6759 100644 --- a/src/pprint.cpp +++ b/src/pprint.cpp @@ -262,5 +262,9 @@ pprint(ostream& out, const AST* ast, CEnv* cenv, bool types) { print_to(out, ast, 0, cenv, types); print_annotation(out, ast, 0, cenv, types); - out << endl << endl; + out << endl; + if ((is_form(ast, "def") && is_form(ast->as_tuple()->frrst(), "fn")) + || is_form(ast, "fn-end") + || is_form(ast, "def-type")) + out << endl; } -- cgit v1.2.1