Reuh/anselme
1
0
Fork 0
mirror of https://github.com/Reuh/anselme.git synced 2025-10-28 00:59:31 +00:00
Code Releases Activity

ArgumentTuple cleanup

Browse source
This commit is contained in:
Étienne Fildadut 2023-12-23 00:22:00 +01:00
parent fe351b5ca4
commit ffadc0dd69
12 changed files with 88 additions and 105 deletions
Download patch file Download diff file Expand all files Collapse all files

7
ast/AttachBlock.lua
View file

@ -1,7 +1,7 @@
local ast = require("ast")
local Identifier, Quote
local attached_block_identifier
local attached_block_identifier, attached_block_symbol
local AttachBlock = ast.abstract.Node {
type = "attach block",
@ -26,7 +26,7 @@ local AttachBlock = ast.abstract.Node {
_eval = function(self, state)
state.scope:push_partial(attached_block_identifier)
state.scope:define(attached_block_identifier:to_symbol(), Quote:new(self.block)) -- _ is always wrapped in a Call when it appears
state.scope:define(attached_block_symbol, Quote:new(self.block)) -- _ is always wrapped in a Call when it appears
local exp = self.expression:eval(state)
state.scope:pop()
@ -35,7 +35,7 @@ local AttachBlock = ast.abstract.Node {
_prepare = function(self, state)
state.scope:push_partial(attached_block_identifier)
state.scope:define(attached_block_identifier:to_symbol(), Quote:new(self.block))
state.scope:define(attached_block_symbol, Quote:new(self.block))
self.expression:prepare(state)
state.scope:pop()
end
@ -45,5 +45,6 @@ package.loaded[...] = AttachBlock
Identifier, Quote = ast.Identifier, ast.Quote
attached_block_identifier = Identifier:new("_")
attached_block_symbol = attached_block_identifier:to_symbol()
return AttachBlock