annotate test/code-gen.c @ 275:8f09f8bbc494

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