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

Replace checkpoint system

Browse source 
The previous system needed to store of the scope and full AST to build a Resumable object, which means that if persisted, updating the resumable script will have no effect.
The new system instead uses an anchor token and does not require any information besides the anchor name.
This commit is contained in:
Étienne Fildadut 2023-12-27 17:06:35 +01:00
parent c4636343b4
commit 56ed6c912b
21 changed files with 217 additions and 234 deletions
Download patch file Download diff file Expand all files Collapse all files

41
state/event_manager.lua
View file

@ -1,7 +1,7 @@
local class = require("class")
local ast = require("ast")
local Nil, String, List, Identifier = ast.Nil, ast.String, ast.List, ast.Identifier
local Nil, String, List, Identifier, Boolean = ast.Nil, ast.String, ast.List, ast.Identifier, ast.Boolean
-- list of event data
local event_buffer_identifier = Identifier:new("_event_buffer")
@ -11,18 +11,26 @@ local event_buffer_symbol = event_buffer_identifier:to_symbol{ confined_to_branc
local last_event_type_identifier = Identifier:new("_last_event_type")
local last_event_type_symbol = last_event_type_identifier:to_symbol{ confined_to_branch = true }
-- indicate if the next flush should be ignored for the current buffered event
local discard_next_flush_identifier = Identifier:new("_discard_next_flush")
local discard_next_flush_symbol = discard_next_flush_identifier:to_symbol{ confined_to_branch = true }
return class {
init = false,
setup = function(self, state)
state.scope:define(event_buffer_symbol, List:new(state))
state.scope:define(last_event_type_symbol, Nil:new())
state.scope:define(discard_next_flush_symbol, Nil:new())
end,
reset = function(self, state)
state.scope:set(event_buffer_identifier, List:new(state))
state.scope:set(last_event_type_identifier, Nil:new())
state.scope:set(discard_next_flush_identifier, Nil:new())
end,
-- write an event into the event buffer
-- will flush if an event of a different type is present in the buffer
write = function(self, state, event)
local current_type = state.scope:get(last_event_type_identifier):to_lua(state)
if current_type ~= nil and current_type ~= event.type then
@ -31,22 +39,33 @@ return class {
state.scope:set(last_event_type_identifier, String:new(event.type))
state.scope:get(event_buffer_identifier):insert(state, event)
end,
-- same as :write, but the buffer will be discarded instead of yielded on the next flush
write_and_discard_on_flush = function(self, state, event)
self:write(state, event)
state.scope:set(discard_next_flush_identifier, Boolean:new(true))
end,
-- flush the event buffer: build the event data and yield it
flush = function(self, state)
local last_type = state.scope:get(last_event_type_identifier):to_lua(state)
if last_type then
local last_buffer = state.scope:get(event_buffer_identifier)
local event_president = last_buffer:get(state, 1) -- elected representative of all concerned events
-- yield event data
local data = event_president:build_event_data(state, last_buffer)
coroutine.yield(last_type, data)
-- clear room for the future
state.scope:set(last_event_type_identifier, Nil:new())
state.scope:set(event_buffer_identifier, List:new(state))
-- post callback
if event_president.post_flush_callback then event_president:post_flush_callback(state, last_buffer, data) end
local discard_next_flush = state.scope:get(discard_next_flush_identifier):truthy()
if discard_next_flush then
self:reset(state)
else
local last_buffer = state.scope:get(event_buffer_identifier)
local event_president = last_buffer:get(state, 1) -- elected representative of all concerned events
-- yield event data
local data = event_president:build_event_data(state, last_buffer)
coroutine.yield(last_type, data)
-- clear room for the future
self:reset(state)
-- post callback
if event_president.post_flush_callback then event_president:post_flush_callback(state, last_buffer, data) end
end
end
end,
-- keep flushing until nothing is left (a flush may re-fill the buffer during its execution)
final_flush = function(self, state)
while state.scope:get(last_event_type_identifier):to_lua(state) do self:flush(state) end
end