diff options
Diffstat (limited to 'tests/012/op.tl')
| -rw-r--r-- | tests/012/op.tl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/012/op.tl b/tests/012/op.tl index 1652b3c8..47f1f80d 100644 --- a/tests/012/op.tl +++ b/tests/012/op.tl @@ -113,3 +113,15 @@ (mtest (remove-if (opf orf (< 10) (> 5)) (range 0 20)) (5 6 7 8 9 10) (remove-if (lopf orf (> 10) (< 5)) (range 0 20)) (5 6 7 8 9 10)) + +(test + (let ((x 0) (y 0)) + (list (flow x + (+ 2) + (tap inc y @1) + (* 4) + (tap inc y @1) + (+ 5) + (tap inc y @1)) + y)) + (13 23)) |