sumim #7127(2008/08/15 06:33 GMT) [ Smalltalk ] Rating0/0=0.00
Squeak Smalltalk で。
1 2 3 4 5 6 7 8 9 10
| serverAddress portNumber socket string | serverAddress := NetNameResolver addressFromString: '127.0.0.1'. portNumber := 9999. socket := Socket newTCP. socket connectTo: serverAddress port: portNumber. World findATranscript: nil. [(string := FillInTheBlank request: 'string:') notEmpty] whileTrue: [ socket sendData: string, String crlf. Transcript show: socket receiveData]. socket close
Rating0/0=0.00-0+
[ reply ]
sumim
#7127()
[
Smalltalk
]
Rating0/0=0.00
Squeak Smalltalk で。
| serverAddress portNumber socket string | serverAddress := NetNameResolver addressFromString: '127.0.0.1'. portNumber := 9999. socket := Socket newTCP. socket connectTo: serverAddress port: portNumber. World findATranscript: nil. [(string := FillInTheBlank request: 'string:') notEmpty] whileTrue: [ socket sendData: string, String crlf. Transcript show: socket receiveData]. socket closeRating0/0=0.00-0+
[ reply ]