added more examples

This commit is contained in:
Luxferre
2026-07-05 18:39:20 +03:00
parent 4ed51b4429
commit fafc966480
4 changed files with 35 additions and 1 deletions
+16
View File
@@ -0,0 +1,16 @@
#!/usr/bin/env clyx
:: _main [
"Listening on port 1337..." puts cr
1337 nlstn # listen on port 1337
1 while [ # outer connection accept loop
dup read # accept a new connection -> conn_fd
1 # loop condition for client session loop
while [
dup read # read data
dup vlen 0 != # check if data is non-empty
if [ over swap write drop 1 ] [ drop 0 ]
]
close # close the connection socket
1 # loop condition for outer server loop
]
]