summaryrefslogtreecommitdiffstats
path: root/test/test1.t
blob: af9d688885328e0fca6bacccc78db86f025e290b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
fun fib[a]
	if a < 2
		@1
	end
	@( call fib[a-1] + call fib[a-2] )
end

# main function
fun main[]
	sum = 0
	i = 0
	while (i < 10)
		sum = sum + call fib[i]
		i = i + 1
	end
	@sum
end