You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@arrow.apache.org by jo...@apache.org on 2022/04/29 22:34:17 UTC

[arrow] branch master updated: ARROW-16073: [R] clean-up date time unit testing once tzdb is available on Windows

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

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


The following commit(s) were added to refs/heads/master by this push:
     new 3c03d49364 ARROW-16073: [R] clean-up date time unit testing once tzdb is available on Windows
3c03d49364 is described below

commit 3c03d4936445781e29e41392d9a0bc3db62b39f2
Author: Dragoș Moldovan-Grünfeld <dr...@gmail.com>
AuthorDate: Fri Apr 29 17:34:09 2022 -0500

    ARROW-16073: [R] clean-up date time unit testing once tzdb is available on Windows
    
    Closes #12883 from dragosmg/datetime_unit_testing_cleanup
    
    Authored-by: Dragoș Moldovan-Grünfeld <dr...@gmail.com>
    Signed-off-by: Jonathan Keane <jk...@gmail.com>
---
 r/tests/testthat/test-dplyr-funcs-datetime.R | 5 -----
 r/tests/testthat/test-dplyr-funcs-type.R     | 7 +++++--
 2 files changed, 5 insertions(+), 7 deletions(-)

diff --git a/r/tests/testthat/test-dplyr-funcs-datetime.R b/r/tests/testthat/test-dplyr-funcs-datetime.R
index a4c5ee3c22..47626a6cb1 100644
--- a/r/tests/testthat/test-dplyr-funcs-datetime.R
+++ b/r/tests/testthat/test-dplyr-funcs-datetime.R
@@ -841,8 +841,6 @@ test_that("month() supports integer input", {
       test_df_month
     )
 
-    skip_on_os("windows") # https://issues.apache.org/jira/browse/ARROW-13168
-
     compare_dplyr_binding(
       .input %>%
         # R returns ordered factor whereas Arrow returns character
@@ -904,8 +902,6 @@ test_that("month() errors with double input and returns NA with int outside 1:12
 })
 
 test_that("date works in arrow", {
-  # https://issues.apache.org/jira/browse/ARROW-13168
-  skip_on_os("windows")
   # this date is specific since lubridate::date() is different from base::as.Date()
   # since as.Date returns the UTC date and date() doesn't
   test_df <- tibble(
@@ -1123,7 +1119,6 @@ test_that("difftime works correctly", {
     ignore_attr = TRUE
   )
 
-  skip_on_os("windows")
   test_df_with_tz <- tibble(
     time1 = as.POSIXct(
       c("2021-02-20", "2021-07-31", "2021-10-30", "2021-01-31"),
diff --git a/r/tests/testthat/test-dplyr-funcs-type.R b/r/tests/testthat/test-dplyr-funcs-type.R
index 6a07d36e81..e4283e39b5 100644
--- a/r/tests/testthat/test-dplyr-funcs-type.R
+++ b/r/tests/testthat/test-dplyr-funcs-type.R
@@ -873,7 +873,6 @@ test_that("`as.Date()` and `as_date()`", {
     fixed = TRUE
   )
 
-
   # we do not support as.Date() with double/ float (error surfaced from C++)
   # TODO revisit after https://issues.apache.org/jira/browse/ARROW-15798
   expect_error(
@@ -958,7 +957,11 @@ test_that("`as_datetime()`", {
 })
 
 test_that("format date/time", {
-  skip_on_os("windows") # https://issues.apache.org/jira/browse/ARROW-13168
+  # locale issues
+  # TODO revisit after https://issues.apache.org/jira/browse/ARROW-16399 is done
+  if (tolower(Sys.info()[["sysname"]]) == "windows") {
+    withr::local_locale(LC_TIME = "C")
+  }
   # In 3.4 the lack of tzone attribute causes spurious failures
   skip_if_r_version("3.4.4")