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

25
samples/Terra/fnptrc.t Normal file
View File

@@ -0,0 +1,25 @@
C = terralib.includecstring [[
struct Foo {
int (*bar)(int);
};
int runptr(int (*bar)(int), int a) {
return bar(a);
}
]]
terra add1(a : int) return a + 1 end
terra what0()
return C.runptr(add1,1)
end
assert(what0() == 2)
terra what()
var c : C.Foo
c.bar = add1
return c.bar(1)
end
assert(what() == 2)