From c65e0d477c65fd85351e0804ce673efa9626db85 Mon Sep 17 00:00:00 2001
From: Tom Ebergen <tom@ebergen.com>
Date: Tue, 26 Sep 2023 11:42:10 +0200
Subject: [PATCH] skip test on previous versions of R

---
 tests/testthat/test_strings.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/testthat/test_strings.R b/tests/testthat/test_strings.R
index 6cfe86f67..8029679c7 100644
--- a/tests/testthat/test_strings.R
+++ b/tests/testthat/test_strings.R
@@ -1,6 +1,8 @@
 library(duckdb)
 
 test_that("Invalid unicode produces an error", {
+  # this doesn't throw an error on previous versions of R
+  skip_if_no_R4()
   con <- DBI::dbConnect(duckdb::duckdb())
 
   my_df <- structure(list(no_municipio_esc = "Est\xe2ncia", no_municipio_prova = "Est\xe2ncia"), row.names = 16L, class = "data.frame")