Fix system library test
This commit is contained in:
parent
a6911047a4
commit
83d3957718
|
|
@ -15,7 +15,7 @@
|
||||||
|
|
||||||
(define text (with-input-from-file testfile (lambda () (read-all ""))))
|
(define text (with-input-from-file testfile (lambda () (read-all ""))))
|
||||||
|
|
||||||
(test-assert (string=? text "Hello"))
|
(test-assert (string=? text "Hello\n"))
|
||||||
|
|
||||||
(define exit-code2 (system "no-such-command 2> /dev/null"))
|
(define exit-code2 (system "no-such-command 2> /dev/null"))
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue