Mercurial > repos > tabletprog

view samples/sock.tp @ 229:7435367a932a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Allow newlines between binary operator and the right argument to the operator
author Michael Pavone <pavone@retrodev.com>
date Thu, 02 Jan 2014 21:02:11 -0800
parents 4c96a393103e
children
line wrap: on
line source

#{
	main <- {
		sock <- socket connectTo: "127.0.0.1" onPort: 12345
		sock send: "Hello, Socket!\n"
		response <- sock recv: 1024
		print: (string: response)
		sock close
		0
	}
}