qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-03-21 18:01:15 +00:00
Code Issues Projects Releases Packages Wiki Activity

fix "for (;;)" etc

Browse source
This commit is contained in:
Bill Currie 2004-03-30 02:31:02 +00:00
parent 5dcdd2c194
commit 25ac9cb07b
1 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
tools/qfcc/source/qc-parse.y
View file

@ -920,11 +920,20 @@ statement
expr_t *tl = new_label_expr ();
expr_t *fl = break_label;
expr_t *l1 = 0;
expr_t *t;
int line = pr.source_line;
string_t file = pr.source_file;
pr.source_line = $7->line;
pr.source_file = $7->file;
if ($9)
t = $9;
else if ($7)
t = $7;
else if ($5)
t = $5;
else
t = continue_label;
pr.source_line = t->line;
pr.source_file = t->file;
restore_local_inits ($11);
free_local_inits ($11);
@ -950,6 +959,7 @@ statement
append_expr ($$, $7);
}
} else {
append_expr ($$, new_unary_expr ('g', tl));
append_expr ($$, fl);
}
break_label = $2;