Anonymous user
Echo server: Difference between revisions
m
→{{header|Clojure}}: whitespace
m (→{{header|Clojure}}: whitespace) |
|||
Line 437:
=={{header|Clojure}}==
<lang lisp>(use '[clojure.contrib.server-socket :only (create-server)])▼
▲(use '[clojure.contrib.server-socket :only (create-server)])
(use '[clojure.contrib.duck-streams :only (read-lines write-lines)])
Line 444 ⟶ 443:
(write-lines (java.io.PrintWriter. output true) (read-lines input)))
(create-server 12321 echo)</lang>
Note here that an auto-flushing PrintWriter needs to be created, otherwise 'output' could simply be passed to write-lines.
|