view tests/mini/bug24.d @ 341:1bb99290e03a trunk

[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author lindquist
date Sun, 13 Jul 2008 02:51:19 +0200
parents test/bug24.d@d9d5d59873d8
children
line wrap: on
line source

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

struct S
{
    long l;
    float f;
}

void main()
{
    S s = S(3L,2f);
    delegate {
        S t = S(4L, 1f);
        delegate {
            s.l += t.l;
            s.f += t.f;
        }();
    }();
    printf("%lu %f\n", s.l, s.f);
    assert(s.l == 7 && s.f == 3);
}