From 811fdd685670d2eb8c6bcb9e6e103e57bf402ca8 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bitbucket@bruce-hill.com>
Date: Wed, 29 Aug 2018 15:59:30 -0700
Subject: Tweaked version 3.6 to include deprecating list append/removal
 functions in favor of using a method call style.

---
 compatibility/2.4.nom | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

(limited to 'compatibility/2.4.nom')

diff --git a/compatibility/2.4.nom b/compatibility/2.4.nom
index 2207343..4b416fb 100644
--- a/compatibility/2.4.nom
+++ b/compatibility/2.4.nom
@@ -17,20 +17,20 @@ upgrade %tree to "2.4" as:
                     (not (%line is syntax tree)):
                         compile error at %tree.source "WUT: %s"
                     (not (%line is "Action" syntax tree)):
-                        add %line to %new_lines
+                        %new_lines::add %line
                     (%line.stub is "* %"):
-                        add %line.2 to %conditions
+                        %conditions::add %line.2
                     (%line.stub == "* else %"):
-                        add (\(else %block) with vars {block:%line.3}) to %new_lines
+                        %new_lines::add (\(else %block) with vars {block:%line.3})
                     (%line.stub != "* % %"):
-                        add %line to %new_lines
+                        %new_lines::add %line
                     else:
-                        add %line.2 to %conditions
+                        %conditions::add %line.2
                         %action = %line.3
                         unless (%action is "Block" syntax tree):
                             %action = (=lua "Block(\%action.source, \%action)")
-                        add %action to %conditions
-                        add (=lua "Action(\%conditions[1].source, unpack(\%conditions))") to %new_lines
+                        %conditions::add %action
+                        %new_lines::add (=lua "Action(\%conditions[1].source, unpack(\%conditions))")
                         %conditions = []
             
             return (..)
@@ -44,20 +44,20 @@ upgrade %tree to "2.4" as:
             for %line in %body:
                 if:
                     (not (%line is "Action" syntax tree)):
-                        add %line to %new_lines
+                        %new_lines::add %line
                     (%line.stub is "* %"):
-                        add %line.2 to %values
+                        %values::add %line.2
                     (%line.stub == "* else %"):
-                        add (\(else %block) with vars {block:%line.3}) to %new_lines
+                        %new_lines::add (\(else %block) with vars {block:%line.3})
                     (%line.stub != "* % %"):
-                        add %line to %new_lines
+                        %new_lines::add %line
                     else:
-                        add %line.2 to %values
+                        %values::add %line.2
                         %action = %line.3
                         unless (%action is "Block" syntax tree):
                             %action = \(: %action)
-                        add %action to %values
-                        add (=lua "Action(\%values[1].source, unpack(\%values))") to %new_lines
+                        %values::add %action
+                        %new_lines::add (=lua "Action(\%values[1].source, unpack(\%values))")
                         %values = []
             
             return (..)
-- 
cgit v1.2.3