Running 'spelling.R' [0s]
  Running 'testthat.R' [9s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(fgeo.tool)
  
  Attaching package: 'fgeo.tool'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following object is masked from 'package:stats':
  
      filter
  
  > 
  > test_check("fgeo.tool")
  [ FAIL 2 | WARN 1 | SKIP 9 | PASS 286 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (1)
  • ctfs cannot be loaded (6)
  • fgeo.data cannot be loaded (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure (test-read_fgeo.R:7:3): read_vft fails gracefully if data has missing columns ──
  `read_vft(comma)` threw an error with unexpected message.
  Expected match: "DBHID"
  Actual message: "number of characters is not computable in \"bytes\" encoding, element 1"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(read_vft(comma), "DBHID") at test-read_fgeo.R:7:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─fgeo.tool::read_vft(comma)
    7. │ ├─delim %||% guess_comma_or_tab(file, names(col_types))
    8. │ └─fgeo.tool:::guess_comma_or_tab(file, names(col_types))
    9. │   ├─base::suppressWarnings(...)
   10. │   │ └─base::withCallingHandlers(...)
   11. │   ├─base::suppressMessages(readr::read_csv(file, n_max = 0))
   12. │   │ └─base::withCallingHandlers(...)
   13. │   └─readr::read_csv(file, n_max = 0)
   14. │     └─vroom::vroom(...)
   15. │       └─vroom:::vroom_(...)
   16. ├─vroom (local) `<fn>`(`<col_spec>`, 32L, `<chr>`, NULL, "unique")
   17. │ └─vctrs::vec_as_names(col_names, repair = name_repair)
   18. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   19.   └─rlang::names_inform_repair(orig_names, names)
   20.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   21.       ├─base::withRestarts(...)
   22.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   23.       │   └─base (local) doWithOneRestart(return(expr), restart)
   24.       └─base::signalCondition(cnd)
   25.         ├─base::conditionMessage(cond)
   26.         └─rlang:::conditionMessage.rlang_message(cond)
   27.           └─rlang::cnd_message(c)
   28.             └─rlang:::cnd_message_format(cnd, ...)
   29.               └─rlang (local) cli_format(glue_escape(lines))
   30.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   31.                   └─cli::cli_format(x, .envir = emptyenv())
   32.                     └─cli:::fmt(...)
   33.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   34.                         ├─base::do.call(app[[msg$type]], msg$args)
   35.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-18", class = NULL)
   36.                           └─cli:::clii_bullets(app, text, id, class)
   37.                             └─base::lapply(...)
   38.                               └─cli (local) FUN(X[[i]], ...)
   39.                                 └─app$text(text[[i]])
   40.                                   └─cli:::clii_text(app, text)
   41.                                     └─app$xtext(text)
   42.                                       └─cli:::clii__xtext(...)
   43.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   44.                                           └─base::lapply(pars, ansi_trimws)
   45.                                             └─cli (local) FUN(X[[i]], ...)
  ── Error (test-read_fgeo.R:15:3): read_vft guesses tab or comma separated file, silently ──
  Error in `nchar(xs)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(out <- read_vft(file)) at test-read_fgeo.R:15:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─fgeo.tool::read_vft(file)
   10. │ ├─delim %||% guess_comma_or_tab(file, names(col_types))
   11. │ └─fgeo.tool:::guess_comma_or_tab(file, names(col_types))
   12. │   ├─base::suppressWarnings(...)
   13. │   │ └─base::withCallingHandlers(...)
   14. │   ├─base::suppressMessages(readr::read_csv(file, n_max = 0))
   15. │   │ └─base::withCallingHandlers(...)
   16. │   └─readr::read_csv(file, n_max = 0)
   17. │     └─vroom::vroom(...)
   18. │       └─vroom:::vroom_(...)
   19. ├─vroom (local) `<fn>`(`<col_spec>`, 33L, `<chr>`, NULL, "unique")
   20. │ └─vctrs::vec_as_names(col_names, repair = name_repair)
   21. └─vctrs:::describe_repair(`<chr>`, `<chr>`)
   22.   └─rlang::names_inform_repair(orig_names, names)
   23.     └─rlang::inform(message = message, class = "rlib_message_name_repair")
   24.       ├─base::withRestarts(...)
   25.       │ └─base (local) withOneRestart(expr, restarts[[1L]])
   26.       │   └─base (local) doWithOneRestart(return(expr), restart)
   27.       └─base::signalCondition(cnd)
   28.         ├─base::conditionMessage(cond)
   29.         └─rlang:::conditionMessage.rlang_message(cond)
   30.           └─rlang::cnd_message(c)
   31.             └─rlang:::cnd_message_format(cnd, ...)
   32.               └─rlang (local) cli_format(glue_escape(lines))
   33.                 └─rlang:::.rlang_cli_format(x, cli::format_message)
   34.                   └─cli::cli_format(x, .envir = emptyenv())
   35.                     └─cli:::fmt(...)
   36.                       └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   37.                         ├─base::do.call(app[[msg$type]], msg$args)
   38.                         └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-36", class = NULL)
   39.                           └─cli:::clii_bullets(app, text, id, class)
   40.                             └─base::lapply(...)
   41.                               └─cli (local) FUN(X[[i]], ...)
   42.                                 └─app$text(text[[i]])
   43.                                   └─cli:::clii_text(app, text)
   44.                                     └─app$xtext(text)
   45.                                       └─cli:::clii__xtext(...)
   46.                                         └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   47.                                           └─base::lapply(pars, ansi_trimws)
   48.                                             └─cli (local) FUN(X[[i]], ...)
  
  [ FAIL 2 | WARN 1 | SKIP 9 | PASS 286 ]
  Error: Test failures
  Execution halted