[arrow] branch main updated: GH-34467: [R] Disable DuckDB tests on R versions < 4.0.0 (#34468)

[thisisnic]

This is an automated email from the ASF dual-hosted git repository.

thisisnic pushed a commit to branch main
in repository https://gitbox.apache.org/repos/asf/arrow.git


The following commit(s) were added to refs/heads/main by this push:
     new fcc17e3561 GH-34467: [R] Disable DuckDB tests on R versions < 4.0.0   
(#34468)
fcc17e3561 is described below

commit fcc17e3561750249a2a7afc110cfa9c44c893022
Author: Nic Crane <thisis...@gmail.com>
AuthorDate: Wed Mar 8 10:01:40 2023 +0000

    GH-34467: [R] Disable DuckDB tests on R versions < 4.0.0   (#34468)
    
    This PR skips DuckDB tests on older versions of R.
    * Closes: #34467
    
    Authored-by: Nic Crane <thisis...@gmail.com>
    Signed-off-by: Nic Crane <thisis...@gmail.com>
---
 r/R/duckdb.R                   | 3 ++-
 r/tests/testthat/test-duckdb.R | 2 ++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/r/R/duckdb.R b/r/R/duckdb.R
index 379062ce3a..a3e4efdee9 100644
--- a/r/R/duckdb.R
+++ b/r/R/duckdb.R
@@ -94,7 +94,8 @@ run_duckdb_examples <- function() {
     requireNamespace("duckdb", quietly = TRUE) &&
     packageVersion("duckdb") > "0.2.7" &&
     requireNamespace("dplyr", quietly = TRUE) &&
-    requireNamespace("dbplyr", quietly = TRUE)
+    requireNamespace("dbplyr", quietly = TRUE) &&
+    getRversion() >= 4
 }
 
 # Adapted from dbplyr
diff --git a/r/tests/testthat/test-duckdb.R b/r/tests/testthat/test-duckdb.R
index dd3026855c..24e8cadf2e 100644
--- a/r/tests/testthat/test-duckdb.R
+++ b/r/tests/testthat/test-duckdb.R
@@ -17,6 +17,8 @@
 
 skip_if_not_available("dataset")
 skip_on_cran()
+# DuckDB 0.7.1-1 may have errors with R<4.0
+skip_on_r_older_than("4.0")
 
 # this test needs to be the first one since all other test blocks are skipped
 # if duckdb is not installed