namespace;
include rt;

// structs returned from native functions: the stub makes the result (a new object,
// owned by the caller) and the native call fills it in. the helper library is built
// by test.sh (build/sbv.so).
fn put_f(x) { asm { x @ #1220 } return 0; }
struct Pair { int a; int b; }
struct Vec { float x; float y; }
struct Trio { int a; int b; int c; }
struct Mixed { int a; float x; }
struct Vec3 { float x; float y; float z; }
extern struct Pair mkpair(long a, long b);
extern struct Vec mkvec(double x, double y);
extern struct Trio mktrio(long a, long b, long c);
extern struct Mixed mkmixed(long a, double x);
extern struct Vec3 mkv3(double x);
int main() {
	Pair* p; Vec* v; Trio* t; Mixed* m; Vec3* w;
	rt.cload(b"build/sbv.so");
	p = mkpair(3, 4); rt.put_n(p.a); rt.put_c(32); rt.put_n(p.b); rt.put_c(32);
	v = mkvec(2.5, 3.0); put_f(v.x); rt.put_c(32); put_f(v.y); rt.put_c(32);
	t = mktrio(7, 8, 9); rt.put_n(t.a + t.b + t.c); rt.put_c(32);
	m = mkmixed(7, 0.5); rt.put_n(m.a); rt.put_c(32); put_f(m.x); rt.put_c(32);
	w = mkv3(1.5); put_f(w.z); rt.put_c(10);
	return 0;
}