9 lines
196 B
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
|
|
}
|