aboutsummaryrefslogtreecommitdiff
path: root/core/operators.nom
diff options
context:
space:
mode:
authorBruce Hill <bitbucket@bruce-hill.com>2018-04-08 16:01:18 -0700
committerBruce Hill <bitbucket@bruce-hill.com>2018-04-08 16:01:28 -0700
commit680006b25ac9d6f0c25b5a35374a33c6047b21c1 (patch)
treea4e28de1cca627ebf2b869563d376ad3ddacd831 /core/operators.nom
parentfd621a1062c12b808efd7f8adf1957e0fe978ecc (diff)
Switched to use "." syntax.
Diffstat (limited to 'core/operators.nom')
-rw-r--r--core/operators.nom14
1 files changed, 7 insertions, 7 deletions
diff --git a/core/operators.nom b/core/operators.nom
index 2015a57..7d3f79f 100644
--- a/core/operators.nom
+++ b/core/operators.nom
@@ -48,11 +48,11 @@ immediately:
immediately:
compile [%var <- %value] to:
lua> "local \%var_lua = nomsu:tree_to_lua(\%var);"
- assume (%var_lua's "expr") or barf "Invalid target for assignment: \(%var's source code)"
+ assume %var_lua.expr or barf "Invalid target for assignment: \(%var's source code)"
lua> "local \%value_lua = nomsu:tree_to_lua(\%value);"
- assume (%value_lua's "expr") or barf "Invalid value for assignment: \(%value's source code)"
+ assume %value_lua.expr or barf "Invalid value for assignment: \(%value's source code)"
return {..}
- statements:"\(%var_lua's "expr") = \(%value_lua's "expr");"
+ statements:"\(%var_lua.expr) = \(%value_lua.expr);"
locals: =lua "(\%var.type == 'Var' and {\%var_lua.expr} or nil)"
immediately:
@@ -82,15 +82,15 @@ immediately:
immediately:
compile [export %var <- %value] to:
%var_lua <- (%var as lua)
- assume (%var_lua's "expr") or barf "Invalid target for assignment: \(%var's source code)"
+ assume %var_lua.expr or barf "Invalid target for assignment: \(%var's source code)"
%value_lua <- (%value as lua)
- assume (%value_lua's "expr") or barf "Invalid value for assignment: \(%value's source code)"
- return {statements:"\(%var_lua's "expr") = \(%value_lua's "expr");"}
+ assume %value_lua.expr or barf "Invalid value for assignment: \(%value's source code)"
+ return {statements:"\(%var_lua.expr) = \(%value_lua.expr);"}
compile [exporting %exported %body] to:
%body_lua <- (%body as lua)
%leftover_locals <- (=lua "{unpack(\%body_lua.locals or {})}")
- assume ((%exported's "type") = "List") or barf ".."
+ assume (%exported.type = "List") or barf ".."
Expected a List for the export part of 'exporting' statement, not \(%exported's source code)
lua> ".."
for i, item in ipairs(\%exported.value) do