R/server.R

In vh-d/odbc32: 32-bit ODBC drivers for 64-bit R sessions

#' Append a (new) connection to a global list of connections
#'
#' @param con
#'
#' @return a reference (index) number to the list of all connections
#' @export
#'
#' @examples
#' #TBA
.append_con <- function(con) {
  .GlobalEnv$cons[[length(.GlobalEnv$cons) + 1]] <- con

  length(.GlobalEnv$cons)
}


#' @export
.get_con <- function(ref) {
  .GlobalEnv$cons[[ref]]
}