Mercurial > projects > dstress
annotate run/ieee_754_zerocomp_09.d @ 1597:8b9d4d2f925a
Fix typos in complex tests. See D bug 614.
| author | Christian Kamm <kamm incasoftware de> |
|---|---|
| date | Tue, 09 Sep 2008 16:53:58 +0200 |
| parents | 80e1b85295b3 |
| children |
| rev | line source |
|---|---|
| 496 | 1 // $HeadURL$ |
| 2 // $Date$ | |
| 3 // $Author$ | |
| 4 | |
| 5 module dstress.run.ieee_754_zerocomp_09; | |
| 6 | |
| 7 int main(){ | |
| 8 creal f1, f2; | |
| 9 | |
| 958 | 10 f1=0.0L+0.0Li; |
| 496 | 11 f2=-f1; |
| 958 | 12 if(f1 != f2){ |
| 13 assert(0); | |
| 14 } | |
| 496 | 15 |
| 958 | 16 f1=0.0L-0.0Li; |
| 496 | 17 f2=-f1; |
| 958 | 18 if(f1 != f2){ |
| 19 assert(0); | |
| 20 } | |
| 496 | 21 |
| 958 | 22 f1=-0.0L+0.0Li; |
| 496 | 23 f2=-f1; |
| 958 | 24 if(f1 != f2){ |
| 25 assert(0); | |
| 26 } | |
| 496 | 27 |
| 958 | 28 f1=-0.0L-0.0Li; |
| 496 | 29 f2=-f1; |
| 958 | 30 if(f1 != f2){ |
| 31 assert(0); | |
| 32 } | |
| 496 | 33 |
| 34 return 0; | |
| 35 } |