From 56e3a0c48ca2b641f77f7e73cce94dc3b133e142 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Wed, 20 Mar 2019 16:41:44 -0700 Subject: Restoring `(foo) syntax to \(foo) --- lib/compatibility/5.13.nom | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'lib/compatibility/5.13.nom') diff --git a/lib/compatibility/5.13.nom b/lib/compatibility/5.13.nom index 3073fdf..b3d9846 100644 --- a/lib/compatibility/5.13.nom +++ b/lib/compatibility/5.13.nom @@ -1,5 +1,4 @@ #!/usr/bin/env nomsu -V7.0.0 - ### This file defines upgrades from Nomsu <5.13 to 5.13 use "compatibility/compatibility" @@ -12,11 +11,10 @@ upgrade action "with" to "5.13" via $assignments = $tree.2 $body = $tree.3 if ($assignments.type != "Dict"): return $tree - $new_assignments = `[] + $new_assignments = \[] for ($i = $a) in $assignments: when: (($a.type == "DictEntry") and (#$a == 1)): $a = $a.1 - (all of [$a.type == "DictEntry", #$a == 2]): - $a = `(`$a.1 = `$a.2) + (all of [$a.type == "DictEntry", #$a == 2]): $a = \(\$a.1 = \$a.2) $new_assignments.$i = $a - return `(with `$new_assignments `$body) + return \(with \$new_assignments \$body) \ No newline at end of file -- cgit v1.2.3