view test/classes6.d @ 179:c853a8a04cdc trunk

[svn r195] fixed some tango bugs (tango ticket 1093).
author lindquist
date Wed, 07 May 2008 05:45:25 +0200
parents d3ee9efe20e2
children d9d5d59873d8
line wrap: on
line source

module classes6;

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();
}