Echo server: Difference between revisions

m
m (→‎{{header|Clojure}}: whitespace)
Line 437:
=={{header|Clojure}}==
 
<lang lisp>(use '[clojure.contrib.server-socket :only (create-server)])
<lang lisp>
(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>
</lang>
 
Note here that an auto-flushing PrintWriter needs to be created, otherwise 'output' could simply be passed to write-lines.
Anonymous user