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

26
samples/Terra/anon.t Normal file
View File

@@ -0,0 +1,26 @@
local test = require("test")
local Num = int
local fib =
terra(a : Num) : Num
var i,c,p = 0,1,1
while i < a do
c,p = c + p,c
i = i + 1
end
return c
end
function fib2(a)
local i,c,p = 0,1,1
while i < a do
c,p = c + p,c
i = i + 1
end
return c
end
for i = 0,10 do
print(fib(i))
test.eq(fib(i),fib2(i))
end