mirror of
https://github.com/janet-lang/janet
synced 2024-11-25 09:47:17 +00:00
7 lines
199 B
Plaintext
7 lines
199 B
Plaintext
(def server (net/listen "127.0.0.1" "8009" :datagram))
|
|
(while true
|
|
(def buf @"")
|
|
(def who (:recv-from server 1024 buf))
|
|
(printf "got %q from %v, echoing!" buf who)
|
|
(:send-to server who buf))
|