1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
|
local T = require 'pl.text'
local utils = require 'pl.utils'
local Template = T.Template
local asserteq = require 'pl.test'.asserteq
local OrderedMap = require 'pl.OrderedMap'
local template = require 'pl.template'
local t = [[
# for i = 1,3 do
print($(i+1))
# end
]]
asserteq(template.substitute(t),[[
print(2)
print(3)
print(4)
]])
t = [[
> for i = 1,3 do
print(${i+1})
> end
]]
asserteq(template.substitute(t,{_brackets='{}',_escape='>'}),[[
print(2)
print(3)
print(4)
]])
t = [[
#@ for i = 1,3 do
print(@{i+1})
#@ end
]]
asserteq(template.substitute(t,{_brackets='{}',_escape='#@',_inline_escape='@'}),[[
print(2)
print(3)
print(4)
]])
--- iteration using pairs is usually unordered. But using OrderedMap
--- we can get the exact original ordering.
t = [[
# for k,v in pairs(T) do
"$(k)", -- $(v)
# end
]]
if utils.lua51 then
-- easy enough to define a general pairs in Lua 5.1
local rawpairs = pairs
function pairs(t)
local mt = getmetatable(t)
local f = mt and mt.__pairs
if f then
return f(t)
else
return rawpairs(t)
end
end
end
local Tee = OrderedMap{{Dog = 'Bonzo'}, {Cat = 'Felix'}, {Lion = 'Leo'}}
-- note that the template will also look up global functions using _parent
asserteq(template.substitute(t,{T=Tee,_parent=_G}),[[
"Dog", -- Bonzo
"Cat", -- Felix
"Lion", -- Leo
]])
|