diff options
Diffstat (limited to 'server/src/core/vm.lua')
| -rw-r--r-- | server/src/core/vm.lua | 45 |
1 files changed, 22 insertions, 23 deletions
diff --git a/server/src/core/vm.lua b/server/src/core/vm.lua index a0f82458..054e111f 100644 --- a/server/src/core/vm.lua +++ b/server/src/core/vm.lua @@ -3,7 +3,7 @@ local library = require 'core.library' local createValue = require 'core.value' local DefaultSource = { start = 0, finish = 0 } -local GlobalChild +local GlobalValue -- 根据赋值顺序决定遍历顺序的表 local function orderTable() @@ -1435,36 +1435,35 @@ function mt:doActions(actions) end end +function mt:getGlobalValue() + if GlobalValue then + return GlobalValue + end + GlobalValue = self:createValue('table') + GlobalValue.GLOBAL = true + for name, lib in pairs(library.global) do + local field = GlobalValue:createField(name) + local value = self:getLibValue(lib, 'global') + self:setValue(field, value) + end + return GlobalValue +end + function mt:createEnvironment() self.scope.block = { start = 0, finish = math.maxinteger } -- 整个文件是一个函数 self.chunk.func = self:buildFunction() self.results.main = self.chunk.func -- 隐藏的上值`_ENV` - local parent = self:createLocal('_ENV') - parent.hide = true - local envValue = self:setValue(parent, self:buildTable()) - -- _ENV 有个特殊标记 - envValue.ENV = true + local evnField = self:createLocal('_ENV') + evnField.hide = true -- 隐藏的参数`...` self:createDots(1) - - -- 设置全局变量 - if not GlobalChild then - for name, lib in pairs(library.global) do - local field = envValue:createField(name) - local value = self:getLibValue(lib, 'global') - value = self:setValue(field, value) - end - GlobalChild = envValue.child - end - envValue.child = readOnly(GlobalChild) - - -- 设置 _G 使用 _ENV 的child - local g = envValue:getField('_G') - local gValue = self:getValue(g) - gValue.child = envValue.child - self.env = envValue + -- 全局变量`_G` + local globalValue = self:getGlobalValue() + -- 使用_G初始化_ENV + self:setValue(evnField, globalValue) + self.env = globalValue end local function compile(ast, lsp, uri) |