diff options
Diffstat (limited to 'src/llvm.cpp')
-rw-r--r-- | src/llvm.cpp | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/llvm.cpp b/src/llvm.cpp index 82d2f79..31e6f6d 100644 --- a/src/llvm.cpp +++ b/src/llvm.cpp @@ -166,7 +166,7 @@ struct LLVMEngine : public Engine { return f; } - void pushFunctionArgs(CEnv& cenv, const ACall* fn, const AType* type, CFunc f); + void pushFunctionArgs(CEnv& cenv, const ATuple* fn, const AType* type, CFunc f); void finishFunction(CEnv& cenv, CFunc f, CVal ret) { builder.CreateRet(llVal(ret)); @@ -196,9 +196,9 @@ struct LLVMEngine : public Engine { CVal compileDot(CEnv& cenv, CVal tup, int32_t index); CVal compileLiteral(CEnv& cenv, const AST* lit); CVal compileString(CEnv& cenv, const char* str); - CVal compilePrimitive(CEnv& cenv, const ACall* prim); - CVal compileIf(CEnv& cenv, const ACall* aif); - CVal compileMatch(CEnv& cenv, const ACall* match); + CVal compilePrimitive(CEnv& cenv, const ATuple* prim); + CVal compileIf(CEnv& cenv, const ATuple* aif); + CVal compileMatch(CEnv& cenv, const ATuple* match); CVal compileGlobal(CEnv& cenv, const AType* type, const string& sym, CVal val); CVal getGlobal(CEnv& cenv, const string& sym, CVal val); @@ -330,7 +330,7 @@ LLVMEngine::compileString(CEnv& cenv, const char* str) } void -LLVMEngine::pushFunctionArgs(CEnv& cenv, const ACall* fn, const AType* type, CFunc f) +LLVMEngine::pushFunctionArgs(CEnv& cenv, const ATuple* fn, const AType* type, CFunc f) { cenv.push(); @@ -351,7 +351,7 @@ LLVMEngine::pushFunctionArgs(CEnv& cenv, const ACall* fn, const AType* type, CFu } CVal -LLVMEngine::compileIf(CEnv& cenv, const ACall* aif) +LLVMEngine::compileIf(CEnv& cenv, const ATuple* aif) { typedef vector< pair<Value*, BasicBlock*> > Branches; LLVMEngine* engine = reinterpret_cast<LLVMEngine*>(cenv.engine()); @@ -402,7 +402,7 @@ LLVMEngine::compileIf(CEnv& cenv, const ACall* aif) } CVal -LLVMEngine::compileMatch(CEnv& cenv, const ACall* match) +LLVMEngine::compileMatch(CEnv& cenv, const ATuple* match) { typedef vector< pair<Value*, BasicBlock*> > Branches; Value* matchee = llVal(resp_compile(cenv, match->list_ref(1))); @@ -457,7 +457,7 @@ LLVMEngine::compileMatch(CEnv& cenv, const ACall* match) } CVal -LLVMEngine::compilePrimitive(CEnv& cenv, const ACall* prim) +LLVMEngine::compilePrimitive(CEnv& cenv, const ATuple* prim) { ATuple::const_iterator i = prim->begin(); |