Mercurial > repos > tabletprog

diff samples/sock.tp @ 145:7db37f040a6f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Basic socket support
author Mike Pavone <pavone@retrodev.com>
date Fri, 09 Aug 2013 04:15:53 -0700
parents
children 4c96a393103e
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/sock.tp	Fri Aug 09 04:15:53 2013 -0700
@@ -0,0 +1,8 @@
+#{
+	main <- {
+		sock <- socket connectTo: "127.0.0.1" onPort: 12345
+		sock send: "Hello, Socket!\n"
+		sock close
+		0
+	}
+}