annotate 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
rev   line source
lindquist@50 1 module bug24;
lindquist@270 2 extern(C) int printf(char*, ...);
lindquist@50 3
lindquist@50 4 struct S
lindquist@50 5 {
lindquist@50 6 long l;
lindquist@50 7 float f;
lindquist@50 8 }
lindquist@50 9
lindquist@50 10 void main()
lindquist@50 11 {
lindquist@50 12 S s = S(3L,2f);
lindquist@50 13 delegate {
lindquist@50 14 S t = S(4L, 1f);
lindquist@50 15 delegate {
lindquist@50 16 s.l += t.l;
lindquist@50 17 s.f += t.f;
lindquist@50 18 }();
lindquist@50 19 }();
lindquist@50 20 printf("%lu %f\n", s.l, s.f);
lindquist@50 21 assert(s.l == 7 && s.f == 3);
lindquist@50 22 }