diff options
| author | Bruce Hill <bruce@bruce-hill.com> | 2018-11-09 17:02:39 -0800 |
|---|---|---|
| committer | Bruce Hill <bruce@bruce-hill.com> | 2018-11-09 17:02:53 -0800 |
| commit | fa3f598fc3b91d92665fda293460944f75c95b67 (patch) | |
| tree | a5d19eac16d81873ab51171bdd5670793baa4ff8 /compatibility/compatibility.nom | |
| parent | 69aaea030e08e083151aa25b8080eddd0d4c1683 (diff) | |
Fixing the upgrade pipeline, plus some misc. fixes.
Diffstat (limited to 'compatibility/compatibility.nom')
| -rw-r--r-- | compatibility/compatibility.nom | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compatibility/compatibility.nom b/compatibility/compatibility.nom index 4e22dbc..09eacc2 100644 --- a/compatibility/compatibility.nom +++ b/compatibility/compatibility.nom @@ -36,7 +36,7 @@ externally (upgrade action %stub to %version via %upgrade_fn) means: return %replacements.(%t.1) ..else: external %needs_mangle = (yes) - return "\(%t.type){source=\(quote "\(%t.source)"), \(quote (mangle %t.1))}" + return "SyntaxTree{type=\(quote %t.type), source=\(quote "\(%t.source)"), \(quote (mangle %t.1))}" (%t is syntax tree): %args = [] @@ -46,7 +46,7 @@ externally (upgrade action %stub to %version via %upgrade_fn) means: ..else: %args::add "\(%k)=\(make tree %v)" - return "\(%t.type){\(%args::joined with ", ")}" + return "SyntaxTree{\(%args::joined with ", ")}" else: return (quote %t) |