From 3ace07c3056cf9979053562cace439a6a1693b08 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Fri, 3 Dec 2010 01:27:51 +0000 Subject: Remove AST::constrain. git-svn-id: http://svn.drobilla.net/resp/resp@287 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/lift.cpp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/lift.cpp') diff --git a/src/lift.cpp b/src/lift.cpp index f39239e..df34d7a 100644 --- a/src/lift.cpp +++ b/src/lift.cpp @@ -41,8 +41,8 @@ lift_symbol(CEnv& cenv, Code& code, ASymbol* sym) throw() // Replace symbol with code to access free variable from closure return tup(sym->loc, cenv.penv.sym("."), - cenv.penv.sym("_me"), - new ALiteral(index, Cursor()), + cenv.penv.sym("_me"), + new ALiteral(T_INT32, index, Cursor()), NULL); } else { return sym; @@ -165,8 +165,8 @@ lift_call(CEnv& cenv, Code& code, ATuple* call) throw() } else { // Call to a closure, prepend code to access implementation function ATuple* getFn = tup(call->loc, cenv.penv.sym("."), - copy.head->head(), - new ALiteral(0, Cursor()), NULL); + copy.head->head(), + new ALiteral(T_INT32, 0, Cursor()), NULL); const AType* calleeT = cenv.type(copy.head->head()); assert(**calleeT->begin() == *cenv.tenv.Tup); const AType* implT = calleeT->list_ref(1)->as(); -- cgit v1.2.1