aboutsummaryrefslogtreecommitdiffstats
path: root/src/pprint.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/pprint.cpp')
-rw-r--r--src/pprint.cpp4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pprint.cpp b/src/pprint.cpp
index 463d91a..cc6d316 100644
--- a/src/pprint.cpp
+++ b/src/pprint.cpp
@@ -174,7 +174,7 @@ print_to(ostream& out, const AST* ast, unsigned indent, CEnv* cenv, bool types)
}
out << ")";
- } else if (form == "def-type") {
+ } else if (form == "define-type") {
out << (*i++);
newline(out, indent + 2);
print_list(out, tup, i, indent + 2, cenv, types, false);
@@ -251,6 +251,6 @@ pprint(ostream& out, const AST* ast, CEnv* cenv, bool types)
out << endl;
if ((is_form(ast, "define") && is_form(ast->as_tuple()->frrst(), "lambda"))
|| is_form(ast, "fn-end")
- || is_form(ast, "def-type"))
+ || is_form(ast, "define-type"))
out << endl;
}