diff options
author | Leah Neukirchen <leah@vuxu.org> | 2022-12-01 21:03:45 +0100 |
---|---|---|
committer | Leah Neukirchen <leah@vuxu.org> | 2022-12-01 22:56:31 +0100 |
commit | f690959ef59004ba00d2d54073c9b8265e5b6d57 (patch) | |
tree | d8dd2698ae088bfe321fd40e3724cf376bfd68af /tests | |
parent | 73b23b27998906ec479a995434ca5b664f0c0912 (diff) | |
download | mew-f690959ef59004ba00d2d54073c9b8265e5b6d57.tar.gz mew-f690959ef59004ba00d2d54073c9b8265e5b6d57.tar.xz mew-f690959ef59004ba00d2d54073c9b8265e5b6d57.zip |
add lines
Diffstat (limited to 'tests')
-rw-r--r-- | tests/test.mew | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/test.mew b/tests/test.mew index 4bcce7f..92eb35c 100644 --- a/tests/test.mew +++ b/tests/test.mew @@ -427,7 +427,11 @@ (test-group "slurp" (test #t (string? (slurp "/usr/bin/chicken-status"))) - (test-error (string? (slurp "/dev/null/noexist")))) + (test-error (slurp "/dev/null/noexist"))) + +(test-group "lines" + (test #t (string? ((lines "/usr/bin/chicken-status")))) + (test-error (lines "/dev/null/noexist"))) (test-group "gen" (test '(1 2 3) (into '() (gen '(1 2 3)))) |