Export function and switch name to in_webr()

coatless-tutorials · Jan 12, 2024 · 63c3680 · 63c3680
1 parent 06d549c
commit 63c3680
Show file tree

Hide file tree

Showing 4 changed files with 32 additions and 6 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -1,2 +1,3 @@
 # Generated by roxygen2: do not edit by hand
 
+export(in_webr)
diff --git a/R/is-wasm.R b/R/is-wasm.R
@@ -4,7 +4,8 @@
 #' that matches `"wasm32"`. If its the case, we're likely using webR to access
 #' R.
 #' 
+#' @export
 #' @examples
 #' # Check to see if WASM is active
-#' is_r_using_wasm()
-is_r_using_wasm <- function() { R.Version()$arch == "wasm32"}
+#' in_webr()
+in_webr <- function() { R.Version()$os == "emscripten" }
diff --git a/man/demorwasmbinary-package.Rd b/man/demorwasmbinary-package.Rd
diff --git a/man/is_r_using_wasm.Rd → man/in_webr.Rd b/man/is_r_using_wasm.Rd → man/in_webr.Rd
Original file line number	Diff line number	Diff line change
		@@ -1,2 +1,3 @@
		# Generated by roxygen2: do not edit by hand

		export(in_webr)