Mercurial > hg > CbC > old > device

comparison mc.h @ 81:f94ca1168520

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
float first try...
author kono
date Mon, 03 Mar 2003 20:59:51 +0900
parents 8418d4b7caa7
children 25654dc29ecc
comparison
equal deleted inserted replaced
80:83d901658ce9 81:f94ca1168520
145 #define ARROW 66 145 #define ARROW 66
146 #define CNAME 67 146 #define CNAME 67
147 #define SASS 68 147 #define SASS 68
148 #define RSTRUCT 69 148 #define RSTRUCT 69
149 149
150 #define FMUL 70 150 #define FASSOP 70
151 #define FDIV 71 151 #define DASSOP 71
152 #define FADD 72 152
153 #define FSUB 73 153 #define DMINUS 73
154 #define DMUL 74 154 #define DMUL 74
155 #define DDIV 75 155 #define DDIV 75
156 #define DADD 76 156 #define DADD 76
157 #define DSUB 77 157 #define DSUB 77
158 #define LMUL 78 158 #define LMUL 78
159 #define LDIV 79 159 #define LDIV 79
160 #define LADD 80 160 #define LADD 80
161 #define LSUB 81 161 #define LSUB 81
162 162
163 #define FRGVAR 82
164 #define FRLVAR 83
165 #define FRINDIRECT 84
166 #define DRGVAR 85
167 #define DRLVAR 86
168 #define DRINDIRECT 87
169 #define LRGVAR 88
170 #define LRLVAR 89
171 #define LRINDIRECT 90
172 #define DCONST 91
173 #define LCONST 92
174 #define DASS 93
175 #define FASS 94
176 #define LASS 95
177 #define SHASS 96
178
179 #define I2D 97
180 #define D2I 98
181
163 #define US 1 182 #define US 1
164 #define AS 100 183 #define AS 200
184 #define DOP 300
165 185
166 #define FILERR 1 186 #define FILERR 1
167 #define DCERR 2 187 #define DCERR 2
168 #define STERR 3 188 #define STERR 3
169 #define EXERR 4 189 #define EXERR 4
201 EXTERN int sym,ch,type,mode,stmode,gfree,lfree,mflag,lineno,glineno; 221 EXTERN int sym,ch,type,mode,stmode,gfree,lfree,mflag,lineno,glineno;
202 EXTERN int labelno,gpc,disp,reg_var,debug; 222 EXTERN int labelno,gpc,disp,reg_var,debug;
203 EXTERN int symval,args,init_vars,heap[HEAPSIZE]; 223 EXTERN int symval,args,init_vars,heap[HEAPSIZE];
204 EXTERN int blabel,clabel,dlabel,cslabel,ilabel,control,ac,ac2,lsrc,chk,asmf; 224 EXTERN int blabel,clabel,dlabel,cslabel,ilabel,control,ac,ac2,lsrc,chk,asmf;
205 EXTERN int MAX_REGISTER_VAR; 225 EXTERN int MAX_REGISTER_VAR;
226 EXTERN double dsymval;
206 227
207 EXTERN unsigned hash; 228 EXTERN unsigned hash;
208 229
209 EXTERN int chsave; 230 EXTERN int chsave;
210 EXTERN char *chptrsave; 231 EXTERN char *chptrsave;
211 EXTERN char linebuf[LBUFSIZE],namebuf[LBUFSIZE],*chptr; 232 EXTERN char linebuf[LBUFSIZE],namebuf[LBUFSIZE],*chptr;
212 EXTERN char *name,*cheapp,**av,/*obuf[320],*/*sptr,escape(void); 233 EXTERN char *name,*cheapp,**av,/*obuf[320],*/*sptr,escape(void);
213 EXTERN int arg_offset,stat_no,size_of_int,disp_offset,endian,csvalue1; 234 EXTERN int arg_offset,stat_no,size_of_int,disp_offset,endian,csvalue1;
214 EXTERN int code_arg_offset; 235 EXTERN int code_arg_offset;
236 EXTERN int size_of_double,size_of_float,size_of_longlong;
215 EXTERN int retlabel,retpending,retcont; 237 EXTERN int retlabel,retpending,retcont;
216 EXTERN int arglist; 238 EXTERN int arglist;
217 239
218 EXTERN FILE *obuf; 240 EXTERN FILE *obuf;
219 241
232 EXTERN char *macropp,macro_buf[MACROSIZE]; 254 EXTERN char *macropp,macro_buf[MACROSIZE];
233 255
234 extern void error(int n); 256 extern void error(int n);
235 extern int size(int t); 257 extern int size(int t);
236 extern int scalar(int t); 258 extern int scalar(int t);
259 extern int dlist2(int e1, double e2);
237 extern int list2(int e1, int e2); 260 extern int list2(int e1, int e2);
238 extern int list3(int e1, int e2, int e3); 261 extern int list3(int e1, int e2, int e3);
239 extern int list4(int e1, int e2, int e3,int e4); 262 extern int list4(int e1, int e2, int e3,int e4);
240 extern int reverse0(int t1); 263 extern int reverse0(int t1);
241 extern int assign_data(int e, int t, NMTBL *n,int offset); 264 extern int assign_data(int e, int t, NMTBL *n,int offset);
250 #define cadr(e) (heap[((int)(e))+1]) 273 #define cadr(e) (heap[((int)(e))+1])
251 274
252 #define caddr(e) (heap[((int)(e))+2]) 275 #define caddr(e) (heap[((int)(e))+2])
253 276
254 #define cadddr(e) (heap[((int)(e))+3]) 277 #define cadddr(e) (heap[((int)(e))+3])
278
279 #define dcadr(e) (*(double*)&heap[((int)(e))+1])
280 #define dcaddr(e) (*(double*)&heap[((int)(e))+2])
255 281
256 #include "conv/conv.h" 282 #include "conv/conv.h"
257 #include "conv/c.h" 283 #include "conv/c.h"
258 /* 284 /*
259 #include "conv/c2cbc.h" 285 #include "conv/c2cbc.h"