darkplaces/gmqcc
0
0
Fork 0
mirror of https://github.com/DarkPlacesEngine/gmqcc.git synced 2024-12-18 00:11:06 +00:00
Code Issues Projects Releases Packages Wiki Activity

Parse fixes

Browse source
This commit is contained in:
Dale Weiler 2012-04-10 00:23:28 -04:00
parent 248cd7af94
commit dfa3126233
1 changed files with 32 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

42
parse.c
View file

@ -92,12 +92,34 @@
"." , "<" , ">" , "&" , "|" ,
#endif
#define STORE(X) { \
printf(X); \
break; \
#define STORE(X) { \
int total = fill; \
while (total-->0) { \
putchar(' '); \
} \
printf(X); \
break; \
}
#define STORE1(X) { \
int total = fill; \
while (total-->0) { \
putchar(' '); \
} \
fill += 4; \
break; \
}
#define STORE2(X) { \
fill -= 4; \
int total = fill; \
while (total-->0) { \
putchar(' '); \
} \
printf(X); \
break; \
}
void parse_debug(struct parsenode *tree) {
int fill = 0;
while (tree) {
switch (tree->type) {
case PARSE_TYPE_ADD: STORE("OPERATOR: ADD \n");
@ -144,7 +166,7 @@ void parse_debug(struct parsenode *tree) {
case PARSE_TYPE_FOR: STORE("LOOP: FOR\n");
case PARSE_TYPE_DO: STORE("LOOP: DO\n");
case PARSE_TYPE_IDENT: STORE("IDENT: ???\n");
//case PARSE_TYPE_IDENT: STORE("IDENT: ???\n");
}
tree = tree->next;
}
@ -200,26 +222,26 @@ int parse(struct lex_file *file) {
token != ERROR_PREPRO && file->length >= 0) {
switch (token) {
case TOKEN_IF:
token = lex_token(file);
//token = lex_token(file);
while ((token == ' ' || token == '\n') && file->length >= 0)
token = lex_token(file);
//if (token != '(')
// error(ERROR_PARSE, "Expected `(` after if\n", "");
PARSE_TREE_ADD(PARSE_TYPE_IF);
break;
case TOKEN_ELSE:
//token = lex_token(file);
token = lex_token(file);
//while ((token == ' ' || token == '\n') && file->length >= 0)
// token = lex_token(file);
PARSE_TREE_ADD(PARSE_TYPE_ELSE);
break;
case TOKEN_FOR:
//token = lex_token(file);
//while ((token == ' ' || token == '\n') && file->length >= 0)
// token = lex_token(file);
token = lex_token(file);
while ((token == ' ' || token == '\n') && file->length >= 0)
token = lex_token(file);
//PARSE_TREE_ADD(PARSE_TYPE_FOR);
PARSE_TODO(PARSE_TYPE_FOR);