diff options
author | David Robillard <d@drobilla.net> | 2012-12-25 00:09:34 +0000 |
---|---|---|
committer | David Robillard <d@drobilla.net> | 2012-12-25 00:09:34 +0000 |
commit | bf757dcc9b66ebb3bf7e2df8e8c7d3a011ddd6dc (patch) | |
tree | 0d49ea2dced45c2535b7050ebd7deefc19bd27ac /src/pprint.cpp | |
parent | 67319bf0410196787c753225f46057bc7c94beec (diff) | |
download | resp-bf757dcc9b66ebb3bf7e2df8e8c7d3a011ddd6dc.tar.gz resp-bf757dcc9b66ebb3bf7e2df8e8c7d3a011ddd6dc.tar.bz2 resp-bf757dcc9b66ebb3bf7e2df8e8c7d3a011ddd6dc.zip |
Preliminary syntax-rules macro implementation.
git-svn-id: http://svn.drobilla.net/resp/trunk@443 ad02d1e2-f140-0410-9f75-f8b11f17cedd
Diffstat (limited to 'src/pprint.cpp')
-rw-r--r-- | src/pprint.cpp | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/src/pprint.cpp b/src/pprint.cpp index ff19331..2a8a62d 100644 --- a/src/pprint.cpp +++ b/src/pprint.cpp @@ -194,25 +194,6 @@ print_to(ostream& out, const AST* ast, unsigned indent, CEnv* cenv, bool types) } else if (form == "if") { print_list(out, tup, i, indent + 4, cenv, types, true); - } else if (form == "let") { - out << "("; - const ATuple* vars = (*i)->as_tuple(); - for (ATuple::const_iterator v = vars->begin(); v != vars->end();) { - out << (*v); - print_annotation(out, *v, indent, cenv, types); - - out << " " << (*++v); - - if (++v != vars->end()) - newline(out, indent + 6); - else - out << ")"; - } - newline(out, indent + 2); - print_list(out, tup, tup->iter_at(2), indent + 2, cenv, false, false); - out << ")"; - //print_annotation(out, tup->list_last(), indent, cenv, types); - } else if (form == "match") { out << (*i++); newline(out, indent + 2); |