1 files changed, 34 insertions, 0 deletions
diff --git a/Tools/LuaMacro/tests/rawhash.lua b/Tools/LuaMacro/tests/rawhash.lua
new file mode 100644
index 0000000..fdd86b3
--- /dev/null
+++ b/Tools/LuaMacro/tests/rawhash.lua
@@ -0,0 +1,34 @@
+local M = require 'macro'
+
+local concat = table.concat
+
+M.define ('Tab',function(get)
+    get() -- skip space
+    -- 'Tab' acts as a 'type' followed by a variable list
+    local vars,endt = get:idens (function(t,v)
+        return t == '=' or (t == 'space' and v:find '\n')
+    end)
+    local values = {}
+    for i,name in ipairs(vars) do
+        M.define_scoped(name,function(get,put)
+            local t,v = get:peek(1)
+            if t ~= '[' then return nil, true end -- pass-through; plain var reference
+            get:expecting '['
+            local args = get:list(']','')
+            local index = args[1]
+            for i = 1,#index do
+                if index[i][1] == '#' and (i == #index or index[i+1][1] ~= 'iden') then
+                    table.insert(index,i+1,{'iden',name})
+                end
+            end
+            return '['..tostring(index)..']',true
+        end)
+        values[i] = '{}'
+    end
+    local lcal = M._interactive and '' or 'local '
+    local res = lcal..concat(vars,',')..' = '..concat(values,',')..tostring(endt)
+    return res
+end)
+
+
+