Running ‘testthat.R’ [14s/17s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(git2rdata)
  > 
  > test_check("git2rdata")
  Saving _problems/test_a_basics-354.R
  Saving _problems/test_b_special-85.R
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 589 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_a_basics.R:344:3'): user specified na strings work ─────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test_a_basics.R:344:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─git2rdata::write_vc(...)
    5. └─git2rdata:::write_vc.character(...)
    6.   ├─git2rdata::meta(...)
    7.   └─git2rdata:::meta.data.frame(...)
    8.     ├─base::as.data.frame(z, row.names = seq_len(nrow(x)), stringsAsFactors = FALSE)
    9.     └─base::as.data.frame.list(z, row.names = seq_len(nrow(x)), stringsAsFactors = FALSE)
   10.       ├─base::do.call(data.frame, c(x, alis))
   11.       └─base (local) `<fn>`(...)
   12.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test_b_special.R:82:3'): handle special characters ──────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test_b_special.R:82:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::suppressWarnings(write_vc(z, "factor", root, sorting = "a"))
    5. │ └─base::withCallingHandlers(...)
    6. ├─git2rdata::write_vc(z, "factor", root, sorting = "a")
    7. └─git2rdata:::write_vc.character(z, "factor", root, sorting = "a")
    8.   ├─git2rdata::meta(...)
    9.   └─git2rdata:::meta.data.frame(...)
   10.     ├─base::as.data.frame(z, row.names = seq_len(nrow(x)), stringsAsFactors = FALSE)
   11.     └─base::as.data.frame.list(z, row.names = seq_len(nrow(x)), stringsAsFactors = FALSE)
   12.       ├─base::do.call(data.frame, c(x, alis))
   13.       └─base (local) `<fn>`(...)
   14.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   15.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 589 ]
  Error:
  ! Test failures.
  Execution halted