Running ‘testthat.R’ [30s/45s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidytransit)
  > 
  > test_check("tidytransit")
  [ FAIL 20 | WARN 0 | SKIP 6 | PASS 84 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (6)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-as_tidygtfs.R:2:1'): (code run outside of `test_that()`) ───────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(routing.zip) at test-as_tidygtfs.R:2:0
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-headways.R:35:3'): Route frequencies (headways) w/ service id ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 1, , value = `<list>`) at test-headways.R:35:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, , value = `<list>`) at test-headways.R:35:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xo, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-raptor.R:4:1'): (code run outside of `test_that()`) ────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(local_gtfs_path) at test-raptor.R:4:0
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:12:3'): read_gtfs() imports a local file to a 
            list of dataframes and doesnt 
            delete the source file ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(local_gtfs_path) at test-read-gtfs.R:12:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:19:3'): loud read_gtfs ─────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test-read-gtfs.R:19:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─tidytransit::read_gtfs(local_gtfs_path, quiet = FALSE)
    5.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    6.     └─tidytransit:::prepare_tidygtfs_tables(x)
    7.       └─tidytransit:::set_dates_services(gtfs_obj)
    8.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    9.         └─dplyr:::full_join.data.frame(...)
   10.           └─dplyr:::join_mutate(...)
   11.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   12.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   13.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.                   ├─base::withCallingHandlers(...)
   16.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:25:3'): gtfsio arguments ───────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test-read-gtfs.R:25:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─tidytransit::read_gtfs(local_gtfs_path, encoding = "UTF-8")
    5.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    6.     └─tidytransit:::prepare_tidygtfs_tables(x)
    7.       └─tidytransit:::set_dates_services(gtfs_obj)
    8.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    9.         └─dplyr:::full_join.data.frame(...)
   10.           └─dplyr:::join_mutate(...)
   11.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   12.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   13.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.                   ├─base::withCallingHandlers(...)
   16.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:33:3'): tidygtfs class inheritance list ────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-read-gtfs.R:33:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─tidytransit::read_gtfs(local_gtfs_path)
    5.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    6.     └─tidytransit:::prepare_tidygtfs_tables(x)
    7.       └─tidytransit:::set_dates_services(gtfs_obj)
    8.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    9.         └─dplyr:::full_join.data.frame(...)
   10.           └─dplyr:::join_mutate(...)
   11.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   12.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   13.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.                   ├─base::withCallingHandlers(...)
   16.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:106:3'): NA times ──────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-read-gtfs.R:106:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-read-gtfs.R:113:3'): non-unique stop_ids ───────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-read-gtfs.R:113:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-service.R:6:3'): set_servicepattern ────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(gpath) at test-service.R:6:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-service.R:19:3'): set_servicepattern w/ more params ────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(gpath) at test-service.R:19:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-spatial.R:147:1'): (code run outside of `test_that()`) ─────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-spatial.R:147:0
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-time.R:74:3'): set_dates_services() works with additions and exceptions ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit:::set_dates_services(gtest) at test-time.R:74:2
    2.   ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    3.   └─dplyr:::full_join.data.frame(...)
    4.     └─dplyr:::join_mutate(...)
    5.       ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    6.       └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    7.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:5:3'): summary.tidygtfs ────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(gpath) at test-utils.R:5:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:23:3'): print.tidygtfs ─────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(gpath) at test-utils.R:23:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:28:3'): filter_stops ───────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-utils.R:28:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:36:3'): filter_feed_by_stops ───────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-utils.R:36:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:84:3'): filter_feed_by_date ────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-utils.R:84:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils.R:106:3'): empty_strings_to_na ───────────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─tidytransit::empty_strings_to_na(g1) at test-utils.R:106:2
   2.   ├─base::`[<-`(`*tmp*`, gtfs_obj[[tbl]] == "", value = `<lgl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, gtfs_obj[[tbl]] == "", value = `<lgl>`)
   4.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-validate.R:9:3'): warning for duplicated primary key ───────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─tidytransit::read_gtfs(...) at test-validate.R:9:2
    2.   └─tidytransit:::gtfs_to_tidygtfs(g, files = files)
    3.     └─tidytransit:::prepare_tidygtfs_tables(x)
    4.       └─tidytransit:::set_dates_services(gtfs_obj)
    5.         ├─dplyr::full_join(date_service_df, additions, by = c("date", "service_id"))
    6.         └─dplyr:::full_join.data.frame(...)
    7.           └─dplyr:::join_mutate(...)
    8.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.                   ├─base::withCallingHandlers(...)
   13.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 20 | WARN 0 | SKIP 6 | PASS 84 ]
  Error: Test failures
  Execution halted