Anonymous user
Sockets: Difference between revisions
Added Clojure implementation.
m (omit template reason parameter) |
(Added Clojure implementation.) |
||
Line 216:
}
}</lang>
=={{header|Clojure}}==
<lang clojure>
(import '[java.net Socket])
...
(defn send-data [host msg]
(let [sock (Socket. host 256)
ostream (.getOutputStream sock)
msg-as-bytes (.getBytes msg)]
(.write ostream msg-as-bytes)
(.flush ostream)
(.close sock)))
(send-data "localhost" "Hello")
nil</lang>
=={{header|Common Lisp}}==
| |||