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

fix a d'oh in the param/return type checking

Browse source
This commit is contained in:
Bill Currie 2001-10-02 19:03:28 +00:00
parent dcb51dc586
commit 67635e9dd0
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -1138,6 +1138,7 @@ function_expr (expr_t *e1, expr_t *e2)
if (ftype->parm_types[i - 1] == &type_float && e->type == ex_integer) { if (ftype->parm_types[i - 1] == &type_float && e->type == ex_integer) {
e->type = ex_float; e->type = ex_float;
e->e.float_val = e->e.integer_val; e->e.float_val = e->e.integer_val;
t = &type_float;
} }
if (ftype->num_parms != -1) { if (ftype->num_parms != -1) {
if (t != ftype->parm_types[i - 1]) if (t != ftype->parm_types[i - 1])
@ -1201,6 +1202,7 @@ return_expr (function_t *f, expr_t *e)
if (f->def->type->aux_type == &type_float && e->type == ex_integer) { if (f->def->type->aux_type == &type_float && e->type == ex_integer) {
e->type = ex_float; e->type = ex_float;
e->e.float_val = e->e.integer_val; e->e.float_val = e->e.integer_val;
t = &type_float;
} }
if (f->def->type->aux_type != t) if (f->def->type->aux_type != t)
return error (e, "type mismatch for return value of %s", return error (e, "type mismatch for return value of %s",