diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | tests/010/output-clauses.expected | 40 | ||||
| -rw-r--r-- | tests/010/output-clauses.txr | 38 |
3 files changed, 84 insertions, 0 deletions
@@ -1,5 +1,11 @@ 2014-02-28 Kaz Kylheku <kaz@kylheku.com> + * tests/010/output-clauses.expected: New file. + + * tests/010/output-clauses.txr: New file. + +2014-02-28 Kaz Kylheku <kaz@kylheku.com> + About time for some new regression tests. * tests/011/macros-1.expected: New file. diff --git a/tests/010/output-clauses.expected b/tests/010/output-clauses.expected new file mode 100644 index 00000000..efcf9bc0 --- /dev/null +++ b/tests/010/output-clauses.expected @@ -0,0 +1,40 @@ +counter:0:A + empty +counter:0:B + empty +counter:1:A + first:zero + oddlast:one +counter:1:B + first:zero + last:one +counter:2:A + first:zero + odd:one + evenlast:two +counter:2:B + first:zero + odd:one + last:two +counter:3:A + first:zero + odd:one + even:two + oddlast:three +counter:3:B + first:zero + odd:one + even:two + last:three +counter:4:A + first:zero + odd:one + even:two + odd:three + evenlast:four +counter:4:B + first:zero + odd:one + even:two + odd:three + last:four diff --git a/tests/010/output-clauses.txr b/tests/010/output-clauses.txr new file mode 100644 index 00000000..02a04c41 --- /dev/null +++ b/tests/010/output-clauses.txr @@ -0,0 +1,38 @@ +@(bind l ("zero" "one" "two" "three" "four")) +@(bind a (@[l 0..0] @[l 0..2] @[l 0..3] @[l 0..4] @[l 0..5])) +@(output) +@(repeat :counter i) +counter:@i:A +@(repeat) + main:@a +@(first) + first:@a +@(mod 1 2) + odd:@a +@(mod 0 2) + even:@a +@(last) + last:@a +@(modlast 1 2) + oddlast:@a +@(modlast 0 2) + evenlast:@a +@(empty) + empty +@(end) +counter:@i:B +@(repeat) + main:@a +@(first) + first:@a +@(mod 1 2) + odd:@a +@(mod 0 2) + even:@a +@(last) + last:@a +@(empty) + empty +@(end) +@(end) +@(end) |