From 6d11354b3f7226a9a417ae89f53de7a225434647 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bitbucket@bruce-hill.com>
Date: Tue, 23 Jan 2018 19:22:20 -0800
Subject: Added implicit local declarations and new syntax of %var <- %value.

---
 lib/class.nom | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

(limited to 'lib/class.nom')

diff --git a/lib/class.nom b/lib/class.nom
index 06f55d8..b871798 100644
--- a/lib/class.nom
+++ b/lib/class.nom
@@ -12,7 +12,7 @@ compile [@%var] to
         end
         return "_me["..key_lua.."]";
 
-compile [set @%var = %val] to code
+compile [@%var <- %val] to code
     lua> ".."
         local val_lua = \(%val as lua);
         local key_lua = repr(\%var.value);
@@ -26,11 +26,10 @@ compile [set @%var = %val] to code
         return "_me["..key_lua.."] = "..val_lua..";";
 
 compile [object %classname %class_body] to
-    local [%methods, %class_identifier]
-    set %class_identifier = (=lua "nomsu:var_to_lua_identifier(\(%classname as value)):sub(2,-1)")
+    %class_identifier <- (=lua "nomsu:var_to_lua_identifier(\(%classname as value)):sub(2,-1)")
     if: %class_identifier is ""
-        set %class_identifier = "class"
-    set %methods = []
+        %class_identifier <- "class"
+    %methods <- []
     for %line in (%class_body's "value")
         if: (%line's "type") is "Comment"
             do next %line
-- 
cgit v1.2.3