samples: add Terra samples

source: https://github.com/zdevito/terra/tree/master/tests
This commit is contained in:
Bayu Aldi Yansyah
2016-01-28 11:22:27 +07:00
parent e32a837fb2
commit 9b8b39f444
370 changed files with 11921 additions and 0 deletions

16
samples/Terra/fact.t Normal file
View File

@@ -0,0 +1,16 @@
local test = require("test")
local Num = int
local terra fact(a : Num) : Num
var c,i = 1,1
while i <= a do
c = c * i
i = i + 1
end
return c
end
test.eq(fact(1),1)
test.eq(fact(2),2)
test.eq(fact(3),6)