diff options
Diffstat (limited to 'src/repl.cpp')
| -rw-r--r-- | src/repl.cpp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/repl.cpp b/src/repl.cpp index 25da08a..9709656 100644 --- a/src/repl.cpp +++ b/src/repl.cpp @@ -134,7 +134,7 @@ compile(CEnv& cenv, const Code& parsed, Code& defs, bool& hasMain, const char* m for (Code::const_iterator i = stages.back().begin(); i != stages.back().end(); ++i) { const ATuple* call = (*i)->to_tuple(); if (call && (is_form(*i, "def-type") - || (is_form(*i, "def") && is_form(call->frrst(), "fn")))) { + || (is_form(*i, "define") && is_form(call->frrst(), "lambda")))) { resp_flatten(cenv, defs, call); } else if (call && is_form(*i, "prot")) { defs.push_back(*i); @@ -151,7 +151,7 @@ compile(CEnv& cenv, const Code& parsed, Code& defs, bool& hasMain, const char* m if (!exprs.empty()) { const ASymbol* main = cenv.penv.sym(mainName); - List mainT(Cursor(), cenv.penv.sym("Fn"), new ATuple(Cursor()), retT, NULL); + List mainT(Cursor(), cenv.penv.sym("lambda"), new ATuple(Cursor()), retT, NULL); cenv.def(main, NULL, mainT, NULL); defs.push_back( |