Hi again, I found a solution (but not what was the problem); change the server code to the following: |port msg| port:= 9191. Transcript open; show: 'testing --- ' ; cr. listening := true. [self isListening] whileTrue: [ |server connectedClient| server := Socket newTCP. server listenOn: port. connectedClient := [server waitForConnectionFor: 5] on: ConnectionTimedOut do: [] . server isConnected ifTrue: [ msg:= 'Data: ', server receiveData. Transcript show: msg ; cr. ]. server closeAndDestroy. ]. Transcript show: 'end ------'. basically, I'm changing #waitForAcceptFor: for #waitForConnectionFor: I hope someone can explain me what are the differences. Cheers On Apr 20, 2011, at 23:20 , Oscar E A Callau wrote:

Hi all, may be this is a simple/stupid/repetitive question, but I don't know how to solve it.

I'm trying to connect two sockets on Pharo 1.2.1, with following code:

Server --------

|port msg| port:= 9191.

Transcript open; show: 'testing --- ' ; cr.

listening := true. [self isListening] whileTrue: [ |server connectedClient| server := Socket newTCP. server listenOn: port. connectedClient := server waitForAcceptFor: 5. connectedClient ifNil: [msg:='TimeOut'] ifNotNil:[ msg := 'Data: ', connectedClient receiveData connectedClient closeAndDestroy ]. Transcript show: msg ; cr. server closeAndDestroy. ].

Transcript show: 'end ------'.

------------ Client ------------

| s | s:= Socket newTCP. s connectToHostNamed: 'localhost' port: 9191. s sendData: 'Hello'. s closeAndDestroy

---------

First I run the server and later the client and get the following error:

Error: primAcceptFrom:receiveBufferSize:sendBufSize:semaIndex: failed

I attach a screenshot of the debug window.

Thanks in advance.

<Screen shot 2011-04-20 at 23.16.48 .png>