-- WARNING, this is undertested, especially in cases where mutliple
-- modules have thei own fenvs. Use at your own risks, or test/debug
-- for the whole community's benefits :)

--print'xglobal\'s args' table.print{...}

local function decl_builder(x)
   local ids, vals = unpack(x)
   local ids_as_strings = table.imap(|x| `String{x[1]}, ids)
   local decl = `Call{ +{getmetatable(getfenv()).__newglobal},
                       unpack(ids_as_strings) }
   if vals then return { decl, `Set{ ids, vals } }
   else return decl end
end

mlp.lexer:add 'global'
mlp.stat:add{ 'global', mlp.id_list, gg.onkeyword{ '=', mlp.expr_list },
   builder = decl_builder }

+{ require (-{ `String{ package.metalua_extension_prefix .. 'xglobal-runtime' } }) }