744
|
1 // $HeadURL$
|
|
2 // $Date$
|
|
3 // $Author$
|
|
4
|
|
5 // @author@ Tiago Gasiba <tiago.gasiba@gmail.com>
|
|
6 // @date@ 2005-11-07
|
1489
|
7 // @uri@ http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=5344
|
744
|
8
|
|
9 module dstress.run.c.creal_29_C;
|
|
10
|
|
11 void foo(creal[] data){
|
|
12 data[0] /= data.length;
|
|
13 }
|
|
14
|
|
15 int main(){
|
|
16 creal[] data;
|
|
17 data.length = 2;
|
920
|
18 data[0] = 4.0L + 2.0Li;
|
|
19 data[1] = 2.0L + 4.0Li;
|
744
|
20
|
|
21 foo(data);
|
|
22
|
1090
|
23 if(data.length != 2){
|
|
24 assert(0);
|
|
25 }
|
|
26 if(data[0].im != 1.0L){
|
|
27 assert(0);
|
|
28 }
|
|
29 if(data[0].re != 2.0L){
|
|
30 assert(0);
|
|
31 }
|
|
32 if(data[1].im != 4.0L){
|
|
33 assert(0);
|
|
34 }
|
|
35 if(data[1].re != 2.0L){
|
|
36 assert(0);
|
|
37 }
|
|
38
|
744
|
39 return 0;
|
|
40 }
|