From 16e20e1ddf652d45bf041d557bdc3becbbc5d99d Mon Sep 17 00:00:00 2001 From: David Robillard Date: Wed, 29 Dec 2010 18:21:38 +0000 Subject: Don't add __unreachable to free vars. git-svn-id: http://svn.drobilla.net/resp/resp@372 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/lift.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') 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 -- cgit v1.2.1