mirror of
https://github.com/Reuh/anselme.git
synced 2025-10-27 16:49:31 +00:00
Étienne Reuh Fildadut
e71bff9562
Previous system linked the variable name with the saved value, meaning the variable could not be renamed or moved outside the global scope. Instead we propose to store all persistent values in a global table, identifying each by a key. To still allow nice manipulation with identifiers, the alias syntax replace the persistent syntax for symbols - an aliases symbol will act as if a function call was used in place of the identifier when it appear.
84 lines
1.8 KiB
Lua
84 lines
1.8 KiB
Lua
local ast = require("ast")
|
|
local Identifier, String
|
|
|
|
local operator_priority = require("common").operator_priority
|
|
|
|
local Symbol
|
|
Symbol = ast.abstract.Node {
|
|
type = "symbol",
|
|
|
|
string = nil,
|
|
constant = nil, -- bool
|
|
type_check = nil, -- exp
|
|
|
|
alias = nil, -- bool
|
|
exported = nil, -- bool
|
|
|
|
confined_to_branch = nil, -- bool
|
|
|
|
init = function(self, str, modifiers)
|
|
modifiers = modifiers or {}
|
|
self.string = str
|
|
self.constant = modifiers.constant
|
|
self.type_check = modifiers.type_check
|
|
self.alias = modifiers.alias
|
|
self.confined_to_branch = modifiers.confined_to_branch
|
|
self.exported = modifiers.exported
|
|
if self.type_check then
|
|
self.format_priority = operator_priority["_::_"]
|
|
end
|
|
end,
|
|
|
|
_eval = function(self, state)
|
|
return self:with {
|
|
type_check = self.type_check and self.type_check:eval(state)
|
|
}
|
|
end,
|
|
|
|
with = function(self, modifiers)
|
|
modifiers = modifiers or {}
|
|
for _, k in ipairs{"constant", "type_check", "alias", "exported", "confined_to_branch"} do
|
|
if modifiers[k] == nil then
|
|
modifiers[k] = self[k]
|
|
end
|
|
end
|
|
return Symbol:new(self.string, modifiers)
|
|
end,
|
|
|
|
_hash = function(self)
|
|
return ("symbol<%q>"):format(self.string)
|
|
end,
|
|
|
|
_format = function(self, state, prio, ...)
|
|
local s = ":"
|
|
if self.constant then
|
|
s = s .. ":"
|
|
end
|
|
if self.alias then
|
|
s = s .. "&"
|
|
end
|
|
if self.exported then
|
|
s = s .. "@"
|
|
end
|
|
s = s .. self.string
|
|
if self.type_check then
|
|
s = s .. "::" .. self.type_check:format_right(state, operator_priority["_::_"], ...)
|
|
end
|
|
return s
|
|
end,
|
|
|
|
to_lua = function(self, state)
|
|
return self.string
|
|
end,
|
|
to_identifier = function(self)
|
|
return Identifier:new(self.string)
|
|
end,
|
|
to_string = function(self)
|
|
return String:new(self.string)
|
|
end
|
|
}
|
|
|
|
package.loaded[...] = Symbol
|
|
Identifier, String = ast.Identifier, ast.String
|
|
|
|
return Symbol
|