11 lines
387 B
Plaintext
11 lines
387 B
Plaintext
[ | socket |
|
|
[ | addr stream |
|
|
addr: (Net SocketAddress newOn: '127.0.0.1:256').
|
|
socket: (Net Socket newFor: addr domain type: Net Socket Types Stream protocol: Net Socket Protocols Default).
|
|
socket connectTo: addr.
|
|
stream: (Net SocketStream newOn: socket).
|
|
stream nextPutAll: ('hello socket world' as: ByteArray).
|
|
stream flush
|
|
] ensure: [socket close]
|
|
] do.
|