view tests/mini/assign.d @ 983:6e68054cfc20

Fix out-ouf-source build for runtime as well. To build out-of-source, follow these steps: # [[Insert LLVM build instructions here]] mkdir my_build_dir cd my_build_dir svn co http://svn.dsource.org/projects/tango/trunk tango ccmake <PATH_TO_SOURCE> # (Regular ccmake stuff, press 'c' a few times followed by 'g') make make runtime # add `PWD`/bin to PATH closes #213
author Frits van Bommel <fvbommel wxs.nl>
date Thu, 19 Feb 2009 11:01:34 +0100
parents 1bb99290e03a
children
line wrap: on
line source

module assign;

// this is taken from std.intrinsic from gdc

int mybtc(uint *p, uint bitnum)
{
    uint * q = p + (bitnum / (uint.sizeof*8));
    uint mask = 1 << (bitnum & ((uint.sizeof*8) - 1));
    int result = *q & mask;
    *q ^= mask;
    return result ? -1 : 0;
}

void main()
{
    uint i = 0xFFFF_FFFF;
    int r = mybtc(&i, 31);
    assert(r);
    assert(i == 0x7FFF_FFFF);
    r = mybtc(&i, 31);
    assert(!r);
    assert(i == 0xFFFF_FFFF);
}