Skip to content

Instantly share code, notes, and snippets.

@acook

acook/tcp_client.rebol

Last active August 29, 2015 13:56
Show Gist options
  • Save acook/9225232 to your computer and use it in GitHub Desktop.
Save acook/9225232 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
tcp_client.rebol
server: open tcp://localhost:4321
until [error? try [insert server ask "R> "]]
close server
Raw
tcp_server.rebol
server-port: open tcp://:4321
forever [
connection-port: first server-port
until [
wait connection-port
error? try [do first connection-port]
]
close connection-port
]
close server-port
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment