mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 17:50:22 +00:00
samples: add Terra samples
source: https://github.com/zdevito/terra/tree/master/tests
This commit is contained in:
22
samples/Terra/lvaluequote.t
Normal file
22
samples/Terra/lvaluequote.t
Normal file
@@ -0,0 +1,22 @@
|
||||
|
||||
|
||||
checkl = macro(function(a)
|
||||
assert(a:islvalue())
|
||||
return a
|
||||
end)
|
||||
|
||||
checkr = macro(function(a)
|
||||
assert(not a:islvalue())
|
||||
return a
|
||||
end)
|
||||
|
||||
|
||||
terra testit()
|
||||
|
||||
var a = checkr(4)
|
||||
var b = checkr(checkl(a) + 3)
|
||||
var c = checkl([quote var d = 5 in d end])
|
||||
return a + b + c
|
||||
end
|
||||
|
||||
assert(4+7+5 == testit())
|
||||
Reference in New Issue
Block a user