Mercurial > hg > CbC > old > device
annotate mc-parse.h @ 441:1edaa643458e
*** empty log message ***
author | kono |
---|---|
date | Sat, 20 Nov 2004 20:07:17 +0900 |
parents | a531bbf572e3 |
children | 5ec2a88b9f4d |
rev | line source |
---|---|
327 | 1 /* for mc-parse.c */ |
2 | |
3 extern int sym,type,mode,stmode; | |
4 extern int labelno,gpc,disp; | |
357 | 5 extern int args,init_vars; |
327 | 6 extern int cslabel,control; |
7 extern NMTBL *nptr,*gnptr; | |
8 extern NMTBL *fnptr; | |
9 extern int gtypedefed; | |
10 extern int retlabel,retpending,retcont; | |
438
626d705471d5
Unexecuted code in conditional. Lazy jmp code generation.
kono
parents:
426
diff
changeset
|
11 extern int pending_jmp; |
327 | 12 extern int chk; |
13 extern int bit_field_disp; | |
14 extern int fields; | |
15 extern int struct_return; | |
16 extern int lastexp; | |
17 extern int debug; | |
328 | 18 extern int decl_str_init; |
19 | |
346 | 20 /* |
21 STRING nptr | |
22 MACRO nptr | |
23 FMACRO nptr | |
24 RESERVE nptr | |
25 TAG nptr | |
26 FIELD nptr | |
27 TYPE nptr | |
28 */ | |
29 | |
30 typedef struct cheap | |
31 { | |
32 char *ptr; | |
33 char *last; | |
34 char *first; | |
35 struct cheap *next; | |
36 } CHEAP; | |
37 | |
327 | 38 |
39 /* used in mc-macro.c */ | |
40 | |
41 extern int asmf; | |
42 extern int ch; | |
43 extern int chptrsave; | |
44 extern int chsave; | |
346 | 45 extern char linebuf[LBUFSIZE],*chptr; |
327 | 46 extern int glineno; |
47 extern int in_comment; | |
48 extern int in_quote; | |
49 extern int lfree; | |
50 extern int lineno; | |
51 extern int lsrc; | |
52 extern char *include_path[MAX_INCLUDE_PATH_COUNT]; | |
53 | |
54 /* used in mc-code-* */ | |
55 | |
56 extern NMTBL null_nptr; | |
57 | |
346 | 58 extern char * make_filename_with_extension(char *filename,char *ext); |
59 | |
327 | 60 /* used in mc-switch */ |
61 | |
62 extern void free_glist3(int e1); | |
383 | 63 extern void free_glist3_a(int e1); |
327 | 64 extern int csvalue1; |
65 extern int blabel,dlabel; | |
66 | |
67 /* used in mc-tree.c */ | |
68 | |
69 extern int typedefed; | |
70 | |
71 /* global variable end */ | |
72 | |
73 extern void free_glist2(int e1); | |
74 | |
75 /* used in mc-codegen.c */ | |
76 | |
77 extern NMTBL * anonymous_nptr();; | |
78 extern int append4(int p,int a1,int a2,int a3); | |
79 extern void display_ntable(NMTBL *n, char *s); | |
355 | 80 extern NMTBL * lsearch(char *name,int sc); |
327 | 81 #if FLOAT_CODE |
440 | 82 extern int dlist2(int e1, double d1); |
327 | 83 #endif |
84 extern void error(int n); | |
85 extern int glist2(int e1,int e2); | |
86 extern int glist3(int e1,int e2,int e3); | |
87 | |
88 extern int insert_ascend(int p,int e,int eq()); | |
89 extern int length(int list); | |
90 extern int list2(int e1, int e2); | |
91 extern int list3(int e1, int e2, int e3); | |
92 extern int list4(int e1, int e2, int e3, int e4); | |
93 extern void extern_define(char *s,int d,int type,int use); | |
94 | |
95 #if LONGLONG_CODE | |
96 extern int llist2(int e1, long long d1); | |
97 #endif | |
98 extern int neqname(char *p,char *q); | |
347 | 99 extern NMTBL *new_static_name(char *name,int delimit); |
327 | 100 extern int reverse0(int t1); |
101 extern int size(int t); | |
102 | |
103 /* used in mc-macro.c */ | |
104 | |
346 | 105 extern struct cheap *cheap; |
350 | 106 |
107 extern NMTBL *get_name(char *name,int *i,int mode); | |
108 #define DEF 1 | |
109 #define NONDEF 2 | |
110 | |
349 | 111 extern NMTBL * get_name_from_chptr(); |
347 | 112 extern NMTBL *name_space_search(NMTBL *ns,int sc); |
346 | 113 |
327 | 114 extern int getsym(int sc); |
115 extern int getch(void); | |
116 extern int skipspc(void); | |
117 extern void copy_current_file_dir(char *name); | |
118 extern int expr(int noconv); | |
119 | |
120 extern int alpha(int c); | |
121 extern int digit(int c); | |
359 | 122 extern void enter_scope(); |
123 extern void leave_scope(); | |
124 extern NMTBL *make_local_scope(); | |
327 | 125 |
346 | 126 extern struct cheap * increment_cheap(struct cheap *cheap,char **save); |
127 extern void save_cheap(struct cheap *scheap,struct cheap *cheap); | |
128 extern struct cheap * reset_cheap(struct cheap *scheap); | |
129 | |
327 | 130 /* end */ |