19 lines
376 B
Smalltalk
19 lines
376 B
Smalltalk
"""
|
|
The following changes need to be kept for pharo.
|
|
"""
|
|
OsmoUDPSocketTest extend [
|
|
createSocket [
|
|
^ Socket newUDP
|
|
]
|
|
]
|
|
|
|
OsmoUDPSocket extend [
|
|
startRXProcess [
|
|
^ [[[
|
|
Processor activeProcess name: name, ' RX'.
|
|
self runRXProcess
|
|
] on: ConnectionClosed do: []
|
|
] ensure: [net_exit signal]] fork.
|
|
]
|
|
]
|