diff options
| author | Bruce Hill <bruce@bruce-hill.com> | 2019-03-20 16:41:44 -0700 |
|---|---|---|
| committer | Bruce Hill <bruce@bruce-hill.com> | 2019-03-20 16:41:44 -0700 |
| commit | 56e3a0c48ca2b641f77f7e73cce94dc3b133e142 (patch) | |
| tree | 8efd996580e3bcd7845b39a0f7efe7bc0818a793 /lib/compatibility/compatibility.nom | |
| parent | b44afbf417d602b7f018cd4d24ff07c2bc6d8b6e (diff) | |
Restoring `(foo) syntax to \(foo)
Diffstat (limited to 'lib/compatibility/compatibility.nom')
| -rw-r--r-- | lib/compatibility/compatibility.nom | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lib/compatibility/compatibility.nom b/lib/compatibility/compatibility.nom index 83eb3cd..4715282 100644 --- a/lib/compatibility/compatibility.nom +++ b/lib/compatibility/compatibility.nom @@ -1,5 +1,4 @@ #!/usr/bin/env nomsu -V7.0.0 - ### This file contains code for defining ways to upgrade code between different versions of Nomsu. @@ -22,13 +21,13 @@ external: (upgrade action $actions to $version as $body) compiles to: if ($actions is "Action" syntax tree): - $actions = `[`$actions] + $actions = \[\$actions] $lua = (Lua "") for $action in $actions: $replacements = {} for $i in (1 to #$action): if ($action.$i is "Var" syntax tree): - $replacements.($action.$i.1) = "\(`$tree as lua id)[\$i]" + $replacements.($action.$i.1) = "\(\$tree as lua id)[\$i]" define mangler (make tree $t) means: when: @@ -60,7 +59,7 @@ external: $lua, add Lua (" upgrade_action_1_to_2_via(\(quote $action.stub), \($version as lua expr), function(\ - ..\(`$tree as lua id)) + ..\(\$tree as lua id)) return \$retval end) ") @@ -139,4 +138,4 @@ external: $tree upgraded from ($tree.version or $(NOMSU VERSION)) to $end_version ($tree upgraded) means - $tree upgraded from ($tree.version or $(NOMSU VERSION)) to $(NOMSU VERSION) + $tree upgraded from ($tree.version or $(NOMSU VERSION)) to $(NOMSU VERSION)
\ No newline at end of file |