view tests/mini/bug13.d @ 1065:dc576c7e4b1e

Fix to make sure to create gen/ in build dir and unbreak build with older perl
author Frits van Bommel <fvbommel wxs.nl>
date Sun, 08 Mar 2009 16:37:55 +0100
parents 1bb99290e03a
children
line wrap: on
line source

module bug13;

void func1(ubyte[4]* arr)
{
    ubyte* b = &(*arr)[0];
    func2(&(*arr)[1]);
}

void func2(ubyte* ptr)
{
    assert(*ptr == 2);
}

void main()
{
    ubyte[4] arr = [cast(ubyte)1,2,3,4];
    func1(&arr);
}