view tests/mini/foreach11.d @ 1599:0a4be54234d6

Revert fix by Robert for downs as it causes a segfault when compiling tango.
author Kelly Wilson <wilsonk cpsc.ucalgary.ca>
date Wed, 23 Dec 2009 22:49:20 -0700
parents 8baf611f0009
children
line wrap: on
line source

module foreach11;

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

void main() {
    char* last = null;
    printf("The addresses should remain constant:\n");
    foreach (c; "bar") {
        auto a = {
            printf("%x '%c'\n", c, c);
            printf("ptr = %p\n", &c);
            if (last)
                assert(last == &c);
        };
        a();
        last = &c;
    }
}