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

First test batch and associated fixes

Browse source 
The test runner is also nicer to use.
This commit is contained in:
Étienne Fildadut 2023-12-28 16:51:18 +01:00
parent 10084dec23
commit 82ce53be83
154 changed files with 1586 additions and 78 deletions
Download patch file Download diff file Expand all files Collapse all files

6
stdlib/conditionals.lua
View file

@ -21,9 +21,8 @@ return {
"_~_", "(condition, expression)", function(state, condition, expression)
ensure_if_variable(state)
if condition:truthy() then
local r = expression:call(state, ArgumentTuple:new())
set_if_variable(state, true)
return r
return expression:call(state, ArgumentTuple:new())
else
set_if_variable(state, false)
return Nil:new()
@ -37,9 +36,8 @@ return {
if last_if_success(state) then
return Nil:new()
else
local r = expression:call(state, ArgumentTuple:new())
set_if_variable(state, true)
return r
return expression:call(state, ArgumentTuple:new())
end
end
},

4
stdlib/tag.lua
View file

@ -1,5 +1,5 @@
local ast = require("ast")
local Tuple, Table, Struct, ArgumentTuple = ast.Tuple, ast.Table, ast.Struct, ast.ArgumentTuple
local Tuple, Table, Struct, ArgumentTuple, Nil = ast.Tuple, ast.Table, ast.Struct, ast.ArgumentTuple, ast.Nil
local tag_manager = require("state.tag_manager")
@ -14,6 +14,8 @@ return {
tags_struct = tags
elseif Table:is(tags) then
tags_struct = tags:to_struct(state)
elseif Nil:is(tags) then
tags_struct = Struct:new()
else
tags_struct = Struct:from_tuple(Tuple:new(tags)):eval(state)
end