From a1849da175765350e013bdeecfa4e0ad3c066937 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Wed, 27 Mar 2019 15:22:46 -0700 Subject: Autoformat (mostly just to do with the new blank-line-after-end-of-multi-indent-block rule --- lib/compatibility/2.4.nom | 13 +++---------- 1 file changed, 3 insertions(+), 10 deletions(-) (limited to 'lib/compatibility/2.4.nom') diff --git a/lib/compatibility/2.4.nom b/lib/compatibility/2.4.nom index eca5d73..a035c4e 100644 --- a/lib/compatibility/2.4.nom +++ b/lib/compatibility/2.4.nom @@ -14,9 +14,7 @@ upgrade $tree to "2.4" as: return $tree $conditions = [] $new_lines = [] - $body = - $tree.2 if ($tree.2 is "Block" syntax tree) else [$tree.2] - + $body = ($tree.2 if ($tree.2 is "Block" syntax tree) else [$tree.2]) for $line in $body: when: (not ($line is "Action" syntax tree)): @@ -48,9 +46,7 @@ upgrade $tree to "2.4" as: "if 1 is ?" "if 1 = ?": $values = [] $new_lines = [] - $body = - $tree.5 if ($tree.5 is "Block" syntax tree) else [$tree.5] - + $body = ($tree.5 if ($tree.5 is "Block" syntax tree) else [$tree.5]) for $line in $body: when: (not ($line is "Action" syntax tree)): @@ -76,7 +72,4 @@ upgrade $tree to "2.4" as: $values = [] return - \( - if \($tree.2) is - \("Block" tree from $tree.5.source with (unpack $new_lines)) - ) + \(if \$tree.2 is \("Block" tree from $tree.5.source with (unpack $new_lines))) \ No newline at end of file -- cgit v1.2.3