Files
AVSDevR.DBClient/R/DBClientClass/Initialize.R

9 lines
196 B
R

client <- NULL
Initialize <- function(client) {
if (is.null(client) || !is.R6(client) || inherits(client, "DBClient")) {
stop("DBClient instance required!")
}
private$client <- client
}