view test/classinfo1.d @ 307:7ade5e035beb trunk

[svn r328] Fixed an issue with interfaces where the vtable type of a interface implemented could be invalid. Fixes several tango modules like, FileStream, ServerSocket and most tina cluster modules :)
author lindquist
date Sat, 28 Jun 2008 03:45:18 +0200
parents d9d5d59873d8
children
line wrap: on
line source

module classinfo1;

extern(C) int printf(char*, ...);

class NoPtrs
{
}

class HasPtrs
{
    void* p;
}

void main()
{
    {
    ClassInfo ci = NoPtrs.classinfo;
    char[] name = ci.name;
    printf("%.*s\n", name.length, name.ptr);
    assert(ci.name == "classinfo1.NoPtrs");
    assert(ci.flags & 2);
    }
    {
    ClassInfo ci = HasPtrs.classinfo;
    char[] name = ci.name;
    printf("%.*s\n", name.length, name.ptr);
    assert(ci.name == "classinfo1.HasPtrs");
    assert(!(ci.flags & 2));
    }
}