492
|
1 // $HeadURL$
|
|
2 // $Date$
|
|
3 // $Author$
|
|
4
|
|
5 // @author@ MicroWizard <MicroWizard_member@pathlink.com>
|
|
6 // @date@ 2005-04-27
|
|
7 // @uri@ news:d4or18$1th1$1@digitaldaemon.com
|
|
8
|
|
9
|
|
10 module dstress.run.bug_cgcs_353_Q;
|
|
11
|
|
12 creal[1] a;
|
|
13 creal[1] b;
|
|
14
|
|
15 creal[] concat() {
|
|
16 return a~b;
|
|
17 }
|
|
18
|
|
19 int main(){
|
958
|
20 a[] = 0.5L + 1.0Li;
|
|
21 b[] = 0.5L + 3.0Li;
|
492
|
22
|
|
23 creal[] arr=concat();
|
|
24
|
958
|
25 if(arr.length != 2){
|
|
26 assert(0);
|
|
27 }
|
|
28
|
|
29 if(arr[0] != 0.5L + 1.0Li){
|
|
30 assert(0);
|
|
31 }
|
|
32
|
|
33 if(arr[1] != 0.5L + 3.0Li){
|
|
34 assert(0);
|
|
35 }
|
492
|
36
|
|
37 return 0;
|
|
38 }
|
|
39
|