R/INTERNAL-checkConnection.R

In rscala: Bridge Between 'R' and 'Scala' with Callbacks

checkConnection <- function(details) {
  if ( Sys.getpid() != details[["pidOfR"]] ) {
    close.rscalaBridge(details)
    stop("Each process should have its own Scala bridge.  Closing this bridge.")
  }
  if ( details[['closed']] ) stop("Bridge is closed.")
}