diff options
| author | LLLL Colonq <llll@colonq> | 2026-09-06 17:40:51 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2026-09-06 17:40:51 -0400 |
| commit | 71bfa9094a4a25f762d681bb07f79f92a95dbb87 (patch) | |
| tree | 1b7ff31dad86e072a37e4270e762a5e0f12f87ac /pit/test/fold.pit | |
| parent | 843ea34efc2c5ea10edc4d534304f8287f97fbbc (diff) | |
pit: Fix evaluator bug
Diffstat (limited to 'pit/test/fold.pit')
| -rw-r--r-- | pit/test/fold.pit | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/pit/test/fold.pit b/pit/test/fold.pit new file mode 100644 index 0000000..89031d0 --- /dev/null +++ b/pit/test/fold.pit @@ -0,0 +1,12 @@ +(defun! foo (x) + (+ x 1)) +(print! (foo 1)) +(print! (funcall 'foo 1)) +(print! (list/map 'foo '(1 2 3))) +(print! (list/foldl '+ 0 '(1 2 3))) +(print! (list/take 2 '(1 2 3))) +(print! (list/take 0 '(1 2 3))) +(print! (list/take 100 '(1 2 3))) +(print! (list/drop 2 '(1 2 3))) +(print! (list/drop 10 '(1 2 3))) +(print! (list/filter 'integer? '(1 foo 2 bar baz 3 quux))) |