Add ability to get session

ryanzomorrodi · Nov 13, 2024 · e140d6f · e140d6f
1 parent d508d0e
commit e140d6f
Show file tree

Hide file tree

Showing 3 changed files with 27 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -4,6 +4,7 @@ export(r_to_sas)
 export(sas_connect)
 export(sas_disconnect)
 export(sas_download)
+export(sas_get_session)
 export(sas_list)
 export(sas_read_csv)
 export(sas_remove)

diff --git a/R/session.R b/R/session.R
@@ -0,0 +1,11 @@
+#' Get current SAS session
+#' 
+#' Gets current SAS session so that you can use functions not yet implemented.
+#' Can also be useful for testing.
+#' 
+#' @return Current SAS session.
+#' 
+#' @export
+sas_get_session <- function() {
+  .pkgenv$session
+}
diff --git a/man/sas_get_session.Rd b/man/sas_get_session.Rd