view test/classes6.d @ 320:d772927ca496 trunk

[svn r341] Fix all regressions between [332] and [340]: - fixed assert on empty catch body - fixed(?) typedefed classes in catch specification - fixed assert with catchall Added some documentation.
author ChristianK
date Sat, 05 Jul 2008 13:05:29 +0200
parents d9d5d59873d8
children
line wrap: on
line source

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

class C
{
    void f()
    {
        printf("world\n");
    }
}

class D : C
{
    void f()
    {
        printf("moon\n");
    }
}


extern(C)
{
    void srand(uint seed);
    int rand();
}

import llvm.intrinsic;

void main()
{
    C c;
    srand(readcyclecounter());
    if (rand() % 2)
        c = new C;
    else
        c = new D;
    c.f();
}