qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-04-08 02:12:17 +00:00
Code Issues Projects Releases Packages Wiki Activity

[qfcc] Support multi-vector comparison

Browse source 
I'm not sure anything other than == or != has much meaning on anything
but scalars and pseudo scalars, but all comparisons are supported as a
simple boolean test. Any missing components are assumed to be 0. If
nothing else, it makes unit tests easier to write.
This commit is contained in:
Bill Currie 2024-02-09 12:51:00 +09:00
parent 11b247918e
commit d319ce6106
1 changed files with 57 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

57
tools/qfcc/source/expr_algebra.c
View file

@ -2662,10 +2662,67 @@ multivector_divide (const expr_t *e1, const expr_t *e2)
return mvec_gather (a, algebra);
}
static const expr_t *
component_compare (int op, const expr_t *e1, const expr_t *e2, algebra_t *alg)
{
auto t = get_type (e1 ? e1 : e2);
auto stype = alg->type;
auto vtype = vector_type (stype, type_width (t));
pr_type_t zero[type_size (vtype)];
if (!e1) {
e1 = new_value_expr (new_type_value (vtype, zero));
} else {
e1 = offset_cast (vtype, e1, 0);
}
if (!e2) {
e2 = new_value_expr (new_type_value (vtype, zero));
} else {
e2 = offset_cast (vtype, e2, 0);
}
return binary_expr (op, e1, e2);
}
static const expr_t *
algebra_compare (int op, const expr_t *e1, const expr_t *e2)
{
auto t1 = get_type (e1);
auto t2 = get_type (e2);
auto algebra = is_algebra (t1) ? algebra_get (t1) : algebra_get (t2);
auto layout = &algebra->layout;
const expr_t *a[layout->count] = {};
const expr_t *b[layout->count] = {};
e1 = mvec_expr (e1, algebra);
e2 = mvec_expr (e2, algebra);
mvec_scatter (a, e1, algebra);
mvec_scatter (b, e2, algebra);
const expr_t *cmp = nullptr;
expr_t *bool_label = nullptr;
for (int i = 0; i < layout->count; i++) {
if (a[i] || b[i]) {
auto c = component_compare (op, a[i], b[i], algebra);
if (cmp) {
bool_label = new_label_expr ();
cmp = bool_expr (AND, bool_label, cmp, c);
} else {
cmp = c;
}
}
}
return cmp;
}
const expr_t *
algebra_binary_expr (int op, const expr_t *e1, const expr_t *e2)
{
switch (op) {
case EQ:
case NE:
case LE:
case GE:
case LT:
case GT:
return algebra_compare (op, e1, e2);
case DOT:
return inner_product (e1, e2);
case WEDGE: