From ddef8be3df626d63f6e575d4c1416295a22371ad Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Mon, 14 Jan 2019 17:14:34 -0800 Subject: Moved compatibility to lib/ and fixed path searching for .peg files. --- lib/compatibility/3.7.nom | 41 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 41 insertions(+) create mode 100644 lib/compatibility/3.7.nom (limited to 'lib/compatibility/3.7.nom') diff --git a/lib/compatibility/3.7.nom b/lib/compatibility/3.7.nom new file mode 100644 index 0000000..ed877a6 --- /dev/null +++ b/lib/compatibility/3.7.nom @@ -0,0 +1,41 @@ +#!/usr/bin/env nomsu -V6.14 +# + This file defines upgrades from Nomsu <3.7 to 3.7 + +use "compatibility/compatibility" + +~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + +upgrade action [$index st to last in $list] to "3.7" as + $list, $index st to last + +upgrade action [$index nd to last in $list] to "3.7" as + $list, $index nd to last + +upgrade action [$index rd to last in $list] to "3.7" as + $list, $index rd to last + +upgrade action [$index th to last in $list] to "3.7" as + $list, $index rd th last + +upgrade action [last in $list] to "3.7" as ($list, last) +upgrade action [first in $list] to "3.7" as ($list, first) +upgrade action [$item is in $list, $list contains $item, $list has $item] to +.."3.7" as ($list, has $item) + +upgrade action [ + $item isn't in $list, $item is not in $list, $list doesn't contain $item + $list does not contain $item, $list doesn't have $item, $list does not have $item +] to "3.7" as (not ($list, has $item)) + +upgrade action [$list has key $index, $list has index $index] to "3.7" as + $list.$index != (nil) + +upgrade action [ + $list doesn't have key $index, $list does not have key $index + $list doesn't have index $index, $list does not have index $index +] to "3.7" as ($list.$index == (nil)) + +upgrade action [ + number of keys in $list, len $list, || $list ||, length $list, length of $list +] to "3.7" as (size of $list) -- cgit v1.2.3