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

Store tags in a regular Anselme list

Browse source
This commit is contained in:
Étienne Fildadut 2021-12-03 01:16:35 +01:00
parent 0f89307d5f
commit 14bf0c2b06
1 changed files with 12 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

20
interpreter/common.lua
View file

@ -1,5 +1,6 @@
local atypes, ltypes local atypes, ltypes
local eval, run_block local eval, run_block
local common
local function post_process_text(state, text) local function post_process_text(state, text)
-- remove trailing spaces -- remove trailing spaces
@ -26,9 +27,12 @@ local function post_process_text(state, text)
end end
end end
end end
-- convert tags to lua
for _, t in ipairs(text) do
t.tags = common.to_lua(t.tags)
end
end end
local common
common = { common = {
--- merge interpreter state with global state --- merge interpreter state with global state
merge_state = function(state) merge_state = function(state)
@ -198,18 +202,18 @@ common = {
tags = { tags = {
--- push new tags on top of the stack, from Anselme values --- push new tags on top of the stack, from Anselme values
push = function(self, state, val) push = function(self, state, val)
local new = {} local new = { type = "list", value = {} }
-- copy -- copy
local last = self:current(state) local last = self:current(state)
for k,v in pairs(last) do new[k] = v end for _, v in ipairs(last.value) do table.insert(new.value, v) end
-- merge with new values -- append new values
if val.type ~= "list" then val = { type = "list", value = { val } } end if val.type ~= "list" then val = { type = "list", value = { val } } end
for k, v in pairs(common.to_lua(val)) do new[k] = v end for _, v in ipairs(val.value) do table.insert(new.value, v) end
-- add -- add
table.insert(state.interpreter.tags, new) table.insert(state.interpreter.tags, new)
end, end,
--- same but do not merge with last stack item --- same but do not merge with last stack item
push_lua_no_merge = function(self, state, val) push_no_merge = function(self, state, val)
table.insert(state.interpreter.tags, val) table.insert(state.interpreter.tags, val)
end, end,
-- pop tag table on top of the stack -- pop tag table on top of the stack
@ -218,7 +222,7 @@ common = {
end, end,
--- return current lua tags table --- return current lua tags table
current = function(self, state) current = function(self, state)
return state.interpreter.tags[#state.interpreter.tags] or {} return state.interpreter.tags[#state.interpreter.tags] or { type = "list", value = {} }
end, end,
--- returns length of tags stack --- returns length of tags stack
len = function(self, state) len = function(self, state)
@ -366,7 +370,7 @@ common = {
-- execute in expected tag & event capture state -- execute in expected tag & event capture state
local capture_state = state.interpreter.event_capture_stack local capture_state = state.interpreter.event_capture_stack
state.interpreter.event_capture_stack = {} state.interpreter.event_capture_stack = {}
common.tags:push_lua_no_merge(state, choice.tags) common.tags:push_no_merge(state, choice.tags)
local _, e = run_block(state, choice.block) local _, e = run_block(state, choice.block)
common.tags:pop(state) common.tags:pop(state)
state.interpreter.event_capture_stack = capture_state state.interpreter.event_capture_stack = capture_state