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 aed7c33..6f14d97 100644 --- a/src/cps.cpp +++ b/src/cps.cpp @@ -104,7 +104,7 @@ ACall::cps(TEnv& tenv, AST* cont) const ACall* ret = tup<ACall>(loc, 0); FOREACHP(const_iterator, i, this) ret->push_back((*i)); - if (!to<const APrimitive*>()) + if (!is_primitive(this)) ret->push_back(cont); return ret; } |