Mercurial > repos > tabletprog

view samples/sock.tp @ 290:38ca63e0a62e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added value? and none? methods to option value and option none
author Michael Pavone <pavone@retrodev.com>
date Tue, 22 Jul 2014 23:33:12 -0700
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
	}
}