❯ ../../chicken-6-preparation/chicken-git/bin/csi -s tcp-hammer.scm 4242 /tmp/tcp-hammer.out port: 4242, out: /tmp/tcp-hammer.out Error: call of non-procedure: # Call history: tcp-hammer.scm:24 [copy-chars!] (peek-char in) tcp-hammer.scm:25 [copy-chars!] (not (eof-object? p)) tcp-hammer.scm:25 [copy-chars!] (eof-object? p) tcp-hammer.scm:26 [copy-chars!] (peek-char in) tcp-hammer.scm:27 [copy-chars!] (read-char in) tcp-hammer.scm:28 [copy-chars!] (eqv? p2 p) tcp-hammer.scm:28 [copy-chars!] (eqv? c p) tcp-hammer.scm:31 [copy-chars!] (write-char c out) tcp-hammer.scm:32 [copy-chars!] (+ chars-read 1) tcp-hammer.scm:33 [copy-chars!] (loop (-Assertion failed: (C_restart_c == (C_temporary_stack_bottom - C_temporary_stack)), function CHICKEN_run, file runtime.c, line 1599. [1] 67302 abort ../../chicken-6-preparation/chicken-git/bin/csi -s tcp-hammer.scm 4242