From b4d5312f01769e5571cef2d1eeff0dea844e054c Mon Sep 17 00:00:00 2001 From: TinWoodman92 Date: Fri, 7 Jul 2023 17:27:52 -0500 Subject: Added tests to compare to alternative packages. --- tests/test_alt.r | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 tests/test_alt.r (limited to 'tests/test_alt.r') diff --git a/tests/test_alt.r b/tests/test_alt.r new file mode 100644 index 0000000..ba6daaf --- /dev/null +++ b/tests/test_alt.r @@ -0,0 +1,18 @@ +chk_0 <- TRUE + +add_to_vector <- function(vect_name, val) { + vect <- get(vect_name, envir = globalenv()) + vect <- c(vect, val) + assign(vect_name, vect, envir = globalenv()) + return(TRUE) +} + +display_vector <- function(vect_name) { + vect <- get(vect_name, envir = globalenv()) + display_msg(vect) + return(TRUE) +} + +no_return_method <- function(i) { + +} \ No newline at end of file -- cgit v1.2.3