Mercurial > hg > CbC > old > device
comparison mc-parse.c @ 895:e9ba80b0827d
ato mou sukoshi...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 06 Apr 2014 17:11:44 +0900 |
parents | 1408a5f1676f |
children | d712ee10feb7 |
comparison
equal
deleted
inserted
replaced
894:989bdd85e8af | 895:e9ba80b0827d |
---|---|
49 #endif | 49 #endif |
50 #if FLOAT_CODE | 50 #if FLOAT_CODE |
51 extern double strtod(const char *nptr, char **endptr); | 51 extern double strtod(const char *nptr, char **endptr); |
52 #endif | 52 #endif |
53 | 53 |
54 int parse_mode = 1; // generate parse tree for all code | 54 int parse_mode = 0; // generate parse tree for all code |
55 | 55 |
56 static int HEAP_REPORT = 0; | 56 static int HEAP_REPORT = 0; |
57 static int lfree_type_limit; // debugging purpose | 57 static int lfree_type_limit; // debugging purpose |
58 // list of local declared type have to be | 58 // list of local declared type have to be |
59 // keep | 59 // keep |
1558 /* | 1558 /* |
1559 data declaration | 1559 data declaration |
1560 a[] = {,,,,}; | 1560 a[] = {,,,,}; |
1561 */ | 1561 */ |
1562 | 1562 |
1563 #define LOCAL_STRUCT_INIT_STATIC 1 | 1563 #define LOCAL_STRUCT_INIT_STATIC 0 |
1564 | 1564 |
1565 static int | 1565 static int |
1566 decl_data_field(int type1,int v,int offset) | 1566 decl_data_field(int type1,int v,int offset) |
1567 { | 1567 { |
1568 int t1,t2,period=0; | 1568 int t1,t2,period=0; |
4160 local_struct_static(e1); | 4160 local_struct_static(e1); |
4161 #else | 4161 #else |
4162 decl_data_field(type,e1,0); | 4162 decl_data_field(type,e1,0); |
4163 #endif | 4163 #endif |
4164 } | 4164 } |
4165 if (mode==STAT && decl_str_init) gen_delayed_decl_data(e1,0); | |
4165 if (init_vars && mode!=LDECL) { | 4166 if (init_vars && mode!=LDECL) { |
4166 emit_init_vars(); | 4167 emit_init_vars(); |
4167 } | 4168 } |
4168 conv->rc_(); | 4169 conv->rc_(); |
4169 checksym(RC); | 4170 checksym(RC); |