diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/run.scm | 4 | 
1 files changed, 2 insertions, 2 deletions
| diff --git a/tests/run.scm b/tests/run.scm index 23220e1..207d705 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -9,11 +9,11 @@          (begin (fork/pipe                  (lambda ()                    (with-output-to-port (open-output-file* 1) -                    (lambda () (display "Hello, world.\n") (exit 0))))) +                    (lambda () (display "Hello, world.\n")))))                 (read-line (open-input-file* 0))))    (test "run/string* returns a string output in a subprocess"          "This is a test" -        (run/string* (lambda () (display "This is a test") (exit 0))))) +        (run/string* (lambda () (display "This is a test")))))  (test-group "Macro (EPF) interface"   (delete-file* "outfile")               ; Leftovers | 
