diff options
Diffstat (limited to 'src/lift.cpp')
-rw-r--r-- | src/lift.cpp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lift.cpp b/src/lift.cpp index 6e1767a..25940f4 100644 --- a/src/lift.cpp +++ b/src/lift.cpp @@ -115,9 +115,9 @@ lift_fn(CEnv& cenv, Code& code, const ATuple* fn) throw() cenv.push(); const AType* type = cenv.type(fn); AType::const_iterator tp = type->prot()->begin(); - List<AType,AType> implProtT; - List<ATuple, const AST> implProt; + List<ATuple, const AST> implProt; + List<AType, const AType> implProtT; // Prepend closure parameter implProt.push_back(cenv.penv.sym("_me")); @@ -130,7 +130,7 @@ lift_fn(CEnv& cenv, Code& code, const ATuple* fn) throw() } cenv.def((*p)->as_symbol(), *p, paramType, NULL); implProt.push_back(*p); - implProtT.push_back(new AType(*paramType)); + implProtT.push_back(paramType); } impl.push_back(implProt); |