Line-based buffering of stdout in server-chat-client
This commit is contained in:
parent
3d93dc5570
commit
65c99e24b4
|
@ -11,6 +11,8 @@
|
||||||
(define port (make-parameter 8001))
|
(define port (make-parameter 8001))
|
||||||
(define scope (make-parameter "chat"))
|
(define scope (make-parameter "chat"))
|
||||||
|
|
||||||
|
(file-stream-buffer-mode (current-output-port) 'line)
|
||||||
|
|
||||||
(module+ main
|
(module+ main
|
||||||
(require racket/cmdline)
|
(require racket/cmdline)
|
||||||
(command-line #:once-each
|
(command-line #:once-each
|
||||||
|
|
Loading…
Reference in New Issue