mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
21 lines
182 B
Perl
21 lines
182 B
Perl
|
|
|
|
function makeloop(N,body)
|
|
return quote
|
|
for i = 0, N do
|
|
body
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
terra stuff()
|
|
var a = 0;
|
|
[makeloop(10,quote
|
|
a = a + 1
|
|
end)]
|
|
return a
|
|
end
|
|
|
|
|
|
print(stuff()) |