From c5f8a1b0b391439648d21565d9088b9639a0a913 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Wed, 6 Feb 2019 16:07:25 -0800 Subject: [PATCH] Fixed legibility and issue with upgrade fn --- lib/compatibility/compatibility.nom | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/lib/compatibility/compatibility.nom b/lib/compatibility/compatibility.nom index c1c83d3..70b9e63 100644 --- a/lib/compatibility/compatibility.nom +++ b/lib/compatibility/compatibility.nom @@ -104,13 +104,15 @@ external: $tree = $tree, with $ ->: - if (($ is "Action" syntax tree) and $ACTION_UPGRADES.$ver.($.stub)): - $with_upgraded_args = { - : for $k = $v in $: - add $k = ($v upgraded from $start_version to $end_version) - } - set $with_upgraded_args's metatable to ($'s metatable) - return ($ACTION_UPGRADES.$ver.($.stub) $with_upgraded_args $end_version) + if ($ is "Action" syntax tree): + $(upgrade 1 to 2) = $ACTION_UPGRADES.$ver.($.stub) + if $(upgrade 1 to 2): + $with_upgraded_args = { + : for $k = $v in $: + add $k = ($v upgraded from $start_version to $end_version) + } + set $with_upgraded_args's metatable to ($'s metatable) + return (upgrade $with_upgraded_args to $end_version) if $UPGRADES.$ver: $with_upgraded_args = {