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

[stdlib] Add is false, is true

This commit is contained in:
Étienne Fildadut 2024-01-09 17:23:45 +01:00
parent 95d69dfa2c
commit 51eff0627f
3 changed files with 8 additions and 4 deletions

View file

@ -57,6 +57,8 @@ return [[
:@est = stdlib.is
:@est une ancre = stdlib.is anchor
:@est un booléen = stdlib.is boolean
:@est vrai = stdlib.is true
:@est faux = stdlib.is false
:@est appelable = stdlib.is callable
:@est une fonction = stdlib.is function
:@est une liste = stdlib.is list

View file

@ -12,7 +12,7 @@ return {
end
end
},
{ "_<_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
{ "_<_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
{
"_<=_", "(a::is number, b::is number)",
function(state, a, b)
@ -21,7 +21,7 @@ return {
end
end
},
{ "_<=_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
{ "_<=_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
{
"_>_", "(a::is number, b::is number)",
function(state, a, b)
@ -30,7 +30,7 @@ return {
end
end
},
{ "_>_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
{ "_>_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
{
"_>=_", "(a::is number, b::is number)",
function(state, a, b)
@ -39,7 +39,7 @@ return {
end
end
},
{ "_>=_", "(a::equal(false), b::is number)", function(state, a, b) return Boolean:new(false) end },
{ "_>=_", "(a::is false, b::is number)", function(state, a, b) return Boolean:new(false) end },
{ "_+_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number + b.number) end },
{ "_-_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number - b.number) end },
{ "_*_", "(a::is number, b::is number)", function(state, a, b) return Number:new(a.number * b.number) end },

View file

@ -6,6 +6,8 @@ return [[
:@is number = is("number")
:@is string = is("string")
:@is boolean = is("boolean")
:@is false = $(x) !x
:@is true = $(x) !!x
:@is symbol = is("symbol")
:@is anchor = is("anchor")
:@is pair = is("pair")