885
|
1 // $HeadURL$
|
|
2 // $Date$
|
|
3 // $Author$
|
|
4
|
|
5 // @author@ Don Clugston <dac@nospam.com.au>
|
|
6 // @date@ 2006-03-02
|
1489
|
7 // @uri@ http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=6425
|
885
|
8 // @WARNING@ direct use of phobos
|
|
9
|
|
10 module dstress.run.c.creal_34_D;
|
|
11
|
|
12 import std.math;
|
|
13
|
|
14 int main(){
|
920
|
15 real re = -0.0L;
|
|
16 ireal im = -0.0Li;
|
885
|
17 creal a = re + im;
|
|
18
|
|
19 if(!signbit(a.re)){
|
|
20 assert(0);
|
|
21 }
|
|
22
|
|
23 if(!signbit(a.im)){
|
|
24 assert(0);
|
|
25 }
|
|
26
|
|
27 return 0;
|
|
28 }
|