Added modb_use to R and the c handler + moved the connection referencing to a helpers file

2020-10-05 17:30:27 +01:00
parent cbbda5378f
commit ca594a2c0b
5 changed files with 83 additions and 36 deletions
--- a/R/Manage.R
+++ b/R/Manage.R
@@ -223,4 +223,11 @@ modb_destroy <- function(modb_name, ...) {
  conn_ref <- modb_conn_ref(args = list(...))
  res <- .Call(c_modb_destroy, conn_ref, modb_name)
  return(res)
+}
+
+#' @export
+modb_use <- function(modb_name, override = FALSE, ...) {
+  conn_ref <- modb_conn_ref(args = list(...))
+  res <- .Call(c_modb_use, conn_ref, modb_name, as.logical(override))
+  return(res)
 }