add tests.

rstudio · Sep 18, 2024 · d19543a · d19543a
1 parent d2c6ffc
commit d19543a
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/tests/testthat/test-python-numpy.R b/tests/testthat/test-python-numpy.R
@@ -190,3 +190,15 @@ test_that("numpy non-simple arrays work", {
                               c(3, 4)))
 
 })
+
+test_that("0-length character arrays are handled correctly", {
+  # https://github.com/rstudio/reticulate/issues/1662
+  skip_if_no_numpy()
+  np <- import("numpy")
+
+  for (dtype in c("U", "U1", "U10", "O", "S", "S1", "S10")) {
+    expect_equal(np$array(character(), dtype = dtype),
+                 array(character()))
+  }
+})
+