summaryrefslogtreecommitdiff
path: root/test/callbig.myr
blob: 343dc2307378ad823e86ae22d52ba5e08b64e9d4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
/* checks that calls with large return values (ie, ones that don't fit in a
* register) works correctly. Should exit with 42. */
type pair = struct
	a : int
	b : int
;;

const f = {s
	-> s.a  + s.b
}

const main = {
	var s : pair
	s.a = 12
	s.b = 30
	-> f(s)
}