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.10.12.7.nom | |
| parent | 7f138199078a2fc2b6d6ee8d31da940120c8216a (diff) | |
Replacing (size of $) with (#$) as should have been done before.
Diffstat (limited to 'lib/compatibility/4.10.12.7.nom')
| -rw-r--r-- | lib/compatibility/4.10.12.7.nom | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lib/compatibility/4.10.12.7.nom b/lib/compatibility/4.10.12.7.nom index be53cb6..f134476 100644 --- a/lib/compatibility/4.10.12.7.nom +++ b/lib/compatibility/4.10.12.7.nom @@ -40,7 +40,7 @@ upgrade action ($k = $v for $i in $start to $stop via $step) to "4.10.12.7" as {: for $i in $start to $stop by $step: add $k = $v} upgrade action (parse $text from $filename) to "4.10.12.7" as - (NomsuCode from (Source $filename 1 (size of $text)) $text) parsed + (NomsuCode from (Source $filename 1 (#$text)) $text) parsed upgrade action ($ as lua statements) to "4.10.12.7" as ($ as lua) upgrade action (compile error at $pos $err hint $hint) to "4.10.12.7" as @@ -54,7 +54,7 @@ upgrade $tree to "4.10.12.7" as: $first_chunk = $tree.1 $i = 1 $has_use = (no) - repeat while ($i <= (size of $first_chunk)): + repeat while ($i <= (#$first_chunk)): if (($first_chunk.$i.type == "Action") and ($first_chunk.$i.stub == "use")): $has_use = (yes) ..else: @@ -69,12 +69,10 @@ upgrade $tree to "4.10.12.7" as: for $j in 1 to ($i - 1): $chunk1.$j = $first_chunk.$j - for $j in $i to (size of $first_chunk): + for $j in $i to (#$first_chunk): $chunk2.($j - $i + 1) = $first_chunk.$j $new_tree = ("FileChunks" tree from $tree.source with $chunk1 $chunk2) - - for $i in 2 to (size of $tree): + for $i in 2 to (#$tree): $new_tree.($i + 1) = $tree.$i - - return $new_tree + return $new_tree
\ No newline at end of file |