view test/union7.d @ 127:facc562f5674 trunk

[svn r131] Fixed #11 All associative array properties now work as they should. Fixed problems with some cases of array.length and array.ptr. Fixed some problems with array properties. Fixed 'in' contracts.
author lindquist
date Fri, 30 Nov 2007 12:56:52 +0100
parents 058d3925950e
children
line wrap: on
line source

module union7;

pragma(LLVM_internal, "notypeinfo")
struct Union
{
    union {
        double g;
        struct {
            short s1,s2,s3,s4;
        }
    }
    union {
        float f;
        long l;
    }
}

Union a = { f:4f };
Union b = { 3.0, f:2 };
Union c = { l:42, g:2.0 };
Union d = { s2:3 };
Union e = { s1:3, s4:4, l:5 };

void main()
{
    assert(a.f == 4f);
    assert(a.g !<>= 0.0);
    assert((a.l>>>32) == 0);

    assert(b.g == 3.0);
    assert(b.f == 2f);

    assert(c.l == 42);
    assert(c.g == 2.0);

    assert(d.s1 == 0);
    assert(d.s2 == 3);
    assert(d.s3 == 0);
    assert(d.s4 == 0);
    {assert(d.f !<>= 0f);}
    {}
    assert(e.s1 == 3);
    assert(e.s2 == 0);
    assert(e.s3 == 0);
    {assert(e.s4 == 4);}
    {}
    assert(e.l == 5);
}