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

[qfcc] Handle quaternion (in)equality tests

Browse source 
I'm surprised this didn't come up earlier.
This commit is contained in:
Bill Currie 2024-02-17 23:55:44 +09:00
parent 0e7c80e9fe
commit 1b4db639af
1 changed files with 19 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
tools/qfcc/source/expr_binary.c
View file

@ -63,6 +63,7 @@ static const expr_t *double_compare (int op, const expr_t *e1,
const expr_t *e2);
static const expr_t *uint_compare (int op, const expr_t *e1, const expr_t *e2);
static const expr_t *vector_compare (int op, const expr_t *e1, const expr_t *e2);
static const expr_t *quat_compare (int op, const expr_t *e1, const expr_t *e2);
static const expr_t *vector_dot (int op, const expr_t *e1, const expr_t *e2);
static const expr_t *vector_multiply (int op, const expr_t *e1, const expr_t *e2);
static const expr_t *vector_scale (int op, const expr_t *e1, const expr_t *e2);
@ -288,8 +289,8 @@ static expr_type_t quat_quat[] = {
{'-', &type_quaternion,
.anticommute = fp_com_add},
{'*', &type_quaternion, .associative = always, .true_op = QMUL},
{EQ, &type_int},
{NE, &type_int},
{EQ, .process = quat_compare},
{NE, .process = quat_compare},
{0, 0}
};
@ -1008,6 +1009,22 @@ vector_compare (int op, const expr_t *e1, const expr_t *e2)
return new_horizontal_expr (hop, e, &type_int);
}
static const expr_t *
quat_compare (int op, const expr_t *e1, const expr_t *e2)
{
if (options.code.progsversion < PROG_VERSION) {
expr_t *e = new_binary_expr (op, e1, e2);
e->expr.type = &type_int;
return e;
}
int hop = op == EQ ? '&' : '|';
e1 = new_alias_expr (&type_vec4, e1);
e2 = new_alias_expr (&type_vec4, e2);
expr_t *e = new_binary_expr (op, e1, e2);
e->expr.type = &type_ivec4;
return new_horizontal_expr (hop, e, &type_int);
}
static const expr_t *
vector_dot (int op, const expr_t *e1, const expr_t *e2)
{