view tests/mini/bug308_double_finally.d @ 1448:e92e14690a4f

change mingw32 versioning to version(Windows)
author Kelly Wilson <wilsonk cpsc.ucalgary.ca>
date Sun, 31 May 2009 11:20:26 -0600
parents f9285cf14c0d
children
line wrap: on
line source

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

long foo(ref int p) {
    try { return 0; }
    finally {
        p++;
        throw new Object;
    }
}

void main() {
    int p = 0;
    try {
        foo(p);
        assert(0);
    } catch {
    }
    printf("Number of types scope(exit) was executed : %d\n", p);
    assert(p == 1);
}