Mercurial > projects > ldc
annotate tests/mini/assign.d @ 1608:679d101395e8
Merge DMD r262: bugzilla 3381 ([tdpl] Incorrect assessment of ...)
The full bug title is: [tdpl] Incorrect assessment of overriding in
triangular-shaped hierarchy.
---
dmd/class.c | 2 +-
dmd/func.c | 2 ++
2 files changed, 3 insertions(+), 1 deletions(-)
author | Leandro Lucarella <llucax@gmail.com> |
---|---|
date | Wed, 06 Jan 2010 15:18:20 -0300 |
parents | 1bb99290e03a |
children |
rev | line source |
---|---|
1 | 1 module assign; |
2 | |
3 // this is taken from std.intrinsic from gdc | |
4 | |
5 int mybtc(uint *p, uint bitnum) | |
6 { | |
7 uint * q = p + (bitnum / (uint.sizeof*8)); | |
8 uint mask = 1 << (bitnum & ((uint.sizeof*8) - 1)); | |
9 int result = *q & mask; | |
10 *q ^= mask; | |
11 return result ? -1 : 0; | |
12 } | |
13 | |
14 void main() | |
15 { | |
16 uint i = 0xFFFF_FFFF; | |
17 int r = mybtc(&i, 31); | |
18 assert(r); | |
19 assert(i == 0x7FFF_FFFF); | |
20 r = mybtc(&i, 31); | |
21 assert(!r); | |
22 assert(i == 0xFFFF_FFFF); | |
23 } |