"Change Set: FlowFix-sr
Date:
2 September 2002
Author:
Stephan Rudlof
I have problems with the last Flow distribution:
http://netjam.org/smalltalk/sources/flow/flow2a.zip
: something seems broken, already
Socket performExamples
doesn't work.
With this changeset at least
TCPSocket echoBytes
*does* work! And it suggests that the problems are really at the ST side
(has taken some time to configure my Linux machine correctly for socket
access (for Nebraska)...)."
Remarks:
I'm currently working at a client/server application. It should work with
quite asynchronous characteristics: the server gets commands and it's
unknown, if it responds in 100ms or 30 minutes...
I've taken a look into what is there in Squeak now: as a consequence I'd
like to use a better approach, what Flow seems to promise. But it has to
work at first...
If I'd decide to use it, there is a good chance to get some demo example for
Flow back ;-)
Greetings,
Stephan
--
Stephan Rudlof (sr(a)evolgo.de)
"Genius doesn't work on an assembly line basis.
You can't simply say, 'Today I will be brilliant.'"
-- Kirk, "The Ultimate Computer", stardate 4731.3
'From Squeak3.2 of 11 July 2002 [latest update: #4956] on 2 September 2002 at 8:29:20 pm'!
"Change Set: FlowFix-sr
Date: 2 September 2002
Author: Stephan Rudlof
I have problems with the last Flow distribution:
http://netjam.org/smalltalk/sources/flow/flow2a.zip
: something seems broken, already
Socket performExamples
doesn't work.
With this changeset at least
TCPSocket echoBytes
*does* work!! And it suggests that the problems are really at the ST side (has taken some time to configure my Linux machine correctly for socket access (for Nebraska)...)."!
!ExternalStream class methodsFor: 'instance creation' stamp: 'sr 9/2/2002 20:11'!
on: anExternalResource
"Answer an instance of myself on anExternalResource."
^self basicNew resource: anExternalResource; collection: ByteArray new; yourself! !
!Socket class methodsFor: 'examples' stamp: 'sr 9/2/2002 20:18'!
echoBytesOn: aNetStream
"Echo some bytes on aNetStream, which is connected to a remote host."
^[
| outgoingBytes |
outgoingBytes _ 'fribbly\' withCRs.
aNetStream nextPutAll: outgoingBytes.
(aNetStream next: outgoingBytes size) asString = outgoingBytes
]
ensure: [aNetStream close]! !
