From 607afdbd7a221705bddd48c3b2411777e753c0ae Mon Sep 17 00:00:00 2001 From: David Robillard Date: Mon, 26 Jan 2009 08:27:52 +0000 Subject: Shrink. git-svn-id: http://svn.drobilla.net/resp/llvm-lisp@19 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- ll.cpp | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/ll.cpp b/ll.cpp index 8de28fc..e6822c6 100644 --- a/ll.cpp +++ b/ll.cpp @@ -786,16 +786,13 @@ ASTIf::compile(CEnv& cenv) void ASTClosure::lift(CEnv& cenv) { - assert(!func); - // Can't lift a closure with variable types (lift later when called) + if (cenv.tenv.type(body)->var) return; for (size_t i = 0; i < prot->tup.size(); ++i) if (cenv.tenv.type(prot->tup[i])->var) return; - if (cenv.tenv.type(body)->var) - return; - + assert(!func); cenv.code.push_front(); // Write function declaration -- cgit v1.2.1