diff options
author | David Robillard <d@drobilla.net> | 2009-03-07 05:16:30 +0000 |
---|---|---|
committer | David Robillard <d@drobilla.net> | 2009-03-07 05:16:30 +0000 |
commit | 5faf51234f0279c057c58a6c26cf35f4266bedaf (patch) | |
tree | c00831a6a0372e86b1c20f6a65f48f9ca505e806 /llvm.cpp | |
parent | 3322999a97f4170e1476fc4bff431f5ca8909333 (diff) | |
download | resp-5faf51234f0279c057c58a6c26cf35f4266bedaf.tar.gz resp-5faf51234f0279c057c58a6c26cf35f4266bedaf.tar.bz2 resp-5faf51234f0279c057c58a6c26cf35f4266bedaf.zip |
Remove redundant/useless ASTCall::exp
git-svn-id: http://svn.drobilla.net/resp/tuplr@77 ad02d1e2-f140-0410-9f75-f8b11f17cedd
Diffstat (limited to 'llvm.cpp')
-rw-r--r-- | llvm.cpp | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -266,9 +266,9 @@ ASTCall::lift(CEnv& cenv) // Extend environment with bound and typed parameters cenv.push(); if (c->prot()->size() < size() - 1) - throw Error((format("too many arguments to function `%1%'") % at(0)->str()).str(), exp.loc); + throw Error((format("too many arguments to function `%1%'") % at(0)->str()).str(), loc); if (c->prot()->size() > size() - 1) - throw Error((format("too few arguments to function `%1%'") % at(0)->str()).str(), exp.loc); + throw Error((format("too few arguments to function `%1%'") % at(0)->str()).str(), loc); for (size_t i = 1; i < size(); ++i) cenv.code.def(checked_cast<ASTSymbol*>(c->prot()->at(i-1)), at(i)); @@ -282,7 +282,7 @@ ASTCall::compile(CEnv& cenv) { AST* c = maybeLookup(cenv, at(0)); Function* f = dynamic_cast<Function*>(LLVal(cenv.compile(c))); - if (!f) throw Error("callee failed to compile", exp.loc); + if (!f) throw Error("callee failed to compile", loc); vector<Value*> params(size() - 1); for (size_t i = 1; i < size(); ++i) @@ -295,7 +295,7 @@ void ASTDefinition::lift(CEnv& cenv) { if (cenv.code.ref(checked_cast<ASTSymbol*>(at(1)))) - throw Error(string("`") + at(1)->str() + "' redefined", exp.loc); + throw Error(string("`") + at(1)->str() + "' redefined", loc); cenv.code.def((ASTSymbol*)at(1), at(2)); // Define first for recursion at(2)->lift(cenv); } @@ -390,7 +390,7 @@ ASTPrimitive::compile(CEnv& cenv) return cenv.engine.builder.CreateFCmp(pred, a, b); } - throw Error("Unknown primitive", exp.loc); + throw Error("unknown primitive", loc); } AType* |