aboutsummaryrefslogtreecommitdiffstats
path: root/src/lift.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/lift.cpp')
-rw-r--r--src/lift.cpp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lift.cpp b/src/lift.cpp
index 799c1e7..8a6c4b0 100644
--- a/src/lift.cpp
+++ b/src/lift.cpp
@@ -39,7 +39,7 @@ lift_symbol(CEnv& cenv, Code& code, const ASymbol* sym) throw()
// Reference to innermost function, replace with "_me"
return cenv.penv.sym("_me");
- } else if (!cenv.code.innermost(sym)) {
+ } else if (!cenv.code.innermost(sym) && strcmp(sym->sym(), "__unreachable")) {
/* Free variable, replace with "(. _me i)" where i is the index
* of the free variable in the closure.
* If this free variable hasn't been encountered yet, it is appended