Running ‘testthat.R’ [21s/27s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(unstruwwel)
  > 
  > test_check("unstruwwel")
  [ FAIL 9 | WARN 0 | SKIP 0 | PASS 116 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-century.R:22'): positive century with take ─────────────────────
  Error in ``<.POSIXt`(int_start(private$.interval), ymd("0000-01-01"))`: object 'check_tzones' not found
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-century.R:22:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─Century$new(15)$take(c(1, "half"))
    5.   ├─base::suppressWarnings(...)
    6.   │ └─base::withCallingHandlers(...)
    7.   └─base::tryCatch(...)
    8.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    9.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   10.         └─value[[3L]](cond)
  ── Error ('test-century.R:62'): negative century with take ─────────────────────
  Error in ``<.POSIXt`(int_start(private$.interval), ymd("0000-01-01"))`: object 'check_tzones' not found
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-century.R:62:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─Century$new(-15)$take(c(1, "half"))
    5.   ├─base::suppressWarnings(...)
    6.   │ └─base::withCallingHandlers(...)
    7.   └─base::tryCatch(...)
    8.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    9.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   10.         └─value[[3L]](cond)
  ── Error ('test-decade.R:23'): positive decade with take ───────────────────────
  Error in ``<.POSIXt`(int_start(private$.interval), ymd("0000-01-01"))`: object 'check_tzones' not found
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-decade.R:23:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─Decade$new(1970)$take(c(1, "half"))
    5.   ├─base::suppressWarnings(...)
    6.   │ └─base::withCallingHandlers(...)
    7.   └─base::tryCatch(...)
    8.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    9.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   10.         └─value[[3L]](cond)
  ── Error ('test-decade.R:54'): negative decade with take ───────────────────────
  Error in ``<.POSIXt`(int_start(private$.interval), ymd("0000-01-01"))`: object 'check_tzones' not found
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-decade.R:54:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─Decade$new(-1970)$take(c(1, "half"))
    5.   ├─base::suppressWarnings(...)
    6.   │ └─base::withCallingHandlers(...)
    7.   └─base::tryCatch(...)
    8.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    9.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   10.         └─value[[3L]](cond)
  ── Failure ('test-unstruwwel.R:105'): date with century ────────────────────────
  get_item(x)$time_span not equal to c(401, 450).
  1/2 mismatches
  [2] 500 - 450 == 50
  ── Failure ('test-unstruwwel.R:106'): date with century ────────────────────────
  get_item(x)$iso_format not equal to "0401-01-01/0450-12-31".
  1/1 mismatches
  x[1]: "0401-01-01/0500-12-31"
  y[1]: "0401-01-01/0450-12-31"
  ── Failure ('test-unstruwwel.R:111'): date with century ────────────────────────
  get_item(unstruwwel("last third 17th cent", "en")) not equal to c(1667, 1700).
  1/2 mismatches
  [1] 1601 - 1667 == -66
  ── Failure ('test-unstruwwel.R:125'): trailing zero ────────────────────────────
  get_item(x)$time_span not equal to c(101, 150).
  1/2 mismatches
  [2] 200 - 150 == 50
  ── Failure ('test-unstruwwel.R:126'): trailing zero ────────────────────────────
  get_item(x)$iso_format not equal to "0101-01-01~/0150-12-31~".
  1/1 mismatches
  x[1]: "0101-01-01~/0200-12-31~"
  y[1]: "0101-01-01~/0150-12-31~"
  
  [ FAIL 9 | WARN 0 | SKIP 0 | PASS 116 ]
  Error: Test failures
  Execution halted