view tests/mini/bug24.d @ 1651:cb960b882ca3 default tip

bindings were moved to dsource.org/projects/bindings/
author Moritz Warning <moritzwarning@web.de>
date Thu, 20 May 2010 20:05:03 +0200
parents 1bb99290e03a
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);
}