Mercurial > projects > ldc
view gen/binops.cpp @ 296:0548a7720a1b trunk
[svn r317] Convert result of _adEq runtime function to bool to make sure EqualExp returns i1 bool.
author | ChristianK |
---|---|
date | Mon, 23 Jun 2008 19:08:32 +0200 |
parents | a95056b3c996 |
children | ca2dfe98036c |
line wrap: on
line source
#include "gen/llvm.h" #include "declaration.h" #include "gen/irstate.h" #include "gen/tollvm.h" #include "gen/dvalue.h" ////////////////////////////////////////////////////////////////////////////// DValue* DtoBinAdd(DValue* lhs, DValue* rhs) { LLValue* v = gIR->ir->CreateAdd(lhs->getRVal(), rhs->getRVal(), "tmp"); return new DImValue( lhs->getType(), v ); } ////////////////////////////////////////////////////////////////////////////// DValue* DtoBinSub(DValue* lhs, DValue* rhs) { LLValue* v = gIR->ir->CreateSub(lhs->getRVal(), rhs->getRVal(), "tmp"); return new DImValue( lhs->getType(), v ); } ////////////////////////////////////////////////////////////////////////////// DValue* DtoBinMul(DValue* lhs, DValue* rhs) { LLValue* v = gIR->ir->CreateMul(lhs->getRVal(), rhs->getRVal(), "tmp"); return new DImValue( lhs->getType(), v ); } ////////////////////////////////////////////////////////////////////////////// DValue* DtoBinDiv(DValue* lhs, DValue* rhs) { Type* t = lhs->getType(); LLValue *l, *r; l = lhs->getRVal(); r = rhs->getRVal(); LLValue* res; if (t->isfloating()) res = gIR->ir->CreateFDiv(l, r, "tmp"); else if (!t->isunsigned()) res = gIR->ir->CreateSDiv(l, r, "tmp"); else res = gIR->ir->CreateUDiv(l, r, "tmp"); return new DImValue( lhs->getType(), res ); } ////////////////////////////////////////////////////////////////////////////// DValue* DtoBinRem(DValue* lhs, DValue* rhs) { Type* t = lhs->getType(); LLValue *l, *r; l = lhs->getRVal(); r = rhs->getRVal(); LLValue* res; if (t->isfloating()) res = gIR->ir->CreateFRem(l, r, "tmp"); else if (!t->isunsigned()) res = gIR->ir->CreateSRem(l, r, "tmp"); else res = gIR->ir->CreateURem(l, r, "tmp"); return new DImValue( lhs->getType(), res ); }