Mercurial > projects > dstress
annotate run/c/cfloat_07_B.d @ 1322:a8cf8aa0da50
fixed malformed @uri@ entries
| author | thomask |
|---|---|
| date | Sun, 31 Dec 2006 20:00:23 +0000 |
| parents | 5511f9277078 |
| children | b8c0195059d9 |
| rev | line source |
|---|---|
| 885 | 1 // $HeadURL$ |
| 2 // $Date$ | |
| 3 // $Author$ | |
| 4 | |
| 5 // @author@ Don Clugston <dac@nospam.com.au> | |
| 6 // @date@ 2006-03-02 | |
| 1322 | 7 // @uri@ news:du6chp$hub$1@digitaldaemon.com |
| 885 | 8 |
| 9 module dstress.run.c.cfloat_07_B; | |
| 10 | |
| 11 union S{ | |
| 12 float f; | |
| 13 uint i; | |
| 14 } | |
| 15 | |
| 16 int main(){ | |
| 920 | 17 cfloat a = 0.0f + 0.0fi; |
| 885 | 18 |
| 19 S s; | |
| 20 | |
| 21 s.f = a.re; | |
| 22 if(s.i != 0x00000000){ | |
| 23 assert(0); | |
| 24 } | |
| 25 | |
| 26 s.f = a.im; | |
| 27 if(s.i != 0x00000000){ | |
| 28 assert(0); | |
| 29 } | |
| 30 | |
| 31 return 0; | |
| 32 } |