Mercurial > projects > dstress
view run/i/ieee_754_flt2int_A.d @ 1609:3c803614a8fb
Add a few missing abstracts.
author | Christian Kamm <kamm incasoftware de> |
---|---|
date | Sun, 26 Apr 2009 13:38:23 +0200 |
parents | 9dcac8d4e97f |
children |
line wrap: on
line source
// $HeadURL$ // $Date$ // $Author$ module dstress.run.i.ieee_754_flt2int_A; int main(){ size_t border; if((long.sizeof * 8) - 1 < real.dig * 3){ border = (long.sizeof * 8) - 1; }else{ border = real.dig * 3; } for(size_t i = 0; i < border; i++){ real a = 1.0; for(size_t j = i; j > 0; j--){ a *= 2.0; } long b = cast(long) a; real c = a; if(c != a){ assert(0); } } for(size_t i = 0; i < border; i++){ real a = -1.0; for(size_t j = i; j > 0; j--){ a *= 2.0; } long b = cast(long) a; real c = a; if(c != a){ assert(0); } } return 0; }