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

Firth test batch and associated fixes

Browse source
This commit is contained in:
Étienne Fildadut 2023-12-31 14:30:14 +01:00
parent aa8dfbd498
commit 409a2e7095
22 changed files with 516 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
anselme/stdlib/conditionals.lua
View file

@ -1,6 +1,8 @@
local ast = require("anselme.ast")
local ArgumentTuple, Nil, Boolean, Identifier, Return = ast.ArgumentTuple, ast.Nil, ast.Boolean, ast.Identifier, ast.Return
local resume_manager = require("anselme.state.resume_manager")
local if_identifier = Identifier:new("_if_status")
local if_symbol = if_identifier:to_symbol()
@ -20,7 +22,7 @@ return {
{
"_~_", "(condition, expression)", function(state, condition, expression)
ensure_if_variable(state)
if condition:truthy() then
if condition:truthy() or resume_manager:resuming(state) then--expression:contains_current_resume_target(state) then TODO fix
set_if_variable(state, true)
return expression:call(state, ArgumentTuple:new())
else
@ -33,11 +35,11 @@ return {
"~_", "(expression)",
function(state, expression)
ensure_if_variable(state)
if last_if_success(state) then
return Nil:new()
else
if not last_if_success(state) or resume_manager:resuming(state) then--expression:contains_current_resume_target(state) then TODO fix
set_if_variable(state, true)
return expression:call(state, ArgumentTuple:new())
else
return Nil:new()
end
end
},