summaryrefslogtreecommitdiff
path: root/Tools/LuaMacro/tests/dollar.lua
blob: 954416dc62f3f9d746dc14d6266bc9d791feca3b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
local macro = require 'macro'

macro.define('$',function(get)
   local t,v = get()
   if t == 'iden' then
      return 'os.getenv("'..v..'")'
   elseif t == '(' then
      local rest = get:upto ')'
      return 'eval("'..tostring(rest)..'")'
   end
end)

return function()
    return [[
local function eval(cmd)
    local f = io.popen(cmd,'r')
    local res = f:read '*a'
    f:close()
    return res
end
]]
end