void RTTIBuilder::push_funcptr(FuncDeclaration *fd, Type *castto) {
if (fd) {
DtoResolveFunction(fd);
LLConstant *F = getIrFunc(fd)->func;
if (castto) {
F = DtoBitCast(F, DtoType(castto));
}
push(F);
} else if (castto) {
push_null(castto);
} else {
push_null_vp();
}
}
RTTIBuilder::RTTIBuilder(AggregateDeclaration* base_class)
{
DtoResolveDsymbol(base_class);
base = base_class;
basetype = static_cast<TypeClass*>(base->type);
baseir = getIrAggr(base);
assert(baseir && "no IrStruct for TypeInfo base class");
if (base->isClassDeclaration()) {
// just start with adding the vtbl
inits.push_back(baseir->getVtblSymbol());
// and monitor
push_null_vp();
}
}
RTTIBuilder::RTTIBuilder(AggregateDeclaration* base_class)
{
// make sure the base typeinfo class has been processed
base_class->codegen(Type::sir);
base = base_class;
basetype = (TypeClass*)base->type;
baseir = base->ir.irStruct;
assert(baseir && "no IrStruct for TypeInfo base class");
if (base->isClassDeclaration()) {
// just start with adding the vtbl
inits.push_back(baseir->getVtblSymbol());
// and monitor
push_null_vp();
}
}
void RTTIBuilder::push_funcptr(FuncDeclaration* fd, Type* castto)
{
if (fd)
{
fd->codegen(Type::sir);
LLConstant* F = fd->ir.irFunc->func;
if (castto)
F = DtoBitCast(F, DtoType(castto));
inits.push_back(F);
}
else if (castto)
{
push_null(castto);
}
else
{
push_null_vp();
}
}
