qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-01-31 13:10:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

mark used constants as used

Browse source
This commit is contained in:
Bill Currie 2007-05-13 08:20:19 +00:00 committed by Jeff Teunissen
parent b356f1cbd4
commit c81c074660
1 changed files with 12 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
tools/qfcc/source/expr.c
View file

@ -604,22 +604,26 @@ is_constant (expr_t *e)
expr_t *
constant_expr (expr_t *var)
{
def_t *def;
if (var->type != ex_def || !var->e.def->constant)
return var;
switch (var->e.def->type->type) {
def = var->e.def;
def->used = 1;
switch (def->type->type) {
case ev_string:
return new_string_expr (G_GETSTR (var->e.def->ofs));
return new_string_expr (G_GETSTR (def->ofs));
case ev_float:
return new_float_expr (G_FLOAT (var->e.def->ofs));
return new_float_expr (G_FLOAT (def->ofs));
case ev_vector:
return new_vector_expr (G_VECTOR (var->e.def->ofs));
return new_vector_expr (G_VECTOR (def->ofs));
case ev_field:
return new_field_expr (G_INT (var->e.def->ofs), var->e.def->type,
var->e.def);
return new_field_expr (G_INT (def->ofs), def->type, def);
case ev_integer:
return new_integer_expr (G_INT (var->e.def->ofs));
return new_integer_expr (G_INT (def->ofs));
case ev_uinteger:
return new_uinteger_expr (G_INT (var->e.def->ofs));
return new_uinteger_expr (G_INT (def->ofs));
default:
return var;
}