summaryrefslogtreecommitdiff
path: root/test.toc
blob: 03b11580566366fab9720c809af0ead3ae04925b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include "std/io.toc";

f ::= fn(x :: ..) int {
  total := 0;
  for a := x {
  	  total += a as int;
  }
  total
};


main ::= fn() {
	 puti(f(1,2,3));
	 puti(f(1,2,3,4));
	 puti(f(1,2,3,5,6));
	 puti(f(1,2,3,1,2));
};

main();