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/2.nom | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'lib/compatibility/2.nom') diff --git a/lib/compatibility/2.nom b/lib/compatibility/2.nom index 4dc867d..69f2d41 100644 --- a/lib/compatibility/2.nom +++ b/lib/compatibility/2.nom @@ -1,5 +1,4 @@ #!/usr/bin/env nomsu -V7.0.0 - ### This file defines upgrades from Nomsu 1 to Nomsu 2 @@ -16,8 +15,7 @@ upgrade $tree to "2" as: $false_body = ($tree.5 upgraded) unless ($false_body is "Block" syntax tree): $false_body = (=lua "Block(\$false_body.source, \$false_body)") - - return `(if `($tree.2 upgraded) `$true_body else `$false_body) + return \(if \($tree.2 upgraded) \$true_body else \$false_body) $need_blocks = [ "if", "unless", "for 1 in", "for 1 = 2 in", "repeat while 1", "repeat 1 times" @@ -32,4 +30,4 @@ upgrade $tree to "2" as: unless (($bits, last) is "Block" syntax tree): $body = ($bits, last) $bits.(#$bits) = (=lua "SyntaxTree{type='Block', source=\$body.source, \$body}") - return (=lua "SyntaxTree{type='Action', source=\$tree.source, unpack(\$bits)}") + return (=lua "SyntaxTree{type='Action', source=\$tree.source, unpack(\$bits)}") \ No newline at end of file -- cgit v1.2.3