aboutsummaryrefslogtreecommitdiff
path: root/lib/operators.nom
diff options
context:
space:
mode:
authorBruce Hill <bitbucket@bruce-hill.com>2017-10-19 17:00:10 -0700
committerBruce Hill <bitbucket@bruce-hill.com>2017-10-19 17:00:10 -0700
commitb98059261c173dab8d919e7f9a93d44c5de0329d (patch)
treeb7fdbfe9c746dc2f52a25e0dd2715c769a371d8c /lib/operators.nom
parent443f8c73bb67e2fb085c5595add10b98f4696805 (diff)
Abbreviated "lua code" to "lua>" and "lua expr" to "=lua" and "lua
block" to "lua do>"
Diffstat (limited to 'lib/operators.nom')
-rw-r--r--lib/operators.nom6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/operators.nom b/lib/operators.nom
index c254861..5b390e5 100644
--- a/lib/operators.nom
+++ b/lib/operators.nom
@@ -44,7 +44,7 @@ compile [%var join= %val] to code: "\(%var as lua) = \(%var as lua) .. \(%val as
compile [%var mod= %val] to code: "\(%var as lua) = \(%var as lua) % \(%val as lua);"
# Binary Operators
-lua block ".."
+lua do> ".."
|local binops = {"-","/","<","<=",">",">=","^",{"===","=="},{"!==","~="},{"mod","%"}};
|for _,op in ipairs(binops) do;
| local nomsu_alias = op;
@@ -69,7 +69,7 @@ compile [%a != %b] to: "(not nomsu.utils.equivalent(\(%a as lua), \(%b as lua)))
# Commutative Operators defined for up to 8 operands
# TODO: work out solution for commutative operators using more clever macros
-lua block ".."
+lua do> ".."
|local max_operands = 8;
|local comops = {"+","*","and","or"};
|for _,_op in ipairs(comops) do;
@@ -88,7 +88,7 @@ lua block ".."
|end;
# Chained compairsions (e.g. x < y <= z) are defined up to 3 operands
-lua block ".."
+lua do> ".."
|local max_operands = 3;
|for _,chainers in ipairs({{"<","<="},{">",">="}}) do;
| local function recurse(chainers, chain)