summaryrefslogtreecommitdiffstats
path: root/tests/010
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2014-02-28 07:15:18 -0800
committerKaz Kylheku <kaz@kylheku.com>2014-02-28 10:35:41 -0800
commita14b74d2d383ce2c8694976da078da52199c0b37 (patch)
treed704a13120d72764ab21aea38b0f92d9e5a485f9 /tests/010
parent1dcc39dbd54082af1e4c1cc9a2ca5ef30f2c4536 (diff)
downloadtxr-a14b74d2d383ce2c8694976da078da52199c0b37.tar.gz
txr-a14b74d2d383ce2c8694976da078da52199c0b37.tar.bz2
txr-a14b74d2d383ce2c8694976da078da52199c0b37.zip
* tests/010/output-clauses.expected: New file.
* tests/010/output-clauses.txr: New file.
Diffstat (limited to 'tests/010')
-rw-r--r--tests/010/output-clauses.expected40
-rw-r--r--tests/010/output-clauses.txr38
2 files changed, 78 insertions, 0 deletions
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)