tests/basic/bitops.sp
author David Anderson <dvander@alliedmods.net>
Tue Jan 01 15:34:07 2013 -0800 (2013-01-01)
changeset 251 ca99a81745fe
parent 215 b8f650a441a5
child 263 ba85a47ee414
permissions -rw-r--r--
Refactor compilation process around the new concept of packages.
dvander@207
     1
native PrintNum(num);
dvander@207
     2
dvander@215
     3
public main()
dvander@8
     4
{
dvander@8
     5
    new result = 5192342;
dvander@207
     6
    for (new i = 0; i < 1000; i = i + 1) {
dvander@8
     7
        result = result | i;
dvander@8
     8
        result = result & 9129345;
dvander@8
     9
        result = result ^ (i * 73);
dvander@8
    10
dvander@8
    11
        new bit = result & 1;
dvander@8
    12
        result = (result >>> 1) | (bit << 31);
dvander@8
    13
        result = result | (i >> 6);
dvander@8
    14
    }
dvander@207
    15
    PrintNum(result);
dvander@8
    16
}