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

[qfcc] Add is_double_val check

Browse source 
I wound up not using it, but I'll probably want it eventually..
This commit is contained in:
Bill Currie 2024-08-20 15:16:25 +09:00
parent b8fe10f8a5
commit 219f2f26da
2 changed files with 15 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
tools/qfcc/include/expr.h
View file

@ -808,6 +808,7 @@ int is_quaternion_val (const expr_t *e) __attribute__((pure));
int is_int_val (const expr_t *e) __attribute__((pure));
int is_uint_val (const expr_t *e) __attribute__((pure));
int is_short_val (const expr_t *e) __attribute__((pure));
int is_double_val (const expr_t *e) __attribute__((pure));
int is_integral_val (const expr_t *e) __attribute__((pure));
int is_pointer_val (const expr_t *e) __attribute__((pure));
int is_math_val (const expr_t *e) __attribute__((pure));

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

@ -966,7 +966,20 @@ is_float_val (const expr_t *e)
if (e->type == ex_value && e->value->lltype == ev_float)
return 1;
if (e->type == ex_symbol && e->symbol->sy_type == sy_const
&& e->symbol->type->type == ev_float)
&& is_float (e->symbol->type))
return 1;
return 0;
}
int
is_double_val (const expr_t *e)
{
if (e->type == ex_nil)
return 1;
if (e->type == ex_value && e->value->lltype == ev_double)
return 1;
if (e->type == ex_symbol && e->symbol->sy_type == sy_const
&& is_double (e->symbol->type))
return 1;
return 0;
}