annotate test/code-gen.c @ 356:6818bd03767d

*** empty log message ***
author kono
date Sun, 04 Jul 2004 21:08:32 +0900
parents 46ac55e8b14c
children 81345636387d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1 /* Micro-C Code Generator Checker */
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2 /* $Id$ */
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
3
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
4 #define FLOAT_CODE 1
237
1933266f1efa long long ia32 (imcomplete)
kono
parents: 235
diff changeset
5 #define LONGLONG_CODE 1
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
6
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
7 // code_lvar(int e2,int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
8
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
9 extern int printf(const char *fmt,...);
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
10
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
11 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
12 code_lvar()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
13 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
14 char c1,c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
15 unsigned char uc1,uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
16 int i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
17 short s1,s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
18 unsigned short us1,us2;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
19
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
20 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
21 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
22 printf("code_lvar %d %d %d %d %u %u\n",i1,i2,s1,s2,us1,us2);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
23 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
24 printf("code_lvar %d %d %u %u\n",c1,c2,uc1,uc2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
25 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
26
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
27 // code_label(int labelno)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
28 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
29 code_label()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
30 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
31 goto hoge;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
32 hage:
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
33 goto hage;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
34 hoge:
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
35 printf("code_label done\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
36 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
37
322
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
38 // code_label(int labelno)
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
39 void
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
40 code_label1()
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
41 {
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
42 goto hoge;
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
43 hage:
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
44 goto hage;
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
45 hoge:
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
46 printf("code_label1 done\n");
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
47 }
46ac55e8b14c struct init by cast
kono
parents: 293
diff changeset
48
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
49 // code_gvar(int e1,int creg)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
50 // code_rgvar(int e1,int creg)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
51 // code_crgvar(int e1,int creg,int sign,int sz)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
52
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
53 char c1,c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
54 unsigned char uc1,uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
55 static char s_c1,s_c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
56 static unsigned char s_uc1,s_uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
57 int i1,i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
58 unsigned int ui1,ui2;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
59 short s1,s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
60 unsigned short us1,us2;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
61 static int s_i1,s_i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
62 static short s_s1,s_s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
63 static unsigned short s_us1,s_us2;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
64 #if FLOAT_CODE
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
65 float f0,f1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
66 double d0,d1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
67 static float s_f0,s_f1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
68 static double s_d0,s_d1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
69 #endif
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
70 #if LONGLONG_CODE
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
71 long long l0,l1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
72 unsigned long long ul0,ul1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
73 static long long s_l0,s_l1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
74 static unsigned long long s_ul0,s_ul1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
75 #endif
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
76
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
77 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
78 code_gvar()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
79 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
80 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
81 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
82 printf("code_gvar a %d %d %u %u %u %u\n",i1,i2,s1,s2,us1,us2);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
83 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
84 printf("code_gvar b %d %d %u %u\n",c1,c2,uc1,uc2);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
85
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
86 s_i1 = 1; s_i2 = 2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
87 s_s1 = -1; s_s2 = -3; s_us1 = 65535; s_us2 = 65535;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
88 printf("code_gvar c %d %d %u %u %u %u\n",s_i1,s_i2,s1,s_s2,s_us1,s_us2);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
89 s_c1 = -1; s_c2 = -3; s_uc1 = 200; s_uc2 = 202;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
90 printf("code_gvar d %d %d %u %u\n",s_c1,s_c2,s_uc1,s_uc2);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
91 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
92
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
93 // code_register(int e2,int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
94
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
95 void
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
96 code_register()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
97 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
98 register char c1,c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
99 register unsigned char uc1,uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
100 register int i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
101 register short s1,s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
102 register unsigned short us1,us2;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
103
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
104 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
105 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
106 printf("code_lvar r %d %d %u %u %u %u\n",i1,i2,s1,s2,us1,us2);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
107 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
235
c575422d8b6e *** empty log message ***
kono
parents: 231
diff changeset
108 printf("code_gvar r %d %d %u %u\n",c1,c2,uc1,uc2);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
109 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
110
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
111 // code_fname(NMTBL *n,int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
112
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
113 void
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
114 code_fname()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
115 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
116 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
117 i = (int)code_fname;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
118 j = (int)code_register;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
119 printf("code_fname %d\n",i==j);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
120 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
121
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
122
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
123 // code_neg(int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
124 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
125 code_neg()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
126 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
127 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
128 i = 123123123;j = -32423;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
129 printf("code_neg %d %d\n",-i,-j);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
130 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
131
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
132 // code_not(int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
133 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
134 code_not()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
135 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
136 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
137 i = 123123123;j = 0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
138 printf("code_neg %d %d\n",~i,~j);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
139 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
140
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
141 // code_lnot(int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
142 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
143 code_lnot()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
144 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
145 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
146 i = 123123123;j = 0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
147 printf("code_neg %d %d\n",!i,!j);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
148 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
149
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
150 // code_preinc(int e1,int e2,int dir,int sign,int sz,int reg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
151 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
152 code_preinc()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
153 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
154 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
155 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
156 printf("code_preinc i %d %d",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
157 printf(" %d %d\n",i,j);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
158 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
159
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
160 // code_postinc(int e1,int e2,int dir,int sign,int sz,int reg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
161 void
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
162 code_upostinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
163 {
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
164 unsigned int i,j;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
165 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
166 printf("code_upreinc u %d %d",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
167 printf(" %d %d\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
168 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
169
d83291712bf7 test routine
kono
parents: 199
diff changeset
170 // code_postinc(int e1,int e2,int dir,int sign,int sz,int reg)
d83291712bf7 test routine
kono
parents: 199
diff changeset
171 void
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
172 code_postinc()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
173 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
174 int i,j;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
175 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
176 printf("code_postinc i %d %d",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
177 printf(" %d %d\n",i,j);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
178 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
179
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
180 // code_preinc(int e1,int e2,int dir,int sign,int sz,int reg)
d83291712bf7 test routine
kono
parents: 199
diff changeset
181 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
182 code_upreinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
183 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
184 unsigned int i,j;
d83291712bf7 test routine
kono
parents: 199
diff changeset
185 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
186 printf("code_upreinc u %d %d",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
187 printf(" %d %d\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
188 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
189
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
190 // code_preinc(int e1,int e2,int dir,int sign,int sz,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
191 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
192 code_register_preinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
193 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
194 register int i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
195 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
196 printf("code_preinc i r %d %d",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
197 printf(" %d %d\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
198 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
199
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
200 // code_postinc(int e1,int e2,int dir,int sign,int sz,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
201 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
202 code_register_upostinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
203 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
204 register unsigned int i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
205 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
206 printf("code_upreinc u r %d %d",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
207 printf(" %d %d\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
208 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
209
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
210 // code_postinc(int e1,int e2,int dir,int sign,int sz,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
211 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
212 code_register_postinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
213 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
214 register int i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
215 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
216 printf("code_postinc i r %d %d",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
217 printf(" %d %d\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
218 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
219
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
220 // code_register_preinc(int e1,int e2,int dir,int sign,int sz,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
221 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
222 code_register_upreinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
223 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
224 register unsigned int i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
225 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
226 printf("code_upreinc u r %d %d",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
227 printf(" %d %d\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
228 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
229
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
230 // code_return(int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
231
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
232
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
233 int
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
234 code_return_int0()
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
235 {
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
236 return 1;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
237 }
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
238 void
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
239 code_return_int()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
240 {
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
241 printf("code_return_int %d\n",code_return_int0());
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
242 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
243
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
244 #if FLOAT_CODE
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
245 float
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
246 code_return_float0()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
247 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
248 return 1.0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
249 }
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
250 void
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
251 code_return_float()
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
252 {
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
253 printf("code_return_float %g\n",code_return_float0());
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
254 }
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
255
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
256 double
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
257 code_return_double0()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
258 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
259 return 1.0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
260 }
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
261 void
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
262 code_return_double()
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
263 {
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
264 printf("code_return_double %g\n",code_return_double0());
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
265 }
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
266
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
267 #endif
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
268
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
269 #if LONGLONG_CODE
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
270 long long
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
271 code_return_longlong0()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
272 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
273 return 10LL;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
274 }
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
275 void
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
276 code_return_longlong()
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
277 {
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
278 printf("code_return_longlong %lld\n",code_return_longlong0());
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
279 }
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
280
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
281 #endif
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
282
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
283 struct aa { char a[100]; } a0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
284 struct aa
223
1ac647873577 *** empty log message ***
kono
parents: 214
diff changeset
285 code_return_struct0(/*int j*/)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
286 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
287 a0.a[55]=3;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
288 return a0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
289 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
290
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
291 void
203
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
292 code_return_struct1()
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
293 {
223
1ac647873577 *** empty log message ***
kono
parents: 214
diff changeset
294 int i = code_return_struct0(/*1*/).a[55];
1ac647873577 *** empty log message ***
kono
parents: 214
diff changeset
295 // int i;
1ac647873577 *** empty log message ***
kono
parents: 214
diff changeset
296 // i = code_return_struct0(i).a[55];
203
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
297 printf("code_return_struct %d\n", i);
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
298 }
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
299
28baf6cd9ad1 *** empty log message ***
kono
parents: 201
diff changeset
300 void
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
301 code_return_struct()
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
302 {
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
303 printf("code_return_struct %d\n", code_return_struct0().a[55]);
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
304 }
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
305
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
306 // code_gt(int cond)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
307
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
308 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
309 code_gt()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
310 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
311 int reg;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
312 if (i1>i2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
313 printf("code_gt 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
314 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
315 printf("code_gt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
316 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
317 if (0<reg && reg<3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
318 printf("reg=%d code_gt 0<reg && reg <3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
319 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
320 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
321 if (-2<reg && reg<0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
322 printf("reg=%d code_gt -2<reg && reg <0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
323 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
324
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
325 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
326
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
327 // code_ugt(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
328 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
329 code_ugt()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
330 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
331 int reg;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
332 if (ui1>ui2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
333 printf("code_ugt 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
334 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
335 printf("code_ugt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
336 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
337 if (0<reg && reg<3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
338 printf("reg=%d code_ugt 0<reg && reg <3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
339 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
340 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
341 if (1<reg && reg<5)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
342 printf("reg=%d code_ugt 1<reg && reg <5\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
343 }
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
344 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
345
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
346 // code_ge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
347 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
348 code_ge()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
349 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
350 int reg;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
351 if (i1>=i2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
352 printf("code_ge 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
353 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
354 printf("code_ge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
355 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
356 if (0<=reg && reg<=3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
357 printf("reg=%d code_ge 0<=reg && reg <=3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
358 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
359 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
360 if (-2<=reg && reg<=0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
361 printf("reg=%d code_ge -2<=reg && reg <=0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
362 }
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
363 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
364
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
365 // code_uge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
366 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
367 code_uge()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
368 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
369 unsigned reg;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
370 if (ui1>=ui2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
371 printf("code_uge 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
372 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
373 printf("code_uge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
374 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
375 if (0<=reg && reg<=3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
376 printf("reg=%d code_uge 0<=reg && reg <=3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
377 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
378 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
379 if (1<=reg && reg<=5)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
380 printf("reg=%d code_uge 1<=reg && reg <=5\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
381 }
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
382 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
383
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
384 // code_eq(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
385 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
386 code_eq()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
387 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
388 if (ui1==ui2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
389 printf("code_eq 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
390 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
391 printf("code_eq 0\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
392 if (i1!=i2)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
393 printf("code_neq 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
394 else
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
395 printf("code_neq 0\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
396 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
397
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
398 // code_bool(int e1)
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
399
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
400 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
401 code_bool()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
402 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
403 int i1l,i2l;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
404 unsigned int ui1l,ui2l;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
405
288
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
406 ui2 = ui1-3;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
407 for(i2=i1-3;i2<i1+3;i2++) {
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
408 printf("code_bool %d>%d gvar %d\n",i1,i2,i1>i2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
409 printf("code_bool %u>%u gvar %d u\n",ui1,ui2,ui1>ui2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
410 printf("code_bool %d>=%d gvar %d\n",i1,i2,i1>=i2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
411 printf("code_bool %u>=%u gvar %d u\n",ui1,ui2,ui1>=ui2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
412 printf("code_bool %d<%d gvar %d\n",i1,i2,i1<i2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
413 printf("code_bool %u<%u gvar %d u\n",ui1,ui2,ui1<ui2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
414 printf("code_bool %d<=%d gvar %d\n",i1,i2,i1<=i2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
415 printf("code_bool %u<=%u gvar %d u\n",ui1,ui2,ui1<=ui2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
416 printf("code_bool %u==%u gvar %d u\n",ui1,ui2,ui1==ui2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
417 printf("code_bool %u!=%u gvar %d\n",i1,i2,i1!=i2);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
418 ui2++;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
419 }
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
420 ui1l = ui1;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
421 i1l = i1;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
422 ui2l = ui1-3;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
423 for(i2l=i1-3;i2l<i1l+3;i2l++) {
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
424 printf("code_bool %d>%d lvar %d\n",i1l,i2l,i1l>i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
425 printf("code_bool %u>%u lvar %d u\n",ui1l,ui2l,ui1l>ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
426 printf("code_bool %d>=%d lvar %d\n",i1l,i2l,i1l>=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
427 printf("code_bool %u>=%u lvar %d u\n",ui1l,ui2l,ui1l>=ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
428 printf("code_bool %d<%d lvar %d\n",i1l,i2l,i1l<i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
429 printf("code_bool %u<%u lvar %d u\n",ui1l,ui2l,ui1l<ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
430 printf("code_bool %d<=%d lvar %d\n",i1l,i2l,i1l<=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
431 printf("code_bool %u<=%u lvar %d u\n",ui1l,ui2l,ui1l<=ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
432 printf("code_bool %u==%u lvar %d u\n",ui1l,ui2l,ui1l==ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
433 printf("code_bool %u!=%u lvar %d\n",i1l,i2l,i1l!=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
434 ui2l++;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
435 }
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
436 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
437
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
438 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
439 code_cmp()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
440 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
441 char c1,c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
442 unsigned char uc1,uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
443 int i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
444 short s1,s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
445 unsigned short us1,us2;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
446
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
447 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
448 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
449 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
450 i1 && printf("code_bool local 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
451 s1 && printf("code_bool local 2\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
452 us1 && printf("code_bool local 3\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
453 c1 && printf("code_bool local 4\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
454 uc1 && printf("code_bool local 5\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
455
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
456 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
457 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
458 code_cmp_global()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
459 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
460 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
461 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
462 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
463 i1 && printf("code_bool global 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
464 s1 && printf("code_bool global 2\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
465 us1 && printf("code_bool global 3\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
466 c1 && printf("code_bool global 4\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
467 uc1 && printf("code_bool global 5\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
468 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
469
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
470 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
471 code_cmp_register()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
472 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
473 register char c1,c2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
474 register unsigned char uc1,uc2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
475 register int i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
476 register short s1,s2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
477 register unsigned short us1,us2;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
478
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
479 i1 = 1; i2 = -2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
480 s1 = -1; s2 = -3; us1 = 65535; us2 = 65535;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
481 c1 = -1; c2 = -3; uc1 = 200; uc2 = 202;
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
482 i1 && printf("code_bool register 1\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
483 s1 && printf("code_bool register 2\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
484 us1 && printf("code_bool register 3\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
485 c1 && printf("code_bool register 4\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
486 uc1 && printf("code_bool register 5\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
487
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
488 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
489
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
490
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
491 // code_string(int e1,int creg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
492
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
493 void
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
494 code_string()
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
495 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
496 printf("code_string test\n");
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
497 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
498
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
499 // struct_push(int e4,int t,int arg)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
500
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
501 struct aa
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
502 struct_push0(int i,struct aa a)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
503 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
504 a.a[55]++;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
505 if (i==0) {
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
506 return struct_push0(1,a0);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
507 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
508 return a0;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
509 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
510
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
511 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
512 struct_push()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
513 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
514 a0.a[55]=3;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
515 a0 = struct_push0(0,a0);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
516 printf("struct_push %d\n",a0.a[55]);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
517 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
518
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
519 // code_jmp(char *s)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
520 // code_indirect_jmp(int e2)
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
521
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
522 // code_rindirect(int e1, int offset, int us);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
523 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
524 code_rindirect()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
525 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
526 int i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
527 unsigned int ui1,ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
528 int *pi1,*pi2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
529 unsigned int *pui1,*pui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
530
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
531 i1 = -555; i2= 555;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
532 ui1 = 632423423; ui2= 32394234;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
533 pi1 = &i1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
534 pi2 = &i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
535 pui1 = &ui1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
536 pui2 = &ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
537 printf("code_rindirect %d %d %u %u\n",*pi1,*pi2,*pui1,*pui2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
538 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
539
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
540 // code_crindirect(int e1, int offset, int us);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
541 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
542 code_crindirect()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
543 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
544 char i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
545 unsigned char ui1,ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
546 char *pi1,*pi2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
547 unsigned char *pui1,*pui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
548
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
549 i1 = -55; i2= 55;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
550 ui1 = 200; ui2= 128;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
551 pi1 = &i1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
552 pi2 = &i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
553 pui1 = &ui1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
554 pui2 = &ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
555 printf("code_cindirect %d %d %u %u\n",*pi1,*pi2,*pui1,*pui2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
556 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
557
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
558 // code_srindirect(int e1, int offset, int us);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
559 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
560 code_srindirect()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
561 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
562 short i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
563 unsigned short ui1,ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
564 short *pi1,*pi2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
565 unsigned short *pui1,*pui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
566
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
567 i1 = -55; i2= 55;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
568 ui1 = 200; ui2= 128;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
569 pi1 = &i1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
570 pi2 = &i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
571 pui1 = &ui1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
572 pui2 = &ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
573 printf("code_sindirect %d %d %u %u\n",*pi1,*pi2,*pui1,*pui2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
574 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
575
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
576 #if FLOAT_CODE
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
577 // code_drindirect(int e1, int offset, int d);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
578 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
579 code_drindirect()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
580 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
581 float i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
582 double ui1,ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
583 float *pi1,*pi2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
584 double *pui1,*pui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
585
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
586 i1 = -55; i2= 55;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
587 ui1 = 200; ui2= 128;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
588 pi1 = &i1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
589 pi2 = &i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
590 pui1 = &ui1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
591 pui2 = &ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
592 printf("code_dindirect %g %g %g %g\n",*pi1,*pi2,*pui1,*pui2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
593 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
594
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
595 #endif
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
596
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
597 #if LONGLONG_CODE
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
598 // code_lrindirect(int e1, int offset, int us);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
599 void
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
600 code_lrindirect()
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
601 {
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
602 long long i1,i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
603 unsigned long long ui1,ui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
604 long long *pi1,*pi2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
605 unsigned long long *pui1,*pui2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
606
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
607 i1 = -55; i2= 55;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
608 ui1 = 200; ui2= 128;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
609 pi1 = &i1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
610 pi2 = &i2;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
611 pui1 = &ui1;
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
612 pui2 = &ui2;
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
613 printf("code_lrindirect %llx %llx %llx %llx\n",*pi1,*pi2,*pui1,*pui2);
197
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
614 printf("code_lrindirect %lld %lld %llu %llu\n",*pi1,*pi2,*pui1,*pui2);
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
615 }
b5f49f32c2ee *** empty log message ***
kono
parents: 196
diff changeset
616
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
617 #endif
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
618
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
619 // code_assign_gvar(int e2,int creg,int byte)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
620 // code_assign_lvar(int e2,int creg,int byte)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
621 // code_assign_register(int e2,int byte,int creg)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
622 // code_assign(int e2,int byte,int creg)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
623
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
624 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
625 code_assign()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
626 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
627 int i1,i2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
628 unsigned int ui1,ui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
629 int *pi1,*pi2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
630 unsigned int *pui1,*pui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
631
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
632 i1 = -555; i2= 555;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
633 ui1 = 632423423; ui2= 32394234;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
634 pi1 = &i1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
635 pi2 = &i2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
636 pui1 = &ui1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
637 pui2 = &ui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
638
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
639 *(pi2+i1+i2) = 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
640 *(pui2+i1+i2) = 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
641 printf("code_rindirect %d %d %u %u\n",*pi1,*pi2,*pui1,*pui2);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
642 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
643
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
644 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
645 code_assign_register()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
646 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
647 int i1,i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
648 unsigned int ui1,ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
649 register int *pi1,*pi2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
650 register unsigned int *pui1,*pui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
651
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
652 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
653 ui1 = 632423423; ui2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
654 pi1 = &i1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
655 pi2 = &i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
656 pui1 = &ui1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
657 pui2 = &ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
658
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
659 *(pi2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
660 *(pui2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
661 printf("code_rindirect %d %d %u %u\n",*pi1,*pi2,*pui1,*pui2);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
662 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
663
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
664 // code_register_assop(int e2,int op,int byte)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
665 void
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
666 code_register_assop()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
667 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
668 register int i1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
669 register unsigned int ui1;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
670 int a = 3;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
671 i1 = -555;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
672 ui1 = 632423423;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
673
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
674 i1 += a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
675 printf("code_assop 1 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
676 i1 -= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
677 printf("code_assop 2 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
678 i1 /= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
679 printf("code_assop 3 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
680 i1 *= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
681 printf("code_assop 4 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
682 i1 |= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
683 printf("code_assop 5 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
684 i1 &= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
685 printf("code_assop 6 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
686 i1 ^= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
687 printf("code_assop 7 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
688 i1 <<= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
689 printf("code_assop 8 %d\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
690 i1 >>= a;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
691 printf("code_assop 9 %d\n",i1);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
692
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
693 ui1 += a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
694 printf("code_assop 1 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
695 ui1 -= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
696 printf("code_assop 2 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
697 ui1 /= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
698 printf("code_assop 3 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
699 ui1 *= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
700 printf("code_assop 4 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
701 ui1 |= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
702 printf("code_assop 5 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
703 ui1 &= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
704 printf("code_assop 6 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
705 ui1 ^= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
706 printf("code_assop 7 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
707 ui1 <<= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
708 printf("code_assop 8 %u\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
709 ui1 >>= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
710 printf("code_assop 9 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
711 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
712
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
713 // code_assop(int op,int byte,int sign)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
714 void
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
715 code_assop()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
716 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
717 int i1,i2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
718 unsigned int ui1,ui2;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
719 int a = 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
720 i1 = -555; i2= 555;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
721 ui1 = 632423423; ui2= 32394234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
722
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
723 i1 += a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
724 printf("code_assop 1 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
725 i1 -= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
726 printf("code_assop 2 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
727 i1 /= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
728 printf("code_assop 3 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
729 i1 *= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
730 printf("code_assop 4 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
731 i1 |= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
732 printf("code_assop 5 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
733 i1 &= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
734 printf("code_assop 6 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
735 i1 ^= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
736 printf("code_assop 7 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
737 i1 <<= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
738 printf("code_assop 8 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
739 i1 >>= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
740 printf("code_assop 9 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
741
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
742 ui1 += a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
743 printf("code_assop 1 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
744 ui1 -= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
745 printf("code_assop 2 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
746 ui1 /= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
747 printf("code_assop 3 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
748 ui1 *= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
749 printf("code_assop 4 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
750 ui1 |= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
751 printf("code_assop 5 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
752 ui1 &= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
753 printf("code_assop 6 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
754 ui1 ^= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
755 printf("code_assop 7 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
756 ui1 <<= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
757 printf("code_assop 8 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
758 ui1 >>= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
759 printf("code_assop 9 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
760 }
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
761
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
762
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
763 // code_register_assop(int e2,int op,int byte)
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
764 void
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
765 code_register_assop_const()
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
766 {
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
767 register int i1;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
768 register unsigned int ui1;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
769 i1 = -555;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
770 ui1 = 632423423;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
771
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
772 i1 += 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
773 printf("code_assop c 1 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
774 i1 -= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
775 printf("code_assop c 2 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
776 i1 /= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
777 printf("code_assop c 3 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
778 i1 *= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
779 printf("code_assop c 4 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
780 i1 |= 234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
781 printf("code_assop c 5 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
782 i1 &= 23244234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
783 printf("code_assop c 6 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
784 i1 ^= 55244234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
785 printf("code_assop c 7 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
786 i1 <<= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
787 printf("code_assop c 8 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
788 i1 >>= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
789 printf("code_assop c 9 %d\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
790
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
791 ui1 += 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
792 printf("code_assop c 1 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
793 ui1 -= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
794 printf("code_assop c 2 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
795 ui1 /= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
796 printf("code_assop c 3 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
797 ui1 *= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
798 printf("code_assop c 4 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
799 ui1 |= 234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
800 printf("code_assop c 5 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
801 ui1 &= 23234234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
802 printf("code_assop c 6 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
803 ui1 ^= 55234234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
804 printf("code_assop c 7 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
805 ui1 <<= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
806 printf("code_assop c 8 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
807 ui1 >>= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
808 printf("code_assop c 9 %u\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
809 }
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
810
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
811 // code_assop(int op,int byte,int sign)
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
812 void
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
813 code_assop_const()
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
814 {
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
815 int i1,i2;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
816 unsigned int ui1,ui2;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
817 i1 = -555; i2= 555;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
818 ui1 = 632423423; ui2= 32394234;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
819
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
820 i1 += 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
821 printf("code_assop c 1 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
822 i1 -= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
823 printf("code_assop c 2 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
824 i1 /= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
825 printf("code_assop c 3 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
826 i1 *= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
827 printf("code_assop c 4 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
828 i1 |= 234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
829 printf("code_assop c 5 %d\n",i1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
830 i1 &= 23234234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
831 printf("code_assop c 6 %d\n",i1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
832 i1 ^= 55444234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
833 printf("code_assop c 7 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
834 i1 <<= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
835 printf("code_assop c 8 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
836 i1 >>= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
837 printf("code_assop c 9 %d\n",i1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
838
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
839 ui1 += 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
840 printf("code_assop c 1 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
841 ui1 -= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
842 printf("code_assop c 2 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
843 ui1 /= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
844 printf("code_assop c 3 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
845 ui1 *= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
846 printf("code_assop c 4 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
847 ui1 |= 234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
848 printf("code_assop c 5 %u\n",ui1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
849 ui1 &= 23234234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
850 printf("code_assop c 6 %u\n",ui1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
851 ui1 ^= 54234234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
852 printf("code_assop c 7 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
853 ui1 <<= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
854 printf("code_assop c 8 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
855 ui1 >>= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
856 printf("code_assop c 9 %u\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
857 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
858
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
859
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
860 // tosop(int op,int oreg)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
861 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
862 tosop()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
863 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
864 int i1,i2,i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
865 unsigned int u1,u2,u;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
866 i1 = -555; i2= 555;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
867 u1 = 632423423; u2= 32394234;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
868
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
869 i = i1 + i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
870 printf("tosop 1 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
871 i = i1 - i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
872 printf("tosop 2 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
873 i = i1 / i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
874 printf("tosop 3 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
875 i = i1 * i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
876 printf("tosop 4 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
877 i = i1 | i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
878 printf("tosop 5 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
879 i = i1 & i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
880 printf("tosop 6 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
881 i = i1 ^ i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
882 printf("tosop 7 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
883 i = i1 << i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
884 printf("tosop 8 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
885 i = i1 >> i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
886 printf("tosop 9 %d\n",i);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
887 i = i1 % i2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
888 printf("tosop 10 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
889
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
890 u = u1 + u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
891 printf("tosop 1 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
892 u = u1 - u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
893 printf("tosop 2 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
894 u = u1 / u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
895 printf("tosop 3 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
896 u = u1 * u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
897 printf("tosop 4 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
898 u = u1 | u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
899 printf("tosop 5 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
900 u = u1 & u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
901 printf("tosop 6 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
902 u = u1 ^ u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
903 printf("tosop 7 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
904 u = u1 << u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
905 printf("tosop 8 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
906 u = u1 >> u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
907 printf("tosop 9 %u\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
908 u = u1 % u2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
909 printf("tosop 10 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
910 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
911
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
912 // oprtc(int op,int v)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
913 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
914 oprtc()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
915 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
916 int i1,i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
917 unsigned int u1,u;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
918 i1 = -555;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
919 u1 = 632423423;
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
920
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
921 i = i1 + 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
922 printf("oprtc 1 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
923 i = i1 - 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
924 printf("oprtc 2 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
925 i = i1 / 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
926 printf("oprtc 3 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
927 i = i1 * 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
928 printf("oprtc 4 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
929 i = i1 | 234234234;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
930 printf("oprtc 5 %d\n",i);
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
931 i = i1 & 23234234;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
932 printf("oprtc 6 %d\n",i);
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
933 i = i1 ^ 23234234;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
934 printf("oprtc 7 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
935 i = i1 << 5;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
936 printf("oprtc 8 %d\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
937 i = i1 >> 5;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
938 printf("oprtc 9 %d\n",i);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
939 i = i1 % 5;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
940 printf("oprtc 10 %d\n",i);
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
941
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
942 u = u1 + 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
943 printf("oprtc 1 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
944 u = u1 - 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
945 printf("oprtc 2 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
946 u = u1 / 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
947 printf("oprtc 3 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
948 u = u1 * 3;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
949 printf("oprtc 4 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
950 u = u1 | 234234234;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
951 printf("oprtc 5 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
952 u = u1 & 234234234;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
953 printf("oprtc 6 %u\n",u);
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
954 u = u1 ^ 234234234;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
955 printf("oprtc 7 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
956 u = u1 << 5;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
957 printf("oprtc 8 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
958 u = u1 >> 5;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
959 printf("oprtc 9 %u\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
960 u = u1 % 5;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
961 printf("oprtc 10 %u\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
962 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
963
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
964
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
965 // tosop(int op,int oreg)
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
966 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
967 register_tosop()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
968 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
969 register int i1,i2,i;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
970 register unsigned int u1,u2,u;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
971 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
972 u1 = 632423423; u2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
973
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
974 i = i1 + i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
975 printf("tosop r 1 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
976 i = i1 - i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
977 printf("tosop r 2 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
978 i = i1 / i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
979 printf("tosop r 3 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
980 i = i1 * i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
981 printf("tosop r 4 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
982 i = i1 | i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
983 printf("tosop r 5 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
984 i = i1 & i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
985 printf("tosop r 6 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
986 i = i1 ^ i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
987 printf("tosop r 7 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
988 i = i1 << i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
989 printf("tosop r 8 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
990 i = i1 >> i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
991 printf("tosop r 9 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
992 i = i1 % i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
993 printf("tosop r 10 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
994
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
995 u = u1 + u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
996 printf("tosop r 1 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
997 u = u1 - u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
998 printf("tosop r 2 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
999 u = u1 / u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1000 printf("tosop r 3 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1001 u = u1 * u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1002 printf("tosop r 4 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1003 u = u1 | u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1004 printf("tosop r 5 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1005 u = u1 & u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1006 printf("tosop r 6 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1007 u = u1 ^ u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1008 printf("tosop r 7 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1009 u = u1 << u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1010 printf("tosop r 8 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1011 u = u1 >> u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1012 printf("tosop r 9 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1013 u = u1 % u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1014 printf("tosop r 10 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1015 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1016
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1017 // oprtc(int op,int v)
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1018 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1019 register_oprtc()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1020 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1021 register int i1,i;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1022 register unsigned int u1,u;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1023 i1 = -555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1024 u1 = 632423423;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1025
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1026 i = i1 + 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1027 printf("oprtc r 1 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1028 i = i1 - 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1029 printf("oprtc r 2 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1030 i = i1 / 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1031 printf("oprtc r 3 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1032 i = i1 * 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1033 printf("oprtc r 4 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1034 i = i1 | 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1035 printf("oprtc r 5 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1036 i = i1 & 23234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1037 printf("oprtc r 6 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1038 i = i1 ^ 23234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1039 printf("oprtc r 7 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1040 i = i1 << 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1041 printf("oprtc r 8 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1042 i = i1 >> 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1043 printf("oprtc r 9 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1044 i = i1 % 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1045 printf("oprtc r 10 %d\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1046
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1047 u = u1 + 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1048 printf("oprtc r 1 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1049 u = u1 - 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1050 printf("oprtc r 2 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1051 u = u1 / 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1052 printf("oprtc r 3 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1053 u = u1 * 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1054 printf("oprtc r 4 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1055 u = u1 | 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1056 printf("oprtc r 5 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1057 u = u1 & 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1058 printf("oprtc r 6 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1059 u = u1 ^ 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1060 printf("oprtc r 7 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1061 u = u1 << 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1062 printf("oprtc r 8 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1063 u = u1 >> 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1064 printf("oprtc r 9 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1065 u = u1 % 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1066 printf("oprtc r 10 %u\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1067 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1068
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1069
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1070 #if FLOAT_CODE
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1071 // code_cmp_dregister(int e2,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1072 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1073 code_cmp_dregister()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1074 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1075 register float f0,f1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1076 register double d0,d1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1077 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1078 d0 = 10; d1 = 10e10;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1079 f0 && printf("code_bool register 6\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1080 d0 && printf("code_bool register 7\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1081
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1082 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1083
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1084 // code_dregister(int e2,int freg,int d)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1085 void
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1086 code_dregister()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1087 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1088 register float f0,f1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1089 register double d0,d1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1090 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1091 d0 = 10; d1 = 10e10;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1092 printf("code_lvar float r %f %f %g %g\n",f0,f1,d0,d1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1093 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1094
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1095 // code_dassign_gvar(int e2,int freg,int d)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1096 // code_dassign_lvar(int e2,int freg,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1097 // code_dassign_dregister(int e2,int d,int freg)
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1098
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1099 // code_dassign(int e2,int freg,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1100 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1101 code_dassign()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1102 {
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1103 int i1,i2;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1104 float f1,f2;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1105 double ui1,ui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1106 float *pi1,*pi2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1107 double *pui1,*pui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1108
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1109 i1 = -555; i2= 555;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1110 f1 = -555; f2= 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1111 ui1 = 632423423; ui2= 32394234;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1112 pi1 = &f1;
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1113 pi2 = &f2;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1114 pui1 = &ui1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1115 pui2 = &ui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1116
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1117 *(pi2+i1+i2) = 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1118 *(pui2+i1+i2) = 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1119 printf("code_dassign %g %g %g %g\n",*pi1,*pi2,*pui1,*pui2);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1120 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1121
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1122 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1123 code_register_dassign()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1124 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1125 int i1,i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1126 float f1,f2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1127 double ui1,ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1128 register float *pi1,*pi2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1129 register double *pui1,*pui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1130
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1131 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1132 f1 = -555; f2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1133 ui1 = 632423423; ui2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1134 pi1 = &f1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1135 pi2 = &f2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1136 pui1 = &ui1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1137 pui2 = &ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1138
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1139 *(pi2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1140 *(pui2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1141 printf("code_dassign %g %g %g %g\n",*pi1,*pi2,*pui1,*pui2);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1142 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1143
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1144 // code_dconst(int e2,int freg,int d)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1145 // code_dneg(int freg,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1146 // code_dneg(int creg)
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1147 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1148 code_dneg()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1149 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1150 float i,j;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1151 double di,dj;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1152 i = 123123123;j = -32423;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1153 di = 123123123;dj = -32423;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1154 printf("code_dneg %g %g\n",-i,-j);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1155 printf("code_dneg %g %g\n",-di,-dj);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1156 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1157
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1158 // code_d2i(int freg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1159 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1160 code_d2i()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1161 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1162 double d,z;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1163 int i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1164 d = 0.1;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1165 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1166 i = d;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1167 printf("code_d2i %d\n",i);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1168 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1169 // code_i2d(int creg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1170 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1171 code_i2d()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1172 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1173 double d;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1174 int i,z;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1175 i = 242342342;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1176 z = -1;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1177 d = i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1178 printf("code_i2d %g\n",d);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1179 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1180 // code_d2u(int freg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1181 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1182 code_d2u()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1183 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1184 double d,z;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1185 unsigned int i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1186 d = 0.1;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1187 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1188 i = d;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1189 printf("code_d2u %ud\n",i);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1190 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1191 // code_u2d(int creg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1192 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1193 code_u2d()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1194 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1195 double d;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1196 unsigned int i,z;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1197 i = 242342342;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1198 z = 3;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1199 d = i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1200 printf("code_u2d %g\n",d);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1201 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1202 // code_f2i(int freg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1203 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1204 code_f2i()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1205 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1206 float d,z;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1207 int i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1208 d = 0.1;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1209 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1210 i = d;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1211 printf("code_d2i %d\n",i);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1212 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1213 // code_i2f(int creg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1214 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1215 code_i2f()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1216 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1217 float d;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1218 int i,z;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1219 i = 24234342;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1220 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1221 d = i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1222 printf("code_i2f %g\n",d);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1223 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1224 // code_f2u(int freg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1225 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1226 code_f2u()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1227 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1228 float d,z;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1229 unsigned int i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1230 d = 0.1;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1231 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1232 i = d;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1233 printf("code_f2u %ud\n",i);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1234 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1235 // code_u2f(int creg0)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1236 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1237 code_u2f()
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1238 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1239 float d;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1240 unsigned int i,z;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1241 i = 242342342;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1242 z = 555;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1243 d = i;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1244 printf("code_u2f %g\n",d);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1245 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1246
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1247
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1248 // code_drgvar(int e2,int d,int freg)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1249 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1250 code_dgvar()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1251 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1252 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1253 d0 = 10; d1 = 10e10;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1254 printf("code_gvar float 1 %f %f %g %g\n",f0,f1,d0,d1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1255 s_f0 = 0.0; s_f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1256 s_d0 = 10; s_d1 = 10e10;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1257 printf("code_gvar float 2 %f %f %g %g\n",s_f0,s_f1,s_d0,s_d1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1258 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1259
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1260 // code_drlvar(int e2,int d,int freg)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1261 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1262 code_dlvar()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1263 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1264 float f0,f1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1265 double d0,d1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1266 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1267 d0 = 10; d1 = 10e10;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1268 printf("code_lvar float %f %f %g %g\n",f0,f1,d0,d1);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1269 printf("code_bool > lvar float %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1270 f0>f1,f0>=f1,f0==f1,f0!=f1);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1271 printf("code_bool > lvar double %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1272 d0>d1,d0>=d1,d0==d1,d0!=d1);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1273 printf("code_bool < lvar float %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1274 f0<f1,f0<=f1,f0==f1,f0!=f1);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1275 printf("code_bool < lvar double %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1276 d0<d1,d0<=d1,d0==d1,d0!=d1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1277 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1278
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1279
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1280 // code_cmp_drgvar(int e2,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1281 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1282 code_cmp_d_global()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1283 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1284 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1285 d0 = 10; d1 = 10e10;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1286 f0 && printf("code_bool global 6\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1287 d0 && printf("code_bool global 7\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1288 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1289
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1290
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1291 // code_cmp_drlvar(int e2,int d)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1292 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1293 code_cmp_d()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1294 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1295 float f0,f1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1296 double d0,d1;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1297 f0 = 0.0; f1 = 0.2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1298 d0 = 10; d1 = 10e10;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1299 f0 && printf("code_bool local 6\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1300 d0 && printf("code_bool local 7\n");
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1301 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1302
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1303 // dtosop(int op,int e1)
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1304 void
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1305 dtosop()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1306 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1307 double i1,i2,i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1308 float u1,u2,u;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1309 i1 = -555; i2= 555;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1310 u1 = 632423423; u2= 32394234;
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1311
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1312 i = i1 + i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1313 printf("dtosop 1 %g\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1314 i = i1 - i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1315 printf("dtosop 2 %g\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1316 i = i1 / i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1317 printf("dtosop 3 %g\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1318 i = i1 * i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1319 printf("dtosop 4 %g\n",i);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1320 u = u1 + u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1321 printf("dtosop 1 %g\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1322 u = u1 - u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1323 printf("dtosop 2 %g\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1324 u = u1 / u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1325 printf("dtosop 3 %g\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1326 u = u1 * u2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1327 printf("dtosop 4 %g\n",u);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1328 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1329
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1330
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1331 // dtosop(int op,int e1)
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1332 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1333 dtosop_register()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1334 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1335 register double i1,i2,i;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1336 register float u1,u2,u;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1337 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1338 u1 = 632423423; u2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1339
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1340 i = i1 + i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1341 printf("dtosop 1 %g\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1342 i = i1 - i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1343 printf("dtosop 2 %g\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1344 i = i1 / i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1345 printf("dtosop 3 %g\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1346 i = i1 * i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1347 printf("dtosop 4 %g\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1348 u = u1 + u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1349 printf("dtosop 1 %g\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1350 u = u1 - u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1351 printf("dtosop 2 %g\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1352 u = u1 / u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1353 printf("dtosop 3 %g\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1354 u = u1 * u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1355 printf("dtosop 4 %g\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1356 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1357
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1358
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1359 // code_dassop(int op,int d)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1360 void
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1361 code_dassop()
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1362 {
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1363 double i1,i2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1364 float ui1,ui2;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1365 i1 = -555; i2= 555;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1366 ui1 = 632423423; ui2= 32394234;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1367
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1368 i1 += 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1369 printf("code_dassop 1 %g\n",i1);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1370 i1 -= 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1371 printf("code_dassop 2 %g\n",i1);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1372 i1 /= 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1373 printf("code_dassop 3 %g\n",i1);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1374 i1 *= 3;
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1375 printf("code_dassop 4 %g\n",i1);
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1376
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1377 ui1 += 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1378 printf("code_dassop f 1 %g\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1379 ui1 -= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1380 printf("code_dassop f 2 %g\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1381 ui1 /= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1382 printf("code_dassop f 3 %g\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1383 ui1 *= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1384 printf("code_dassop f 4 %g\n",ui1);
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1385 }
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1386
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1387 // code_dassop(int op,int d)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1388 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1389 code_register_dassop()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1390 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1391 register double i1,i2;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1392 register float ui1,ui2;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1393 i1 = -555; i2= 555;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1394 ui1 = 632423423; ui2= 32394234;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1395
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1396 i1 += 3;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1397 printf("code_dassop r 1 %g\n",i1);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1398 i1 -= 3;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1399 printf("code_dassop r 2 %g\n",i1);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1400 i1 /= 3;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1401 printf("code_dassop r 3 %g\n",i1);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1402 i1 *= 3;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1403 printf("code_dassop r 4 %g\n",i1);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1404
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1405 ui1 += 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1406 printf("code_dassop f r 1 %g\n",ui1);
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1407 ui1 -= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1408 printf("code_dassop f r 2 %g\n",ui1);
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1409 ui1 /= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1410 printf("code_dassop f r 3 %g\n",ui1);
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1411 ui1 *= 3;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1412 printf("code_dassop f r 4 %g\n",ui1);
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1413 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1414
198
ef6f0c2d932f *** empty log message ***
kono
parents: 197
diff changeset
1415
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1416 // code_dpreinc(int e1,int e2,int d,int reg)
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1417 void
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1418 code_dpreinc()
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1419 {
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1420 double i,j;
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1421 float ui,uj;
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1422 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1423 printf("code_dpreinc d %g %g",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1424 printf(" %g %g\n",i,j);
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1425 ui = 123123123;uj = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1426 printf("code_dpreinc f %g %g",++ui,--uj);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1427 printf(" %g %g\n",ui,uj);
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1428 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1429
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1430 // code_dpostinc(int e1,int e2,int d,int reg)
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1431 void
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1432 code_dpostinc()
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1433 {
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1434 double i,j;
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1435 float ui,uj;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1436 i = 123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1437 printf("code_dpostinc d %g %g",i--,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1438 printf(" %g %g\n",i,j);
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1439 ui = 123123;uj = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1440 printf("code_dpostinc f %g %g",ui++,uj--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1441 printf(" %g %g\n",ui,uj);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1442 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1443
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1444 // code_dpreinc(int e1,int e2,int d,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1445 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1446 code_register_dpreinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1447 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1448 register double i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1449 register float ui,uj;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1450 i = 123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1451 printf("code_dpreinc r d %g %g",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1452 printf(" %g %g\n",i,j);
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1453 ui = 123123;uj = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1454 printf("code_dpreinc r f %g %g",++ui,--uj);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1455 printf(" %g %g\n",ui,uj);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1456 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1457
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1458 // code_dpostinc(int e1,int e2,int d,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1459 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1460 code_register_dpostinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1461 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1462 register double i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1463 register float ui,uj;
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1464 i = 123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1465 printf("code_dpostinc r d %g %g",i--,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1466 printf(" %g %g\n",i,j);
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1467 ui = 123123;uj = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1468 printf("code_dpostinc r f %g %g",ui++,uj--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
1469 printf(" %g %g\n",ui,uj);
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1470 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1471
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1472 // drexpr(int e1, int e2,int l1, int op)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1473
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1474 // case DOP+GE:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1475 // case FOP+GE:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1476 // case DOP+GT:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1477 // case FOP+GT:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1478 // case DOP+EQ:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1479 // case FOP+EQ:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1480 // case DOP+NEQ:
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1481 // case FOP+NEQ:
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1482 // code_gt(int cond)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1483
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1484 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1485 code_dgt()
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1486 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1487 double reg;
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1488 if (d0>d1)
229
d793c84b3679 *** empty log message ***
kono
parents: 228
diff changeset
1489 printf("code_dgt 1\n");
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1490 else
229
d793c84b3679 *** empty log message ***
kono
parents: 228
diff changeset
1491 printf("code_dgt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1492 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1493 if (0<reg && reg<3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1494 printf("reg=%g code_dgt 0<reg && reg <3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1495 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1496 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1497 if (-2<reg && reg<0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1498 printf("reg=%g code_dgt -2<reg && reg <0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1499 }
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1500 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1501
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1502 // code_ugt(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1503 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1504 code_fgt()
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1505 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1506 float reg;
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1507 if (f0>f1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1508 printf("code_fgt 1\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1509 else
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1510 printf("code_fgt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1511 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1512 if (0<reg && reg<3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1513 printf("reg=%g code_fgt 0<reg && reg <3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1514 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1515 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1516 if (-2<reg && reg<0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1517 printf("reg=%g code_fgt -2<reg && reg <0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1518 }
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1519 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1520
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1521 // code_ge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1522 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1523 code_dge()
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1524 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1525 double reg;
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1526 if (d0>=d1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1527 printf("code_dge 1\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1528 else
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1529 printf("code_dge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1530 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1531 if (0<=reg && reg<=3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1532 printf("reg=%g code_dge 0<reg && reg <=3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1533 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1534 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1535 if (-2<=reg && reg<=0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1536 printf("reg=%g code_dge -2<reg && reg <=0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1537 }
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1538 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1539
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1540 // code_uge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1541 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1542 code_fge()
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1543 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1544 float reg;
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1545 if (f0>=f1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1546 printf("code_fge 1\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1547 else
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1548 printf("code_fge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1549 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1550 if (0<=reg && reg<=3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1551 printf("reg=%g code_fge 0<=reg && reg <=3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1552 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1553 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1554 if (-2<=reg && reg<=0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1555 printf("reg=%g code_fge -2<=reg && reg <=0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
1556 }
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1557 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1558
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1559 // code_eq(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1560 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1561 code_deq()
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1562 {
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1563 if (f0==f1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1564 printf("code_feq 1\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1565 else
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1566 printf("code_feq 0\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1567 if (d0!=d1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1568 printf("code_deq 1\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1569 else
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1570 printf("code_deq 0\n");
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1571 }
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1572
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1573 // code_dbool(int e1)
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1574
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1575 void
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1576 code_dbool()
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1577 {
288
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1578 float i1l,i2l;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1579 double ui1l,ui2l;
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1580
288
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1581 d1 = d0-3;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1582 for(f1=f0-3;f1<f0+3;f1++) {
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1583 printf("code_dbool %g>%g gvar %d\n",f0,f1,f0>f1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1584 printf("code_dbool %g>%g gvar %d d\n",d0,d1,d0>d1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1585 printf("code_dbool %g>=%g gvar %d\n",f0,f1,f0>=f1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1586 printf("code_dbool %g>=%g gvar %d d\n",d0,d1,d0>=d1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1587 printf("code_dbool %g<%g gvar %d\n",f0,f1,f0<f1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1588 printf("code_dbool %g<%g gvar %d d\n",d0,d1,d0<d1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1589 printf("code_dbool %g<=%g gvar %d\n",f0,f1,f0<=f1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1590 printf("code_dbool %g<=%g gvar %d d\n",d0,d1,d0<=d1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1591 printf("code_dbool %g==%g gvar %d d\n",d0,d1,d0==d1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1592 printf("code_dbool %g!=%g gvar %d\n",f0,f1,f0!=f1);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1593 d1++;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1594 }
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1595 ui1l = d0;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1596 i1l = f0;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1597 ui2l = d0-3;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1598 for(i2l=f0-3;i2l<i1l+3;i2l++) {
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1599 printf("code_dbool %g>%g lvar %d\n",i1l,i2l,i1l>i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1600 printf("code_dbool %g>%g lvar %d d\n",ui1l,ui2l,ui1l>ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1601 printf("code_dbool %g>=%g lvar %d\n",i1l,i2l,i1l>=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1602 printf("code_dbool %g>=%g lvar %d d\n",ui1l,ui2l,ui1l>=ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1603 printf("code_dbool %g<%g lvar %d\n",i1l,i2l,i1l<i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1604 printf("code_dbool %g<%g lvar %d d\n",ui1l,ui2l,ui1l<ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1605 printf("code_dbool %g<=%g lvar %d\n",i1l,i2l,i1l<=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1606 printf("code_dbool %g<=%g lvar %d d\n",ui1l,ui2l,ui1l<=ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1607 printf("code_dbool %g==%g lvar %d d\n",ui1l,ui2l,ui1l==ui2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1608 printf("code_dbool %g!=%g lvar %d\n",i1l,i2l,i1l!=i2l);
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1609 ui2l++;
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1610 }
ce7b4d90bc24 PowerPC code bool
kono
parents: 280
diff changeset
1611 }
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1612
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1613 #endif
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1614
199
117772cc77b2 *** empty log message ***
kono
parents: 198
diff changeset
1615
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1616 #if LONGLONG_CODE
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1617 // lrexpr(int e1, int e2,int l1, int op)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1618 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1619 code_lbool()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1620 {
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1621 long long l0l,l1l;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1622 unsigned long long ul0l,ul1l;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1623
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1624 printf("code_bool > long long %d %d %d %d %d %d\n",
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1625 l1>l0,ul1>ul0,l1>=l0,ul1>=ul0,ul1==ul0,l1!=l0);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1626 printf("code_bool < long long %d %d %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1627 l1<l0,ul1<ul0,l1<=l0,ul1<=ul0,ul1==ul0,l1!=l0);
276
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1628
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1629 l0l=l1l=l0;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1630 ul0l=ul1l=ul0;
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1631
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1632 printf("code_bool eq > long long %d %d %d %d %d %d\n",
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1633 l1l>l0l,ul1l>ul0l,l1l>=l0l,ul1l>=ul0l,ul1l==ul0l,l1l!=l0l);
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1634 printf("code_bool eq < long long %d %d %d %d %d %d\n",
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1635 l1l<l0l,ul1l<ul0l,l1l<=l0l,ul1l<=ul0l,ul1l==ul0l,l1l!=l0l);
ebaec1ae566e MIPS double/longlong lib operand register conflict
kono
parents: 275
diff changeset
1636
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1637 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1638
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1639 // int lpop_register()
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1640 // code_lregister(int e2,int reg)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1641 void
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1642 code_lregister()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1643 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1644 register long long l0,l1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1645 register unsigned long long ul0,ul1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1646 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1647 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1648 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1649 ul1 = 123123123LL;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1650 printf("code_lvar long long %llu %llu %llu %llu\n",l0,l1,ul0,ul1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1651 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1652
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1653 // code_cmp_lregister(int reg)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1654 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1655 code_cmp_lregister()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1656 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1657 register long long l0,l1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1658 register unsigned long long ul0,ul1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1659 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1660 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1661 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1662 ul1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1663 l0 && printf("code_bool register 8\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1664 ul0 && printf("code_bool register 9\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1665 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1666
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1667 // code_cmp_lrgvar(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1668 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1669 code_cmp_lrgvar()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1670 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1671 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1672 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1673 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1674 ul1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1675 l0 && printf("code_bool global 8\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1676 ul0 && printf("code_bool global 9\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1677 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1678 // code_cmp_lrlvar(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1679 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1680 code_cmp_lrlvar()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1681 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1682 long long l0,l1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1683 unsigned long long ul0,ul1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1684 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1685 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1686 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1687 ul1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1688 l0 && printf("code_bool local 8\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1689 ul0 && printf("code_bool local 9\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
1690 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1691
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1692 // code_lassign(int e1,int e2)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1693 // code_lassign_gvar(int e1,int e2)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1694 // code_lassign_lvar(int e1,int e2)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1695 // code_lassign_lregister(int e2,int reg)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1696 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1697 code_lassign()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1698 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1699 long long i1,i2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1700 unsigned long long ui1,ui2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1701 long long *pi1,*pi2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1702 unsigned long long *pui1,*pui2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1703
d83291712bf7 test routine
kono
parents: 199
diff changeset
1704 i1 = -555; i2= 555;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1705 ui1 = 632423423; ui2= 32394234;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1706 pi1 = &i1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1707 pi2 = &i2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1708 pui1 = &ui1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1709 pui2 = &ui2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1710
d83291712bf7 test routine
kono
parents: 199
diff changeset
1711 *(pi2+i1+i2) = 3;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1712 *(pui2+i1+i2) = 3;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1713 printf("code_rindirect %lld %lld %llu %llu\n",*pi1,*pi2,*pui1,*pui2);
d83291712bf7 test routine
kono
parents: 199
diff changeset
1714 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1715
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1716 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1717 code_lassign_register()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1718 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1719 long long i1,i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1720 unsigned long long ui1,ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1721 register long long *pi1,*pi2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1722 register unsigned long long *pui1,*pui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1723
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1724 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1725 ui1 = 632423423; ui2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1726 pi1 = &i1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1727 pi2 = &i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1728 pui1 = &ui1;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1729 pui2 = &ui2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1730
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1731 *(pi2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1732 *(pui2+i1+i2) = 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1733 printf("code_rindirect %lld %lld %llu %llu\n",*pi1,*pi2,*pui1,*pui2);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1734 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1735
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1736 // code_lconst(int e1,int e2)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1737 // code_lneg(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1738 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1739 code_lneg()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1740 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1741 long long i,j;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1742 i = 123123123;j = -32423;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1743 printf("code_neg %lld %lld\n",-i,-j);
d83291712bf7 test routine
kono
parents: 199
diff changeset
1744 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1745
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1746 // code_lrgvar(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1747 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1748 code_lrgvar()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1749 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1750 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1751 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1752 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1753 ul1 = 123123123LL;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1754 printf("code_lrgvar long long %lld %lld %llu %llu\n",l0,l1,ul0,ul1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1755 s_l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1756 s_l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1757 s_ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1758 s_ul1 = 123123123LL;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1759 printf("code_lrgvar long long %lld %lld %llu %llu\n",s_l0,s_l1,s_ul0,s_ul1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1760 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1761
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1762 // code_lrlvar(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1763 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1764 code_lrlvar()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1765 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1766 long long l0,l1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1767 unsigned long long ul0,ul1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1768 l0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1769 l1 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1770 ul0 = 123123123LL;
d83291712bf7 test routine
kono
parents: 199
diff changeset
1771 ul1 = 123123123LL;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1772 printf("code_lvar long long %lld %lld %llu %llu\n",l0,l1,ul0,ul1);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1773 printf("code_bool lvar > long long %d %d %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1774 l1>l0,ul1>ul0,l1>=l0,ul1>=ul0,ul1==ul0,l1!=l0);
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1775 printf("code_bool lvar < long long %d %d %d %d %d %d\n",
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
1776 l1<l0,ul1<ul0,l1<=l0,ul1<=ul0,ul1==ul0,l1!=l0);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1777 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1778
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
1779 // ltosop(int e1,int e2)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1780 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
1781 ltosop()
d83291712bf7 test routine
kono
parents: 199
diff changeset
1782 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
1783 long long i1,i2,i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1784 unsigned long long u1,u2,u;
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1785 int ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1786 unsigned int uu2;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1787 i1 = -555; i2= 555;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1788 u1 = 632423423; u2= 32394234;
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1789 ii2 = -33;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1790 uu2 = 33;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
1791 u = 0;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1792
d83291712bf7 test routine
kono
parents: 199
diff changeset
1793 i = i1 + i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1794 printf("ltosop 1 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1795 i = i1 - i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1796 printf("ltosop 2 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1797 i = i1 / i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1798 printf("ltosop 3 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1799 i = i1 * i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1800 printf("ltosop 4 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1801 i = i1 | i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1802 printf("ltosop 5 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1803 i = i1 & i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1804 printf("ltosop 6 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1805 i = i1 ^ i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1806 printf("ltosop 7 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1807 i = i1 << i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1808 printf("ltosop 8 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1809 i = i1 >> i2;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
1810 printf("ltosop 9 %lld\n",i);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1811 i = i1 % i2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1812 printf("ltosop 10 %lld\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1813
d83291712bf7 test routine
kono
parents: 199
diff changeset
1814 u = u1 + u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1815 printf("ltosop u 1 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1816 u = u1 - u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1817 printf("ltosop u 2 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1818 u = u1 / u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1819 printf("ltosop u 3 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1820 u = u1 * u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1821 printf("ltosop u 4 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1822 u = u1 | u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1823 printf("ltosop u 5 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1824 u = u1 & u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1825 printf("ltosop u 6 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1826 u = u1 ^ u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1827 printf("ltosop u 7 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1828 u = u1 << u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1829 printf("ltosop u 8 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1830 u = u1 >> u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1831 printf("ltosop u 9 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1832 u = u1 % u2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1833 printf("ltosop u 10 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1834
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1835 i = i1 + ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1836 printf("litosop 1 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1837 i = i1 - ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1838 printf("litosop 2 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1839 i = i1 / ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1840 printf("litosop 3 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1841 i = i1 * ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1842 printf("litosop 4 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1843 i = i1 | ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1844 printf("litosop 5 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1845 i = i1 & ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1846 printf("litosop 6 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1847 i = i1 ^ ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1848 printf("litosop 7 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1849 i = i1 << ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1850 printf("litosop 8 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1851 i = i1 >> ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1852 printf("litosop 9 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1853 i = i1 % ii2;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1854 printf("litosop 10 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1855
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1856 u = u1 + uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1857 printf("litosop u 1 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1858 u = u1 - uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1859 printf("litosop u 2 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1860 u = u1 / uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1861 printf("litosop u 3 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1862 u = u1 * uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1863 printf("litosop u 4 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1864 u = u1 | uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1865 printf("litosop u 5 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1866 u = u1 & uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1867 printf("litosop u 6 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1868 u = u1 ^ uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1869 printf("litosop u 7 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1870 u = u1 << uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1871 printf("litosop u 8 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1872 u = u1 >> uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1873 printf("litosop u 9 %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1874 u = u1 % uu2;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1875 printf("litosop u 10 %llu\n",u);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
1876 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
1877
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1878 // loprtc(int op,int v)
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1879 void
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1880 loprtc()
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1881 {
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1882 long long i1,i;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1883 unsigned long long u1,u;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1884 i1 = -555;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1885 u1 = 632423423;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1886
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1887 i = i1 + 3;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1888 printf("loprtc 1 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1889 i = i1 - 3;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1890 printf("loprtc 2 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1891 i = i1 / 32323423423LL;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1892 printf("loprtc 3 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1893 i = i1 * 323423423423LL;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1894 printf("loprtc 4 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1895 i = i1 | 234234234;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1896 printf("loprtc 5 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1897 i = i1 & 23234234;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1898 printf("loprtc 6 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1899 i = i1 ^ 23234234;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1900 printf("loprtc 7 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1901 i = i1 << 5;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1902 printf("loprtc 8 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1903 i = i1 >> 5;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1904 printf("loprtc 9 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1905 i = i1 % 5;
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1906 printf("loprtc 10 %lld\n",i);
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1907
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1908 u = u1 + 3;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1909 printf("loprtc 1 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1910 u = u1 - 3;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1911 printf("loprtc 2 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1912 u = u1 / 32342342344234LL;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1913 printf("loprtc 3 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1914 u = u1 * 243234234232324LL;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1915 printf("loprtc 4 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1916 u = u1 | 234234234;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1917 printf("loprtc 5 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1918 u = u1 & 234234234;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1919 printf("loprtc 6 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1920 u = u1 ^ 234234234;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1921 printf("loprtc 7 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1922 u = u1 << 5;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1923 printf("loprtc 8 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1924 u = u1 >> 5;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1925 printf("loprtc 9 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1926 u = u1 % 5;
231
f5efe15629d4 *** empty log message ***
kono
parents: 229
diff changeset
1927 printf("loprtc 10 u %llu\n",u);
214
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1928 }
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1929
4f459364c334 *** empty log message ***
kono
parents: 203
diff changeset
1930
274
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1931 // ltosop(int e1,int e2)
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1932 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1933 ltosop_register()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1934 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1935 register long long i1,i2,i;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1936 register unsigned long long u1,u2,u;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1937 register int ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1938 register unsigned int uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1939 i1 = -555; i2= 555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1940 u1 = 632423423; u2= 32394234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1941 ii2 = -33;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1942 uu2 = 33;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1943 u = 0;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1944
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1945 i = i1 + i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1946 printf("ltosop r 1 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1947 i = i1 - i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1948 printf("ltosop r 2 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1949 i = i1 / i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1950 printf("ltosop r 3 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1951 i = i1 * i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1952 printf("ltosop r 4 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1953 i = i1 | i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1954 printf("ltosop r 5 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1955 i = i1 & i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1956 printf("ltosop r 6 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1957 i = i1 ^ i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1958 printf("ltosop r 7 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1959 i = i1 << i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1960 printf("ltosop r 8 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1961 i = i1 >> i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1962 printf("ltosop r 9 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1963 i = i1 % i2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1964 printf("ltosop r 10 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1965
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1966 u = u1 + u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1967 printf("ltosop r u 1 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1968 u = u1 - u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1969 printf("ltosop r u 2 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1970 u = u1 / u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1971 printf("ltosop r u 3 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1972 u = u1 * u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1973 printf("ltosop r u 4 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1974 u = u1 | u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1975 printf("ltosop r u 5 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1976 u = u1 & u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1977 printf("ltosop r u 6 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1978 u = u1 ^ u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1979 printf("ltosop r u 7 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1980 u = u1 << u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1981 printf("ltosop r u 8 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1982 u = u1 >> u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1983 printf("ltosop r u 9 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1984 u = u1 % u2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1985 printf("ltosop r u 10 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1986
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1987 i = i1 + ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1988 printf("litosop r 1 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1989 i = i1 - ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1990 printf("litosop r 2 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1991 i = i1 / ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1992 printf("litosop r 3 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1993 i = i1 * ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1994 printf("litosop r 4 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1995 i = i1 | ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1996 printf("litosop r 5 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1997 i = i1 & ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1998 printf("litosop r 6 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
1999 i = i1 ^ ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2000 printf("litosop r 7 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2001 i = i1 << ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2002 printf("litosop r 8 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2003 i = i1 >> ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2004 printf("litosop r 9 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2005 i = i1 % ii2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2006 printf("litosop r 10 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2007
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2008 u = u1 + uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2009 printf("litosop r u 1 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2010 u = u1 - uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2011 printf("litosop r u 2 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2012 u = u1 / uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2013 printf("litosop r u 3 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2014 u = u1 * uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2015 printf("litosop r u 4 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2016 u = u1 | uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2017 printf("litosop r u 5 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2018 u = u1 & uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2019 printf("litosop r u 6 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2020 u = u1 ^ uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2021 printf("litosop r u 7 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2022 u = u1 << uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2023 printf("litosop r u 8 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2024 u = u1 >> uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2025 printf("litosop r u 9 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2026 u = u1 % uu2;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2027 printf("litosop r u 10 %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2028 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2029
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2030 // loprtc(int op,int v)
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2031 void
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2032 loprtc_register()
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2033 {
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2034 register long long i1,i;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2035 register unsigned long long u1,u;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2036 i1 = -555;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2037 u1 = 632423423;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2038
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2039 i = i1 + 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2040 printf("loprtc r 1 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2041 i = i1 - 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2042 printf("loprtc r 2 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2043 i = i1 / 32323423423LL;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2044 printf("loprtc r 3 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2045 i = i1 * 323423423423LL;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2046 printf("loprtc r 4 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2047 i = i1 | 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2048 printf("loprtc r 5 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2049 i = i1 & 23234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2050 printf("loprtc r 6 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2051 i = i1 ^ 23234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2052 printf("loprtc r 7 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2053 i = i1 << 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2054 printf("loprtc r 8 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2055 i = i1 >> 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2056 printf("loprtc r 9 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2057 i = i1 % 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2058 printf("loprtc r 10 %lld\n",i);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2059
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2060 u = u1 + 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2061 printf("loprtc r 1 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2062 u = u1 - 3;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2063 printf("loprtc r 2 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2064 u = u1 / 32342342344234LL;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2065 printf("loprtc r 3 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2066 u = u1 * 243234234232324LL;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2067 printf("loprtc r 4 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2068 u = u1 | 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2069 printf("loprtc r 5 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2070 u = u1 & 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2071 printf("loprtc r 6 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2072 u = u1 ^ 234234234;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2073 printf("loprtc r 7 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2074 u = u1 << 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2075 printf("loprtc r 8 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2076 u = u1 >> 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2077 printf("loprtc r 9 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2078 u = u1 % 5;
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2079 printf("loprtc r 10 u %llu\n",u);
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2080 }
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2081
3ae68af07fce MIPS code-gen-all passed.
kono
parents: 273
diff changeset
2082
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2083 // code_i2ll(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2084 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2085 code_i2ll()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2086 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2087 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2088 int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2089 i = 23442342;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2090 d = i;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2091 printf("code_i2ll %lld\n",d);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2092 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2093 // code_i2ull(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2094 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2095 code_i2ull()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2096 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2097 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2098 int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2099 i = 23442342;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2100 d = i;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2101 printf("code_i2ull %lld\n",d);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2102 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2103 // code_u2ll(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2104 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2105 code_u2ll()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2106 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2107 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2108 unsigned int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2109 i = 23442342;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2110 d = i;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2111 printf("code_u2ll %lld\n",d);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2112 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2113 // code_u2ull(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2114 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2115 code_u2ull()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2116 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2117 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2118 unsigned int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2119 i = 23342342;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2120 d = i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2121 printf("code_u2ull %llu\n",d);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2122 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2123 // code_ll2i(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2124 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2125 code_ll2i()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2126 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2127 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2128 int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2129 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2130 i = d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2131 printf("code_ll2i %d\n",i);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2132 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2133 // code_ll2u(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2134 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2135 code_ll2u()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2136 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2137 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2138 unsigned int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2139 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2140 i = d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2141 printf("code_ll2i %ud\n",i);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2142 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2143 // code_ull2i(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2144 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2145 code_ull2i()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2146 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2147 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2148 int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2149 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2150 i = d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2151 printf("code_ull2i %d\n",i);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2152 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2153 // code_ull2u(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2154 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2155 code_ull2u()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2156 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2157 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2158 unsigned int i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2159 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2160 i = d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2161 printf("code_ll2i %ud\n",i);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2162 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2163 #if FLOAT_CODE
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2164 // code_d2ll(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2165 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2166 code_d2ll()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2167 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2168 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2169 double i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2170 i = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2171 d = i;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2172 printf("code_d2ll %lld\n",d);
d83291712bf7 test routine
kono
parents: 199
diff changeset
2173 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2174 // code_d2ull(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2175 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2176 code_d2ull()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2177 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2178 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2179 double i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2180 i = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2181 d = i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2182 printf("code_d2ll %llu\n",d);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2183 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2184 // code_f2ll(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2185 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2186 code_f2ll()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2187 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2188 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2189 float i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2190 i = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2191 d = i;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2192 printf("code_f2ll %lld\n",d);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2193 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2194 // code_f2ull(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2195 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2196 code_f2ull()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2197 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2198 unsigned long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2199 float i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2200 i = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2201 d = i;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2202 printf("code_f2ull %llu\n",d);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2203 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2204 // code_ll2d(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2205 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2206 code_ll2d()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2207 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2208 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2209 double i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2210 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2211 i = d;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2212 printf("code_ll2d %g\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2213 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2214 // code_ll2f(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2215 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2216 code_ll2f()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2217 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2218 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2219 float i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2220 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2221 i = d;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2222 printf("code_ll2f %g\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2223 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2224 // code_ull2d(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2225 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2226 code_ull2d()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2227 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2228 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2229 double i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2230 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2231 i = d;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2232 printf("code_ull2f %g\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2233 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2234 // code_ull2f(int creg)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2235 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2236 code_ull2f()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2237 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2238 long long d;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2239 float i;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2240 d = 2342342342LL;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2241 i = d;
242
c68f618b71f9 ia32 long long done. some error remains.
kono
parents: 237
diff changeset
2242 printf("code_ull2f %g\n",i);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2243 }
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2244 #endif
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2245
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2246 // code_lpreinc(int e1,int e2,int reg)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2247 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
2248 code_lpreinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2249 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2250 long long i,j;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2251 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2252 printf("code_preinc l %lld %lld",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2253 printf(" %lld %lld\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2254 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2255
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2256 // code_lpostinc(int e1,int e2,int reg)
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2257 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
2258 code_lpostinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2259 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2260 long long i,j;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2261 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2262 printf("code_postinc l %lld %lld",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2263 printf(" %lld %lld\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2264 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2265
d83291712bf7 test routine
kono
parents: 199
diff changeset
2266 // code_lpreinc(int e1,int e2,int reg)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2267 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
2268 code_lupreinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2269 {
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2270 register unsigned long long i,j;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2271 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2272 printf("code_preinc l %llu %llu",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2273 printf(" %lld %lld\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2274 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2275
d83291712bf7 test routine
kono
parents: 199
diff changeset
2276 // code_lpostinc(int e1,int e2,int reg)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2277 void
d83291712bf7 test routine
kono
parents: 199
diff changeset
2278 code_lupostinc()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2279 {
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2280 register unsigned long long i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2281 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2282 printf("code_postinc lu %llu %llu",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2283 printf(" %lld %lld\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2284 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2285
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2286 // code_lpreinc(int e1,int e2,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2287 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2288 code_register_lpreinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2289 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2290 register long long i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2291 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2292 printf("code_preinc l r %lld %lld",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2293 printf(" %lld %lld\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2294 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2295
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2296 // code_lpostinc(int e1,int e2,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2297 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2298 code_register_lpostinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2299 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2300 register long long i,j;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2301 i = 123123123;j = 0;
273
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2302 printf("code_postinc l r %lld %lld",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2303 printf(" %lld %lld\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2304 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2305
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2306 // code_lpreinc(int e1,int e2,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2307 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2308 code_register_lupreinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2309 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2310 register unsigned long long i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2311 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2312 printf("code_preinc l r %llu %llu",++i,--j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2313 printf(" %lld %lld\n",i,j);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2314 }
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2315
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2316 // code_lpostinc(int e1,int e2,int reg)
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2317 void
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2318 code_register_lupostinc()
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2319 {
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2320 register unsigned long long i,j;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2321 i = 123123123;j = 0;
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2322 printf("code_postinc lu r %llu %llu",i++,j--);
87b9cfc86a10 *** empty log message ***
kono
parents: 255
diff changeset
2323 printf(" %lld %lld\n",i,j);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2324 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2325
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2326 // code_lassop(int op)
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2327
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2328 // code_register_assop(int e2,int op,int byte)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2329 void
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2330 code_register_lassop()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2331 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2332 register long long i1;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2333 register unsigned long long ui1;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2334 long long a = 3;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2335 i1 = -555;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2336 ui1 = 632423423;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2337
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2338 i1 += a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2339 printf("code_register_lassop 1 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2340 i1 -= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2341 printf("code_register_lassop 2 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2342 i1 /= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2343 printf("code_register_lassop 3 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2344 i1 *= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2345 printf("code_register_lassop 4 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2346 i1 |= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2347 printf("code_register_lassop 5 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2348 i1 &= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2349 printf("code_register_lassop 6 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2350 i1 ^= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2351 printf("code_register_lassop 7 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2352 i1 <<= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2353 printf("code_register_lassop 8 %lld\n",i1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2354 i1 >>= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2355 printf("code_register_lassop 9 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2356
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2357 ui1 += a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2358 printf("code_register_lassop 1 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2359 ui1 -= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2360 printf("code_register_lassop 2 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2361 ui1 /= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2362 printf("code_register_lassop 3 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2363 ui1 *= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2364 printf("code_register_lassop 4 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2365 ui1 |= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2366 printf("code_register_lassop 5 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2367 ui1 &= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2368 printf("code_register_lassop 6 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2369 ui1 ^= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2370 printf("code_register_lassop 7 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2371 ui1 <<= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2372 printf("code_register_lassop 8 %llu\n",ui1);
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2373 ui1 >>= a;
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2374 printf("code_register_lassop 9 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2375 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2376
d83291712bf7 test routine
kono
parents: 199
diff changeset
2377 // code_lassop(int op,int byte,int sign)
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2378 void
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2379 code_lassop()
d83291712bf7 test routine
kono
parents: 199
diff changeset
2380 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2381 long long i1,i2;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2382 unsigned long long ui1,ui2;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2383 long long a = 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2384 i1 = -555; i2= 555;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2385 ui1 = 632423423; ui2= 32394234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2386
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2387 i1 += a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2388 printf("code_lassop 1 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2389 i1 -= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2390 printf("code_lassop 2 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2391 i1 /= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2392 printf("code_lassop 3 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2393 i1 *= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2394 printf("code_lassop 4 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2395 i1 |= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2396 printf("code_lassop 5 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2397 i1 &= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2398 printf("code_lassop 6 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2399 i1 ^= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2400 printf("code_lassop 7 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2401 i1 <<= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2402 printf("code_lassop 8 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2403 i1 >>= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2404 printf("code_lassop 9 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2405
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2406 ui1 += a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2407 printf("code_lassop 1 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2408 ui1 -= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2409 printf("code_lassop 2 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2410 ui1 /= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2411 printf("code_lassop 3 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2412 ui1 *= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2413 printf("code_lassop 4 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2414 ui1 |= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2415 printf("code_lassop 5 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2416 ui1 &= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2417 printf("code_lassop 6 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2418 ui1 ^= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2419 printf("code_lassop 7 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2420 ui1 <<= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2421 printf("code_lassop 8 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2422 ui1 >>= a;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2423 printf("code_lassop 9 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2424 }
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2425
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2426 // code_register_assop(int e2,int op,int byte)
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2427 void
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2428 code_register_lassop_const()
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2429 {
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2430 register long long i1;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2431 register unsigned long long ui1;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2432 i1 = -555;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2433 ui1 = 632423423;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2434
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2435 i1 += 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2436 printf("code_register_lassop c 1 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2437 i1 -= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2438 printf("code_register_lassop c 2 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2439 i1 /= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2440 printf("code_register_lassop c 3 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2441 i1 *= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2442 printf("code_register_lassop c 4 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2443 i1 |= 234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2444 printf("code_register_lassop c 5 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2445 i1 &= 2324234234234234LL;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2446 printf("code_register_lassop c 6 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2447 i1 ^= 5523234234234234LL;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2448 printf("code_register_lassop c 7 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2449 i1 <<= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2450 printf("code_register_lassop c 8 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2451 i1 >>= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2452 printf("code_register_lassop c 9 %lld\n",i1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2453
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2454 ui1 += 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2455 printf("code_register_lassop c 1 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2456 ui1 -= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2457 printf("code_register_lassop c 2 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2458 ui1 /= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2459 printf("code_register_lassop c 3 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2460 ui1 *= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2461 printf("code_register_lassop c 4 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2462 ui1 |= 234;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2463 printf("code_register_lassop c 5 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2464 ui1 &= 2324234234234234LL;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2465 printf("code_register_lassop c 6 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2466 ui1 ^= 5523234234234234LL;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2467 printf("code_register_lassop c 7 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2468 ui1 <<= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2469 printf("code_register_lassop c 8 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2470 ui1 >>= 3;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2471 printf("code_register_lassop c 9 %llu\n",ui1);
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2472 }
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2473
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2474 // code_lassop(int op,int byte,int sign)
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2475 void
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2476 code_lassop_const()
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2477 {
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2478 long long i1,i2;
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2479 unsigned long long ui1,ui2;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2480 i1 = -555; i2= 555;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2481 ui1 = 632423423; ui2= 32394234;
d83291712bf7 test routine
kono
parents: 199
diff changeset
2482
d83291712bf7 test routine
kono
parents: 199
diff changeset
2483 i1 += 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2484 printf("code_lassop c 1 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2485 i1 -= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2486 printf("code_lassop c 2 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2487 i1 /= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2488 printf("code_lassop c 3 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2489 i1 *= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2490 printf("code_lassop c 4 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2491 i1 |= 234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2492 printf("code_lassop c 5 %lld\n",i1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2493 i1 &= 2324234234234234LL;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2494 printf("code_lassop c 6 %lld\n",i1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2495 i1 ^= 5523234234234234LL;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2496 printf("code_lassop c 7 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2497 i1 <<= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2498 printf("code_lassop c 8 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2499 i1 >>= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2500 printf("code_lassop c 9 %lld\n",i1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2501
d83291712bf7 test routine
kono
parents: 199
diff changeset
2502 ui1 += 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2503 printf("code_lassop c 1 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2504 ui1 -= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2505 printf("code_lassop c 2 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2506 ui1 /= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2507 printf("code_lassop c 3 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2508 ui1 *= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2509 printf("code_lassop c 4 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2510 ui1 |= 234;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2511 printf("code_lassop c 5 %llu\n",ui1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2512 ui1 &= 2324234234234234LL;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2513 printf("code_lassop c 6 %llu\n",ui1);
201
3ae7e188416f *** empty log message ***
kono
parents: 200
diff changeset
2514 ui1 ^= 5523234234234234LL;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2515 printf("code_lassop c 7 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2516 ui1 <<= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2517 printf("code_lassop c 8 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2518 ui1 >>= 3;
255
8cd8d72286ae PowerPC long long complex function call fix.
kono
parents: 242
diff changeset
2519 printf("code_lassop c 9 %llu\n",ui1);
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2520 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2521
d83291712bf7 test routine
kono
parents: 199
diff changeset
2522 // code_lgt(int cond)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2523
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2524 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2525 code_lgt()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2526 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2527 long long reg;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2528 if (l0>l1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2529 printf("code_lgt 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2530 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2531 printf("code_lgt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2532 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2533 if (0<reg && reg<3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2534 printf("reg=%lld code_lgt 0<reg && reg <3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2535 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2536 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2537 if (-2<reg && reg<0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2538 printf("reg=%lld code_lgt -2<reg && reg <0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2539 }
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2540 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2541
d83291712bf7 test routine
kono
parents: 199
diff changeset
2542 // code_lugt(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2543 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2544 code_lugt()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2545 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2546 unsigned long long reg;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2547 if (ul0>ul1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2548 printf("code_lugt 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2549 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2550 printf("code_lugt 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2551 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2552 if (2<reg && reg<4)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2553 printf("reg=%llu code_lugt 2<reg && reg <4\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2554 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2555 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2556 if (2<reg && reg<4)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2557 printf("reg=%llu code_lugt 2<reg && reg <4\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2558 }
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2559 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2560
d83291712bf7 test routine
kono
parents: 199
diff changeset
2561 // code_lge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2562 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2563 code_lge()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2564 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2565 long long reg;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2566 if (l0>=l1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2567 printf("code_lge 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2568 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2569 printf("code_lge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2570 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2571 if (0<=reg && reg<=3)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2572 printf("reg=%lld code_lge 0<=reg && reg <=3\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2573 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2574 for (reg=-3;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2575 if (-2<=reg && reg<=0)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2576 printf("reg=%lld code_lge -2<=reg && reg <=0\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2577 }
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2578 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2579
d83291712bf7 test routine
kono
parents: 199
diff changeset
2580 // code_luge(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2581 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2582 code_luge()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2583 {
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2584 unsigned long long reg;
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2585 if (ul0>=ul1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2586 printf("code_luge 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2587 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2588 printf("code_luge 0\n");
280
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2589 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2590 if (2<reg && reg<4)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2591 printf("reg=%llu code_luge 2<reg && reg <4\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2592 }
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2593 for (reg=0;reg<7;reg++) {
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2594 if (2<reg && reg<4)
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2595 printf("reg=%llu code_luge 2<reg && reg <4\n",reg);
affb054fe920 lrexpr fix. rexpr in MIPS fix.
kono
parents: 276
diff changeset
2596 }
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2597 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2598
d83291712bf7 test routine
kono
parents: 199
diff changeset
2599 // code_leq(int cond)
227
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2600 void
ed92cef127f1 *** empty log message ***
kono
parents: 223
diff changeset
2601 code_leq()
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2602 {
d83291712bf7 test routine
kono
parents: 199
diff changeset
2603 if (ul0==ul1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2604 printf("code_leq 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2605 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2606 printf("code_leq 0\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2607 if (l0!=l1)
d83291712bf7 test routine
kono
parents: 199
diff changeset
2608 printf("code_lneq 1\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2609 else
d83291712bf7 test routine
kono
parents: 199
diff changeset
2610 printf("code_lneq 0\n");
d83291712bf7 test routine
kono
parents: 199
diff changeset
2611 }
d83291712bf7 test routine
kono
parents: 199
diff changeset
2612
275
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2613 #if 0
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2614 void
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2615 code_lswitch()
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2616 {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2617 long long i;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2618 for(i=0;i<6;i++) {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2619 switch(i) {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2620 case 1: printf("code_lswitch 1 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2621 case 2: printf("code_lswitch 2 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2622 case 3: printf("code_lswitch 3 %d\n",i);
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2623 case 4: printf("code_lswitch 4 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2624 default: printf("code_lswitch d %d\n",i);
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2625 }
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2626 }
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2627 }
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2628 #endif
200
d83291712bf7 test routine
kono
parents: 199
diff changeset
2629
d83291712bf7 test routine
kono
parents: 199
diff changeset
2630
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2631 #endif
275
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2632
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2633 void
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2634 code_switch()
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2635 {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2636 int i;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2637 for(i=0;i<10;i++) {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2638 switch(i) {
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2639 case 1: printf("code_switch 1 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2640 case 2: printf("code_switch 2 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2641 case 3: printf("code_switch 3 %d\n",i);
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2642 case 4: printf("code_switch 4 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2643 case 7:
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2644 case 5: printf("code_switch 5 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2645 case 6: printf("code_switch 6 %d\n",i); break;
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2646 default: printf("code_switch d %d\n",i);
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2647 }
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2648 }
293
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2649 for(i=0;i<10;i++) {
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2650 switch(i) {
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2651 case 1: printf("code_switch 1 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2652 case 2:
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2653 i = i* 100;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2654 switch(i) {
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2655 case 100: printf("code_switch n 1 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2656 case 200:
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2657 for(i=-100;i<10;i++) {
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2658 switch(i) {
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2659 case 1234: printf("code_switch 1 nn %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2660 case 2233: printf("code_switch 2 nn %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2661 case 3333: printf("code_switch 3 nn %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2662 case -4: printf("code_switch 4 nn %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2663 case 733:
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2664 case -5: printf("code_switch 5 nn %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2665 case -326: printf("code_switch 6 nn %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2666 }
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2667 }
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2668 case 300: printf("code_switch n 3 %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2669 case 400: printf("code_switch n 4 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2670 case 700:
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2671 case 500: printf("code_switch n 5 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2672 case 600: printf("code_switch n 6 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2673 default: printf("code_switch n d %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2674 }
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2675 case 3: printf("code_switch 3 %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2676 case 4: printf("code_switch 4 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2677 case 7:
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2678 case 5: printf("code_switch 5 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2679 case 6: printf("code_switch 6 %d\n",i); break;
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2680 default: printf("code_switch d %d\n",i);
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2681 }
5bf2c3070d36 sort case value
kono
parents: 288
diff changeset
2682 }
275
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2683 }
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2684
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2685
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2686
8f09f8bbc494 MIPS switch statement. basic.c passed.
kono
parents: 274
diff changeset
2687
196
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2688 /* end */
5f70abd9453d *** empty log message ***
kono
parents:
diff changeset
2689