From 7f30fb293f11744eaab6935e791c5aa993411722 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Fri, 22 Mar 2019 14:25:18 -0700 Subject: Fixed a bunch of compatibility issues that made upgrading really slow, especially when upgrading across many versions. --- lib/compatibility/4.11.nom | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lib/compatibility/4.11.nom') diff --git a/lib/compatibility/4.11.nom b/lib/compatibility/4.11.nom index d5a158b..e263c1e 100644 --- a/lib/compatibility/4.11.nom +++ b/lib/compatibility/4.11.nom @@ -9,7 +9,7 @@ use "compatibility/compatibility" ### Overhaul of function literals: upgrade action "call 1 with" to "4.11" via - for ($tree $end_version): + for $tree: $tree2 = {.type = "Action", .source = $tree.source, .1 = $tree.2} for ($i = $arg) in $tree.4: $tree2.($i + 1) = $arg @@ -18,7 +18,7 @@ upgrade action ->$yield_value to "4.11" as (yield $yield_value) ### Replace set {$x:1, $y:2} with [$x, $y] = [1, 2] upgrade action "set" to "4.11" via - for ($tree $end_version): + for $tree: [$lhs, $rhs] = [\[], \[]] $lhs.source = $tree.2.source $rhs.source = $tree.2.source @@ -95,4 +95,4 @@ upgrade action [ upgrade action [ unless none of $items $body else $else unless none of $items then $body else $else -] to "4.11" as (if (any of $items) $body else $else) \ No newline at end of file +] to "4.11" as (if (any of $items) $body else $else) -- cgit v1.2.3