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/compatibility.nom | |
| parent | 7f138199078a2fc2b6d6ee8d31da940120c8216a (diff) | |
Replacing (size of $) with (#$) as should have been done before.
Diffstat (limited to 'lib/compatibility/compatibility.nom')
| -rw-r--r-- | lib/compatibility/compatibility.nom | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/compatibility/compatibility.nom b/lib/compatibility/compatibility.nom index dc21f0b..123f4d9 100644 --- a/lib/compatibility/compatibility.nom +++ b/lib/compatibility/compatibility.nom @@ -25,7 +25,7 @@ external: $lua = (Lua "") for $action in $actions: $replacements = {} - for $i in 1 to (size of $action): + for $i in 1 to (#$action): if ($action.$i is "Var" syntax tree): $replacements.($action.$i.1) = "\(\$tree as lua id)[\$i]" define mangler @@ -74,6 +74,7 @@ external: if ($ver is "Text"): return (($ as number) for $ in $ver matching "[0-9]+") return $ver + (Ver $) means: if ($ is "a List"): if ($.1 is "Text"): @@ -83,6 +84,7 @@ external: if $lib: return {.lib = $lib, .version = ($ver as version list)} return {.version = ($ as version list)} + $start = (Ver $start_version) $end = (Ver $end_version) $end.lib or= $start.lib @@ -137,4 +139,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 |