61
|
1 /* function required by mc-codegen.c
|
|
2 mc-code-*.c have to provied these
|
|
3 */
|
|
4
|
173
|
5
|
144
|
6 #define MAX_MAX 50
|
|
7 #define INPUT_REG 2 /* input register ( can be reused ) */
|
|
8 #define USING_REG 1 /* unreusable register usage */
|
|
9
|
173
|
10 extern char *l_include_path[];
|
|
11
|
83
|
12 extern int size_of_int;
|
165
|
13 extern int size_of_short;
|
83
|
14 extern int size_of_float;
|
|
15 extern int size_of_double;
|
|
16 extern int size_of_longlong;
|
|
17 extern int endian;
|
254
|
18
|
83
|
19 extern int MAX_REGISTER;
|
|
20 extern int MAX_REGISTGER_VAR;
|
|
21 extern int MAX_FREGISTER;
|
103
|
22
|
|
23 extern int MAX_INPUT_REGISTER_VAR;
|
|
24 extern int MAX_CODE_INPUT_REGISTER_VAR;
|
|
25 extern int MAX_INPUT_DREGISTER_VAR;
|
138
|
26 extern int MAX_CODE_INPUT_FREGISTER_VAR;
|
103
|
27 extern int MAX_CODE_INPUT_DREGISTER_VAR;
|
99
|
28
|
94
|
29 #define REG_LVAR_OFFSET 2
|
83
|
30
|
238
|
31 extern int code_lassop_p;
|
|
32
|
102
|
33 extern void code_init();
|
61
|
34 extern void gexpr_code_init(void);
|
105
|
35 extern int get_register_var(NMTBL *n);
|
138
|
36 extern int get_dregister_var(NMTBL *n,int d);
|
195
|
37 extern int get_lregister_var(NMTBL *n);
|
126
|
38 extern int get_input_register_var(int,NMTBL *,int);
|
138
|
39 extern int get_input_dregister_var(int,NMTBL *,int,int);
|
195
|
40 extern int get_input_lregister_var(int,NMTBL *,int);
|
107
|
41 extern void emit_push();
|
61
|
42 extern int emit_pop(int type);
|
|
43 extern void gexpr_code_init();
|
95
|
44 extern int code_csvalue();
|
147
|
45 extern void code_gexpr(int e);
|
287
|
46 extern void code_cmpdimm(int e, int csreg,int label,int cond);
|
107
|
47 extern void code_gvar(int e1,int reg);
|
|
48 extern void code_rgvar(int e1,int reg);
|
165
|
49 extern void code_crgvar(int e1,int reg,int sign,int sz);
|
107
|
50 extern void code_lvar(int e2,int reg);
|
|
51 extern void code_register(int e2,int reg);
|
94
|
52 extern void code_rlvar(int e2,int reg);
|
165
|
53 extern void code_crlvar(int e2,int reg,int sign,int sz);
|
109
|
54 extern void code_fname(NMTBL *n,int reg);
|
107
|
55 extern void code_const(int e2,int reg);
|
|
56 extern void code_neg(int reg);
|
|
57 extern void code_not(int reg);
|
|
58 extern void code_lnot(int reg);
|
168
|
59 extern void code_preinc(int e1,int e2,int dir,int sign,int sz,int reg);
|
|
60 extern void code_postinc(int e1,int e2,int dir,int sign,int sz,int reg);
|
107
|
61 extern void code_return(int reg);
|
|
62 extern void code_environment(int reg);
|
221
|
63 extern void code_bool(int e1,int reg);
|
287
|
64 extern void code_cmp_crgvar(int e1,int reg,int sz,int label,int cond);
|
|
65 extern void code_cmp_crlvar(int e1,int reg,int sz,int label,int cond);
|
|
66 extern void code_cmp_rgvar(int e1,int reg,int label,int cond);
|
|
67 extern void code_cmp_rlvar(int e1,int reg,int label,int cond);
|
|
68 extern void code_cmp_register(int e2,int label,int cond);
|
107
|
69 extern void code_string(int e1,int reg);
|
61
|
70 extern void emit_copy(int from,int to,int length,int offset,int value,int det);
|
94
|
71 extern int function(int e1);
|
61
|
72 extern void code_frame_pointer(int e3);
|
|
73 extern void code_fix_frame_pointer(int disp_offset);
|
|
74 extern void code_jmp(char *s);
|
|
75 extern void code_indirect_jmp(int e2);
|
196
|
76
|
221
|
77 extern int code_rindirect(int e1, int reg,int offset, int us);
|
|
78 extern int code_crindirect(int e1, int reg,int offset, int us);
|
|
79 extern int code_srindirect(int e1, int reg,int offset, int us);
|
196
|
80 #if FLOAT_CODE
|
221
|
81 extern int code_drindirect(int e1, int reg,int offset, int d);
|
196
|
82 #endif
|
|
83 #if LONGLONG_CODE
|
221
|
84 extern int code_lrindirect(int e1, int reg,int offset, int us);
|
196
|
85 #endif
|
|
86
|
103
|
87 extern void code_assign_gvar(int e2,int reg,int byte);
|
|
88 extern void code_assign_lvar(int e2,int reg,int byte);
|
111
|
89 extern void code_assign_register(int e2,int byte,int reg);
|
118
|
90 extern void code_assign(int e2,int byte,int reg);
|
221
|
91 extern void code_register_assop(int e2,int reg,int op,int byte);
|
|
92 extern void code_assop(int op,int reg,int byte,int sign);
|
|
93 extern void tosop(int op,int reg,int oreg);
|
66
|
94 extern void code_opening(char *filename);
|
|
95 extern void code_closing();
|
280
|
96 extern void rexpr(int e1, int l1, int cond,int t);
|
61
|
97 extern void jmp(int l);
|
187
|
98 extern int code_get_fixed_creg(int reg,int type);
|
|
99 extern void code_set_fixed_creg(int reg,int mode,int type);
|
107
|
100 extern void code_set_return_register(int mode);
|
66
|
101 extern void global_table(void);
|
92
|
102 extern void code_label(int labelno);
|
|
103
|
189
|
104 extern int code_const_op_p(int op,int v);
|
221
|
105 extern void oprtc(int op,int reg,int v);
|
189
|
106
|
61
|
107
|
195
|
108 #if FLOAT_CODE
|
81
|
109 /* floating point part */
|
|
110
|
229
|
111 extern void drexpr(int e1, int e2,int l1, int op,int cond);
|
81
|
112 extern int dpop_register();
|
|
113 extern int emit_dpop(int);
|
138
|
114 extern void code_dregister(int e2,int reg,int d);
|
287
|
115 extern void code_cmp_dregister(int,int,int,int);
|
|
116 extern void code_cmp_drgvar(int,int,int,int,int);
|
|
117 extern void code_cmp_drlvar(int,int,int,int,int);
|
103
|
118 extern void code_dassign(int,int,int);
|
|
119 extern void code_dassign_gvar(int,int,int);
|
|
120 extern void code_dassign_lvar(int,int,int);
|
138
|
121 extern void code_dassign_dregister(int e2,int d,int reg);
|
|
122 extern void code_dconst(int,int,int);
|
|
123 extern void code_dneg(int,int);
|
107
|
124 extern void code_drgvar(int,int,int);
|
|
125 extern void code_drlvar(int,int,int);
|
221
|
126 extern void dtosop(int,int,int);
|
138
|
127 extern void emit_dpop_free(int,int);
|
133
|
128 extern void emit_dpush(int);
|
221
|
129 extern void code_i2d();
|
|
130 extern void code_d2i();
|
|
131 extern void code_u2d();
|
|
132 extern void code_d2u();
|
|
133 extern void code_d2f();
|
|
134 extern void code_f2d();
|
|
135 extern void code_f2i();
|
|
136 extern void code_f2u();
|
|
137 extern void code_i2f();
|
|
138 extern void code_u2f();
|
133
|
139
|
81
|
140
|
107
|
141 extern void code_dpreinc(int e1,int e2,int d,int reg);
|
|
142 extern void code_dpostinc(int e1,int e2,int d,int reg);
|
221
|
143 extern void code_dassop(int op,int reg,int d);
|
219
|
144 extern void code_register_dassop(int reg,int op,int d);
|
89
|
145
|
195
|
146 #endif
|
|
147
|
|
148 #if LONGLONG_CODE
|
|
149 /* 64bit int part */
|
|
150
|
229
|
151 extern void lrexpr(int e1, int e2,int l1, int op,int cond);
|
195
|
152 extern int lpop_register();
|
|
153 extern int emit_lpop();
|
|
154 extern void code_lregister(int e2,int reg);
|
287
|
155 extern void code_cmp_lregister(int,int,int);
|
|
156 extern void code_cmp_lrgvar(int,int,int,int);
|
|
157 extern void code_cmp_lrlvar(int,int,int,int);
|
195
|
158 extern void code_lassign(int,int);
|
|
159 extern void code_lassign_gvar(int,int);
|
|
160 extern void code_lassign_lvar(int,int);
|
|
161 extern void code_lassign_lregister(int e2,int reg);
|
|
162 extern void code_lconst(int,int);
|
212
|
163 extern void code_lneg(int);
|
195
|
164 extern void code_lrgvar(int,int);
|
|
165 extern void code_lrlvar(int,int);
|
221
|
166 extern void ltosop(int,int,int);
|
195
|
167 extern void emit_lpop_free(int);
|
|
168 extern void emit_lpush();
|
213
|
169 extern int code_lconst_op_p(int op,int e);
|
221
|
170 extern void loprtc(int op,int reg, int e);
|
239
|
171 extern void code_i2ll(int reg);
|
|
172 extern void code_i2ull(int reg);
|
|
173 extern void code_u2ll(int reg);
|
|
174 extern void code_u2ull(int reg);
|
|
175 extern void code_ll2i(int reg);
|
|
176 extern void code_ll2u(int reg);
|
|
177 extern void code_ull2i(int reg);
|
|
178 extern void code_ull2u(int reg);
|
195
|
179 #if FLOAT_CODE
|
239
|
180 extern void code_d2ll(int reg);
|
|
181 extern void code_d2ull(int reg);
|
|
182 extern void code_f2ll(int reg);
|
|
183 extern void code_f2ull(int reg);
|
|
184 extern void code_ll2d(int reg);
|
|
185 extern void code_ll2f(int reg);
|
|
186 extern void code_ull2d(int reg);
|
|
187 extern void code_ull2f(int reg);
|
195
|
188 #endif
|
|
189
|
|
190
|
|
191
|
|
192
|
|
193 extern void code_lpreinc(int e1,int e2,int reg);
|
|
194 extern void code_lpostinc(int e1,int e2,int reg);
|
221
|
195 extern void code_lassop(int op,int reg);
|
219
|
196 extern void code_register_lassop(int reg,int op);
|
195
|
197
|
|
198 #endif
|
|
199
|
137
|
200 extern void code_arg_register(NMTBL *fnptr);
|
89
|
201
|
|
202 extern int get_register(void);
|
138
|
203 extern int get_dregister(int);
|
205
|
204 extern int get_lregister(void);
|
89
|
205 extern void free_register(int i) ;
|
|
206 extern int pop_register(void);
|
|
207 extern void emit_pop_free(int xreg);
|
|
208
|
221
|
209 // extern int use_int(int);
|
|
210 // extern int use_float(int);
|
|
211 // extern int use_double(int);
|
|
212 // extern int use_longlong(int);
|
138
|
213
|
300
|
214 #if CASE_CODE
|
|
215 extern int code_table_jump_p();
|
|
216 extern void code_table_jump(int table,int csvalue,int delta,int max,int min);
|
|
217 extern void code_table_open(int table);
|
|
218 extern void code_table_value(int label,int table);
|
|
219 extern void code_table_close();
|
|
220 #endif
|
|
221
|
89
|
222 /* */
|