aboutsummaryrefslogtreecommitdiffstats
path: root/src/lift.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/lift.cpp')
-rw-r--r--src/lift.cpp8
1 files changed, 4 insertions, 4 deletions
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<ATuple>(sym->loc, cenv.penv.sym("."),
- cenv.penv.sym("_me"),
- new ALiteral<int32_t>(index, Cursor()),
+ cenv.penv.sym("_me"),
+ new ALiteral<int32_t>(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<ATuple>(call->loc, cenv.penv.sym("."),
- copy.head->head(),
- new ALiteral<int32_t>(0, Cursor()), NULL);
+ copy.head->head(),
+ new ALiteral<int32_t>(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<const AType*>();