view tests/mini/nested13.d @ 1078:9c63438c3207

Fix for asm { jle short Lret; }, used by Tango since dmd accepts the 'short'. We just throw the 'short/long' away right now.
author Kelly Wilson <wilsonk cpsc.ucalgary.ca>
date Mon, 09 Mar 2009 20:11:42 -0600
parents a34078905d01
children 27948fd2e7ef
line wrap: on
line source

module mini.nested13;

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;
}