mirrors/ldc
1
0
Fork 0
mirror of https://github.com/ldc-developers/ldc.git synced 2025-05-01 23:50:43 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

[svn r393] Started implementation for DtoNullValue.

Browse source
This commit is contained in:
Christian Kamm 2008-07-15 14:53:16 +02:00
parent 04db1053e0
commit 625f28814d
2 changed files with 47 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

46
gen/llvmhelpers.cpp
View file

@ -628,6 +628,49 @@ void DtoAssign(DValue* lhs, DValue* rhs)
}
}
/****************************************************************************************/
/*////////////////////////////////////////////////////////////////////////////////////////
// NULL VALUE HELPER
////////////////////////////////////////////////////////////////////////////////////////*/
DValue* DtoNullValue(Type* type)
{
Type* basetype = type->toBasetype();
TY basety = basetype->ty;
const LLType* lltype = DtoType(basetype);
// complex, needs to be first since complex are also floating
if (basetype->iscomplex())
{
const LLType* basefp = DtoComplexBaseType(basetype);
return new DComplexValue(type, LLConstant::getNullValue(basefp), LLConstant::getNullValue(basefp));
}
// integer, floating, pointer and class have no special representation
else if (basetype->isintegral() || basetype->isfloating() || basety == Tpointer || basety == Tclass)
{
return new DConstValue(type, LLConstant::getNullValue(lltype));
}
// dynamic array
else if (basety == Tarray)
{
//TODO: What types do the constants here need to have?
return new DSliceValue(type, NULL, NULL);
}
// delegate
else if (basety == Tdelegate)
{
//TODO: Is this correct?
return new DNullValue(type, LLConstant::getNullValue(lltype));
}
// unknown
std::cout << "unsupported: null value for " << type->toChars() << '\n';
assert(0);
return 0;
}
/****************************************************************************************/
/*////////////////////////////////////////////////////////////////////////////////////////
// CASTING HELPERS
@ -1335,8 +1378,7 @@ LLValue* DtoBoolean(DValue* dval)
// complex
else if (dtype->iscomplex())
{
// huh?
return DtoComplexEquals(TOKnotequal, dval, DtoComplex(dtype, new DNullValue(Type::tint8, llvm::ConstantInt::get(LLType::Int8Ty, 0))));
return DtoComplexEquals(TOKnotequal, dval, DtoNullValue(dtype));
}
// floating point
else if (dtype->isfloating())