diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/each.bth | 4 | ||||
| -rw-r--r-- | tests/each.out | 10 |
2 files changed, 14 insertions, 0 deletions
diff --git a/tests/each.bth b/tests/each.bth new file mode 100644 index 0000000..3dd3f9f --- /dev/null +++ b/tests/each.bth @@ -0,0 +1,4 @@ +(let (a [2 3 4 5 6]) + (each (x a) + (say (* x x)) + (let (q 100 r 200 s 300) (say r)))) diff --git a/tests/each.out b/tests/each.out new file mode 100644 index 0000000..f8ae193 --- /dev/null +++ b/tests/each.out @@ -0,0 +1,10 @@ +4 +200 +9 +200 +16 +200 +25 +200 +36 +200 |