======================================== port tests ...
(PASS) Initially, output string is empty
(PASS) output can be extracted from output string
(PASS) closing a string output port has no effect on the returned data
(PASS) writing to a closed string output port is an error
slow...
9.25s CPU time, 0.08s GC time (major), 13422/2233 mutations (total/tracked), 6/5059 GCs (major/minor)
fast...
0.02s CPU time, 38/4 mutations (total/tracked), 0/3 GCs (major/minor)


Procedures check on TCP ports being closed

tcp-addresses...OK
tcp-port-numbers...OK
tcp-abandon-port...OK

Error: (line 426) unterminated list, starting in line 208

        Call history:

        <eval>    (printf519 "OK\n")
        <eval>    (set-signal-handler! signal/chld void)
        <eval>    (##sys#call-with-values (##core#lambda () (create-pipe)) (##core#lambda (in out) (receive (pid ok? s......
        <eval>    (create-pipe)
        <eval>    (##sys#call-with-values (##core#lambda () (process-wait (process-fork (lambda () (file-close in) (wi......
        <eval>    (process-wait (process-fork (lambda () (file-close in) (with-output-to-port (open-output-file* out) ...
        <eval>    (process-fork (lambda () (file-close in) (with-output-to-port (open-output-file* out) (lambda () (di......
        <eval>    (file-close out)
        <eval>    (equal? (quote (#t 0 ("hello, world"))) (list ok? status (read-lines (open-input-file* in))))
        <eval>    (list ok? status (read-lines (open-input-file* in)))
        <eval>    (read-lines (open-input-file* in))
        <eval>    (open-input-file* in)
        <syntax>          (print "\n\nProcedures check on output ports being closed\n")
        <eval>    (print "\n\nProcedures check on output ports being closed\n")
        <syntax>          (with-output-to-file "empty-file" void)
        <eval>    (with-output-to-file "empty-file" void)       <--
OK


Procedures check on output ports being closed

rules.make:651: recipe for target 'check' failed
make: *** [check] Error 70