mirror of
https://github.com/janet-lang/janet
synced 2024-11-25 09:47:17 +00:00
7 lines
203 B
Plaintext
7 lines
203 B
Plaintext
|
(def server (net/server "127.0.0.1" "8009" nil :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))
|