diff options
Diffstat (limited to 'src/cps.cpp')
| -rw-r--r-- | src/cps.cpp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/cps.cpp b/src/cps.cpp index 75b771f..b8b6b62 100644 --- a/src/cps.cpp +++ b/src/cps.cpp @@ -33,7 +33,7 @@ AST::cps(TEnv& tenv, AST* cont) AST* AFn::cps(TEnv& tenv, AST* cont) { - ATuple* copyProt = new ATuple(prot()->loc, *prot()); + ATuple* copyProt = new ATuple(*prot()); ASymbol* contArg = tenv.penv.gensym("_k"); copyProt->push_back(contArg); AFn* copy = tup<AFn>(loc, tenv.penv.sym("fn"), copyProt, 0); |