From f690959ef59004ba00d2d54073c9b8265e5b6d57 Mon Sep 17 00:00:00 2001 From: Leah Neukirchen Date: Thu, 1 Dec 2022 21:03:45 +0100 Subject: add lines --- tests/test.mew | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'tests') 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)))) -- cgit 1.4.1