mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
17 lines
156 B
Perl
17 lines
156 B
Perl
|
|
a = global(0)
|
|
|
|
terra doit()
|
|
a = a + 1
|
|
end
|
|
terra geta()
|
|
return a
|
|
end
|
|
|
|
terra bar()
|
|
return doit()
|
|
end
|
|
|
|
bar()
|
|
local test = require("test")
|
|
test.eq(geta(),1) |