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

Move anselme code into its own directory

Browse source
This commit is contained in:
Étienne Fildadut 2023-12-29 18:41:06 +01:00
parent 404e7dd56e
commit 5dd971ff8f
179 changed files with 603 additions and 579 deletions
Download patch file Download diff file Expand all files Collapse all files

49
stdlib/number.lua
View file

@ -1,49 +0,0 @@
local ast = require("ast")
local Boolean, Number = ast.Boolean, ast.Number
return {
{
"_<_", "(a::number, b::number)",
function(state, a, b)
if a.number < b.number then return b
else return Boolean:new(false)
end
end
},
{ "_<_", "(a::equal(false), b::number)", function(state, a, b) return Boolean:new(false) end },
{
"_<=_", "(a::number, b::number)",
function(state, a, b)
if a.number <= b.number then return b
else return Boolean:new(false)
end
end
},
{ "_<=_", "(a::equal(false), b::number)", function(state, a, b) return Boolean:new(false) end },
{
"_>_", "(a::number, b::number)",
function(state, a, b)
if a.number > b.number then return b
else return Boolean:new(false)
end
end
},
{ "_>_", "(a::equal(false), b::number)", function(state, a, b) return Boolean:new(false) end },
{
"_>=_", "(a::number, b::number)",
function(state, a, b)
if a.number >= b.number then return b
else return Boolean:new(false)
end
end
},
{ "_>=_", "(a::equal(false), b::number)", function(state, a, b) return Boolean:new(false) end },
{ "_+_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number + b.number) end },
{ "_-_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number - b.number) end },
{ "_*_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number * b.number) end },
{ "_/_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number / b.number) end },
{ "_//_", "(a::number, b::number)", function(state, a, b) return Number:new(math.floor(a.number / b.number)) end },
{ "_%_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number % b.number) end },
{ "_^_", "(a::number, b::number)", function(state, a, b) return Number:new(a.number ^ b.number) end },
{ "-_", "(a::number)", function(state, a) return Number:new(-a.number) end },
}