Mercurial > repos > tabletprog

view samples/sock.tp @ 219:b70be565d54c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix check of return value from env.find in symbol.quote so that falsey found values do not cause trouble.
author Michael Pavone <pavone@retrodev.com>
date Mon, 23 Dec 2013 14:22:20 -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
	}
}