11 lines
245 B
Smalltalk
11 lines
245 B
Smalltalk
|
|
||
|
|
SMPPConnection extend [
|
||
|
|
createConnection: aHostname port: aPort [
|
||
|
|
<category: 'socket'>
|
||
|
|
^(SocketStream openConnectionToHostNamed: aHostname port: aPort)
|
||
|
|
binary;
|
||
|
|
noTimeout;
|
||
|
|
yourself
|
||
|
|
]
|
||
|
|
]
|