Mercurial > projects > ldc
view tests/mini/nested13.d @ 450:22a56b65872b
Trying to get the old QD demo to work.
author | Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> |
---|---|
date | Fri, 01 Aug 2008 21:55:57 +0200 |
parents | 1bb99290e03a |
children | a34078905d01 |
line wrap: on
line source
module tangotests.nested2; extern(C) int printf(char*, ...); void main() { int var = 2; void exec(void delegate() dg) { printf("var = %d\n", var); dg(); } void foo() { printf("var = %d\n", var); assert(var == 5); } void bar() { printf("var = %d\n", var); var += 3; exec(&foo); } printf("var = %d\n", var); exec(&bar); return 0; }