a

1 files changed, 42 insertions, 0 deletions

diff --git a/tests/programs/packedfields.zc b/tests/programs/packedfields.zc
new file mode 100644
index 0000000..8f6fe38
--- /dev/null
+++ b/tests/programs/packedfields.zc
@@ -0,0 +1,42 @@
+// struct fields of the sized types and f32 pack into shared words
+struct vtx { f32 x, y, z; u8 r, g, b, a; i16 id; u16 flags; int next; };
+struct pair { u8 a; int b; u8 c; };
+fn put_f(x) { asm { x @ #1220 } return 0; }
+fn sp() { put_c(32); return 0; }
+vtx gv;
+fn main() {
+	vtx v;
+	vtx* p = new(vtx);
+	pair q;
+	[3]vtx arr;
+	put_n(sizeof(vtx)); sp(); put_n(sizeof(pair)); sp();
+	v.x = 1.5; v.y = 0.1; v.z = 2; v.r = 200; v.g = 255; v.b = 300; v.a = 7; v.id = 0 - 3; v.flags = 65535; v.next = 99;
+	put_f(v.x + v.z); sp(); put_n(v.y == 0.1); sp();
+	put_n(v.r); sp(); put_n(v.g); sp(); put_n(v.b); sp(); put_n(v.a); sp(); put_n(v.id); sp(); put_n(v.flags); sp(); put_n(v.next); sp();
+	v.r += 100; v.flags++; v.id--; v.g = v.g + 1;
+	put_n(v.r); sp(); put_n(v.flags); sp(); put_n(v.id); sp(); put_n(v.g); sp();
+	p.r = 9; p.a = 8; p.id = 1000; p.next = 5; p.x = 3.25;
+	put_n(p.r); put_n(p.a); sp(); put_n(p.id); sp(); put_n(p.next); sp(); put_f(p.x); sp();
+	gv.b = 77; gv.flags = 5; put_n(gv.b); sp(); put_n(gv.flags); sp();
+	arr[1].a = 42; arr[2].r = 17; arr[1].next = 3; arr[0].id = 0 - 9;
+	put_n(arr[1].a); sp(); put_n(arr[2].r); sp(); put_n(arr[1].next); sp(); put_n(arr[0].id); sp(); put_n(arr[0].a); sp();
+	put_n(sizeof(arr)); sp();
+	q.a = 1; q.b = 123456789; q.c = 2; put_n(q.a); put_n(q.c); sp(); put_n(q.b);
+	put_c(10);
+	free(d*p);
+	second();
+	return 0;
+}
+struct rgba { u8 r, g, b, a; };
+o3 int bright(rgba* px, int n) {
+	int s = 0;
+	for (int i = 0; i < n; i++) { s += px[i].r + px[i].g + px[i].b; px[i].a = px[i].r + 1; }
+	return s;
+}
+fn second() {
+	rgba* px = new(rgba, 50);
+	for (int i = 0; i < 50; i++) { px[i].r = i; px[i].g = i * 2; px[i].b = 255 - i; }
+	put_n(bright(px, 50)); put_c(' '); put_n(px[10].a); put_c(' '); put_n(px[49].a); put_c(10);
+	free(d*px);
+	return 0;
+}