search for: slavestart

Displaying 1 result from an estimated 1 matches for "slavestart".

2005 Apr 14
0
Finding an available port for server socket
I've written a Smalltalk application which starts R on another machine and then communicates with it via sockets. The functions involved are: slaveStart <- function(masterHost, masterPort){ inPort <- availablePort() sendSocket(as.character(inPort), masterHost, masterPort) socketSlave(inPort) } socketSlave <- function(inPort){ ## listens on inPort. on.exit(closeAllConnections(), add = T) repeat { inConn <- socketConn...