Mercurial > repos > tabletprog
annotate samples/sock.tp @ 230:195f02ba349b
Implement lambdas in grammar. Make assignments an expression in grammar.
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 02 Jan 2014 21:04:10 -0800 |
parents | 4c96a393103e |
children |
rev | line source |
---|---|
145 | 1 #{ |
2 main <- { | |
3 sock <- socket connectTo: "127.0.0.1" onPort: 12345 | |
4 sock send: "Hello, Socket!\n" | |
147
4c96a393103e
Add support for receiving data from a socket
Mike Pavone <pavone@retrodev.com>
parents:
145
diff
changeset
|
5 response <- sock recv: 1024 |
4c96a393103e
Add support for receiving data from a socket
Mike Pavone <pavone@retrodev.com>
parents:
145
diff
changeset
|
6 print: (string: response) |
145 | 7 sock close |
8 0 | |
9 } | |
10 } |