1 files changed, 3 insertions, 3 deletions
diff --git a/llvm.cpp b/llvm.cpp
index 1717160..4db9a2a 100644
--- a/llvm.cpp
+++ b/llvm.cpp
@@ -409,9 +409,9 @@ AType*
 ASTConsCall::functionType(CEnv& cenv)
 {
 	ASTTuple* protTypes = new ASTTuple(cenv.tenv.type(at(1)), cenv.tenv.type(at(2)), NULL);
-	AType* cellType = new AType(ASTTuple(cenv.penv.sym("Pair"),
-				cenv.tenv.type(at(1)), cenv.tenv.type(at(2)), NULL), Cursor());
-	return new AType(ASTTuple(cenv.penv.sym("Fn"), protTypes, cellType, NULL), loc);
+	AType* cellType = new AType(loc,
+			cenv.penv.sym("Pair"), cenv.tenv.type(at(1)), cenv.tenv.type(at(2)));
+	return new AType(at(0)->loc, cenv.penv.sym("Fn"), protTypes, cellType, 0);
 }
 
 void