Mercurial > hg > CbC > old > device

comparison conv/c.c @ 327:da2e3f2d127d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
macro/codegen reorganization
author kono
date Mon, 21 Jun 2004 23:50:34 +0900
parents 25654dc29ecc
children 969089695850
comparison
equal deleted inserted replaced
326:e5d40f8c4cce 327:da2e3f2d127d
1 #define EXTERN /**/ 1 #define EXTERN /**/
2 2
3 #include <stdio.h>
3 #include "mc.h" 4 #include "mc.h"
4 5 #include "mc-parse.h"
6
7 #include "conv/conv.h"
5 #include "conv/convdef.h" 8 #include "conv/convdef.h"
6 #include "conv/c.h" 9 #include "conv/c.h"
7 10
8 extern void type_print(int type,NMTBL *nptr,FILE *out); 11 extern void type_print(int type,NMTBL *nptr,FILE *out);
9 extern void type_print1(int type,NMTBL *nptr,FILE *out,int cont); 12 extern void type_print1(int type,NMTBL *nptr,FILE *out,int cont);
10 extern void sym_print(int type,FILE *out); 13 extern void sym_print(int type,FILE *out);
11 extern NMTBL str_ret;
12 14
13 static FILE *vout,*svout; 15 static FILE *vout,*svout;
14 static FILE *null; 16 static FILE *null;
15 17
16 static void 18 static void
204 while(args) { 206 while(args) {
205 n=(NMTBL *)caddr(args); 207 n=(NMTBL *)caddr(args);
206 type_print(n->ty,n,vout); 208 type_print(n->ty,n,vout);
207 args=cadr(args); 209 args=cadr(args);
208 if(args) { 210 if(args) {
209 if(caddr(args)==(int)&str_ret) break; 211 /* if(caddr(args)==(int)&str_ret) break; */
210 fprintf(vout,","); 212 fprintf(vout,",");
211 } 213 }
212 } 214 }
213 fprintf(vout,")"); 215 fprintf(vout,")");
214 } 216 }