mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
18 lines
185 B
Perl
18 lines
185 B
Perl
|
|
|
|
local a = global(double)
|
|
|
|
terra getptr()
|
|
return &a
|
|
end
|
|
|
|
local b = getptr()
|
|
local c = terralib.pointertolightuserdata(b)
|
|
print(b,c,a)
|
|
|
|
terra foo(a : &&int)
|
|
|
|
end
|
|
|
|
foo(c)
|
|
print("DONE") |