diff options
| author | Bruce Hill <bruce@bruce-hill.com> | 2019-03-14 16:30:43 -0700 |
|---|---|---|
| committer | Bruce Hill <bruce@bruce-hill.com> | 2019-03-14 16:30:43 -0700 |
| commit | ddb839bfd4ba8dbdd214f3e885629fc8fe57e68c (patch) | |
| tree | aee183d005229b21a5ce636685f416f97bd5aa9e /lib/compatibility/4.8.10.nom | |
| parent | 7f138199078a2fc2b6d6ee8d31da940120c8216a (diff) | |
Replacing (size of $) with (#$) as should have been done before.
Diffstat (limited to 'lib/compatibility/4.8.10.nom')
| -rw-r--r-- | lib/compatibility/4.8.10.nom | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/compatibility/4.8.10.nom b/lib/compatibility/4.8.10.nom index 15a502b..71d69d0 100644 --- a/lib/compatibility/4.8.10.nom +++ b/lib/compatibility/4.8.10.nom @@ -11,7 +11,7 @@ upgrade action "local action" to "4.8.10" via $body = $tree.4 if $spec.type is: "List": - if ((size of $spec) == 1): + if ((#$spec) == 1): return \($spec.1 means $body) ..else: return \($spec all mean $body) @@ -26,7 +26,7 @@ upgrade action "action" to "4.8.10" via if $body: if $spec.type is: "List": - if ((size of $spec) == 1): + if ((#$spec) == 1): return \(externally $spec.1 means $body) ..else: return \(externally $spec all mean $body) @@ -42,7 +42,7 @@ upgrade action "compile 1 to" to "4.8.10" via $body = $tree.4 if $spec.type is: "List": - if ((size of $spec) == 1): + if ((#$spec) == 1): return \($spec.1 compiles to $body) ..else: return \($spec all compile to $body) @@ -56,7 +56,7 @@ upgrade action "parse 1 as" to "4.8.10" via $body = $tree.4 if $spec.type is: "List": - if ((size of $spec) == 1): + if ((#$spec) == 1): return \($spec.1 parses as $body) ..else: return \($spec all parse as $body) @@ -65,4 +65,4 @@ upgrade action "parse 1 as" to "4.8.10" via return \($spec parse as $body) upgrade action (compile as $) to "4.8.10" as (what $ compiles to) -upgrade action (remove action $) to "4.8.10" as (($'s meaning) = (nil)) +upgrade action (remove action $) to "4.8.10" as (($'s meaning) = (nil))
\ No newline at end of file |