73 lines
2.7 KiB
Plaintext
73 lines
2.7 KiB
Plaintext
#!/usr/bin/env nomsu -V4.11
|
|
#
|
|
This file defines upgrades from Nomsu <4.11 to Nomsu 4.11
|
|
(overhaul of function literals, deleting (if all of ...), etc. shorthand)
|
|
|
|
use "compatibility/compatibility.nom"
|
|
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
# Overhaul of function literals:
|
|
upgrade action "call 1 with" to "4.11" via (..)
|
|
for (%tree %end_version):
|
|
%tree2 = {type: "Action", source: %tree.source, 1: %tree.2}
|
|
for %arg in %tree.4 at %i:
|
|
%tree2.(%i + 1) = %arg
|
|
return (SyntaxTree %tree2)
|
|
|
|
upgrade action (-> %yield_value) to "4.11" as (yield %yield_value)
|
|
|
|
# Replace set {%x:1, %y:2} with [%x, %y] = [1, 2]
|
|
upgrade action "set" to "4.11" via (..)
|
|
for (%tree %end_version):
|
|
[%lhs, %rhs] = [\[], \[]]
|
|
%lhs.source = %tree.(2).source
|
|
%rhs.source = %tree.(2).source
|
|
for %entry in %tree.2 at %i:
|
|
%lhs.%i = %entry.1
|
|
%rhs.%i = %entry.2
|
|
return (SyntaxTree {type: "Action", source: %tree.source, 1: %lhs, 2: "=", 3: %rhs})
|
|
|
|
# Deprecating shorthand functions:
|
|
upgrade action [if all of %items %body, if all of %items then %body] to "4.11" as (..)
|
|
if (all of %items) %body
|
|
|
|
upgrade action [unless all of %items %body, unless all of %items then %body] to \
|
|
.."4.11" as (if (not (all of %items)) %body)
|
|
|
|
upgrade action [if any of %items %body, if any of %items then %body] to "4.11" as (..)
|
|
if (any of %items) %body
|
|
|
|
upgrade action [unless any of %items %body, unless any of %items then %body] to \
|
|
.."4.11" as (if (not (any of %items)) %body)
|
|
|
|
upgrade action [if none of %items %body, if none of %items then %body] to "4.11" \
|
|
..as (if (not (any of %items)) %body)
|
|
|
|
upgrade action [unless none of %items %body, unless none of %items then %body] to \
|
|
.."4.11" as (if (any of %items) %body)
|
|
|
|
upgrade action [..]
|
|
if all of %items %body else %else, if all of %items then %body else %else
|
|
..to "4.11" as (if (all of %items) %body else %else)
|
|
|
|
upgrade action [..]
|
|
unless all of %items %body else %else, unless all of %items then %body else %else
|
|
..to "4.11" as (if (not (all of %items)) %body else %else)
|
|
|
|
upgrade action [..]
|
|
if any of %items %body else %else, if any of %items then %body else %else
|
|
..to "4.11" as (if (any of %items) %body else %else)
|
|
|
|
upgrade action [..]
|
|
unless any of %items %body else %else, unless any of %items then %body else %else
|
|
..to "4.11" as (if (not (any of %items)) %body else %else)
|
|
|
|
upgrade action [..]
|
|
if none of %items %body else %else, if none of %items then %body else %else
|
|
..to "4.11" as (if (not (any of %items)) %body else %else)
|
|
|
|
upgrade action [..]
|
|
unless none of %items %body else %else, unless none of %items then %body else %else
|
|
..to "4.11" as (if (any of %items) %body else %else)
|