aboutsummaryrefslogtreecommitdiff
path: root/tests/struct_call.ek
blob: d73dfb1385074b5703cf2fe5a975996ea6f48c6d (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
typedef i27 {}
typedef i9 {}

typedef int_pair {
	i27 a;
	i27 b;
}

extern putchar(i9 c);

add_int_pair(int_pair a, int_pair b => int_pair)
{
	return int_pair!{.a = a.a + b.a, .b = a.b + b.b};
}

add_int_pair_self(*int_pair a, *int_pair b)
{
	a*.a = a*.a + b*.a;
	a*.b = a*.b + b*.b;
}

main()
{
	mut a = int_pair!{.a = 1, .b = 2};
	mut b = int_pair!{.a = 3, .b = 4};

	mut n = add_int_pair(a, b);
	putchar('0' + n.a as i9);
	putchar('0' + n.b as i9);

	add_int_pair_self(a&, b&);

	putchar('0' + a.a as i9);
	putchar('0' + a.b as i9);
	putchar('0' + b.a as i9);
	putchar('0' + b.b as i9);
}