quakeforge/tools/qfcc/test/vecexpr.r
Bill Currie bf53edf5e3 [qfcc] Use correct vector expression size in test
Vector expressions no longer auto-widen due to the new vector types (I
might add such later, but for now this lets the tests try to build
(minus actual fixes in qfcc)).
2022-04-29 18:12:47 +09:00

49 lines
524 B
R

#include "test-harness.h"
vector t1();
vector t2(float x);
vector
t3(float x)
{
return [x, t2(9).z, x] * 2;
}
vector
t1()
{
return [1, 2, 3];
}
vector
t2(float x)
{
return [x, x, x];
}
int
main ()
{
int ret = 0;
float x = 4;
float y = 5;
vector v;
v = t2(5);
if (v != [5, 5, 5]) {
printf("t2(5) = %v\n", v);
ret |= 1;
}
v = t3 (5);
if (v != [10, 18, 10]) {
printf("t3(5) = %v\n", v);
ret |= 1;
}
v = [x, y, 0] / 2;
if (v != [2, 2.5, 0]) {
printf("v = %v\n", v);
ret |= 1;
}
return ret;
}