Running ‘testthat.R’ [9s/22s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(rlistings)
  Loading required package: formatters
  
  Attaching package: 'formatters'
  
  The following object is masked from 'package:base':
  
      %||%
  
  Loading required package: tibble
  > library(testthat)
  > 
  > testthat::test_check("rlistings", reporter = "check")
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  [ FAIL 35 | WARN 0 | SKIP 0 | PASS 5 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-export.R:6:5'): Listing print correctly ────────────────────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-export.R:5:3
    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. └─formatters::export_as_txt(lsting, file = NULL) at test-export.R:6:5
   10.   └─formatters::paginate_to_mpfs(...)
   11.     ├─formatters::matrix_form(...)
   12.     └─rlistings::matrix_form(...)
   13.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
   14.         ├─formatters::MatrixPrintForm(...)
   15.         │ └─base::structure(...)
   16.         ├─formatters::make_row_df(obj)
   17.         └─rlistings::make_row_df(obj)
   18.           └─rlistings (local) .local(...)
   19.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   20.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   21.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   22.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   23.                 ├─formatters (local) FUN(X[[i]], ...)
   24.                 └─formatters (local) FUN(X[[i]], ...)
   25.                   └─base::vapply(...)
   26.                     └─formatters (local) FUN(X[[i]], ...)
   27.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   28.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-export.R:22:3'): key columns repeat with export_as_txt ─────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::suppressMessages(...) at test-export.R:22:3
    2. │ └─base::withCallingHandlers(...)
    3. └─formatters::export_as_txt(lsting, lpp = 4, verbose = TRUE, page_break = "\n")
    4.   └─formatters::paginate_to_mpfs(...)
    5.     ├─formatters::matrix_form(...)
    6.     └─rlistings::matrix_form(...)
    7.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    8.         ├─formatters::MatrixPrintForm(...)
    9.         │ └─base::structure(...)
   10.         ├─formatters::make_row_df(obj)
   11.         └─rlistings::make_row_df(obj)
   12.           └─rlistings (local) .local(...)
   13.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   15.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   16.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   17.                 ├─formatters (local) FUN(X[[i]], ...)
   18.                 └─formatters (local) FUN(X[[i]], ...)
   19.                   └─base::vapply(...)
   20.                     └─formatters (local) FUN(X[[i]], ...)
   21.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   22.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-export.R:35:3'): key columns repeat with pagination with export_as_txt ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─formatters::export_as_txt(...) at test-export.R:35:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-export.R:46:3'): Listing print correctly, with paginate ────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─formatters::export_as_txt(...) at test-export.R:46:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-export.R:66:3'): export_as_txt works and repeats the correct lines in pagination ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = 33, cpp = 550, print_pages = FALSE) at test-export.R:66:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-export.R:89:3'): export_as_txt works with split_into_pages_by_var ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─formatters::export_as_txt(...) at test-export.R:89:3
    2.   ├─formatters::paginate_to_mpfs(...)
    3.   │ ├─base::unlist(...)
    4.   │ └─base::lapply(...)
    5.   │   └─formatters (local) FUN(X[[i]], ...)
    6.   │     └─base::eval(cur_call, envir = parent.frame(3L))
    7.   │       └─base::eval(cur_call, envir = parent.frame(3L))
    8.   └─formatters::paginate_to_mpfs(...)
    9.     ├─formatters::matrix_form(...)
   10.     └─rlistings::matrix_form(...)
   11.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
   12.         ├─formatters::MatrixPrintForm(...)
   13.         │ └─base::structure(...)
   14.         ├─formatters::make_row_df(obj)
   15.         └─rlistings::make_row_df(obj)
   16.           └─rlistings (local) .local(...)
   17.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   18.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   19.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   20.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   21.                 ├─formatters (local) FUN(X[[i]], ...)
   22.                 └─formatters (local) FUN(X[[i]], ...)
   23.                   └─base::vapply(...)
   24.                     └─formatters (local) FUN(X[[i]], ...)
   25.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   26.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:8:3'): Column labels are the same ───────────────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(lsting) at test-listings.R:8:3
    2. └─rlistings::matrix_form(lsting)
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:36:3'): listings work well with different formats and attributes ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(lsting) at test-listings.R:36:3
    2. └─rlistings::matrix_form(lsting)
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:106:3'): Content of listings supports newlines ──────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(mylst) at test-listings.R:106:3
    2. └─rlistings::matrix_form(mylst)
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:142:3'): column inclusion and ordering stuff ────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(head(lsting)) at test-listings.R:142:3
    2. └─rlistings::matrix_form(head(lsting))
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:225:3'): unique_rows removes duplicate rows from listing ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(lsting) at test-listings.R:225:3
    2. └─rlistings::matrix_form(lsting)
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:259:3'): as_listing custom format works in key cols ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-listings.R:259:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─formatters::matrix_form(lsting)
    5. └─rlistings::matrix_form(lsting)
    6.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    7.     ├─formatters::MatrixPrintForm(...)
    8.     │ └─base::structure(...)
    9.     ├─formatters::make_row_df(obj)
   10.     └─rlistings::make_row_df(obj)
   11.       └─rlistings (local) .local(...)
   12.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   15.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   16.             ├─formatters (local) FUN(X[[i]], ...)
   17.             └─formatters (local) FUN(X[[i]], ...)
   18.               └─base::vapply(...)
   19.                 └─formatters (local) FUN(X[[i]], ...)
   20.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   21.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:273:3'): as_listing works with NA values in key cols ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-listings.R:273:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─formatters::matrix_form(lsting)
    5. └─rlistings::matrix_form(lsting)
    6.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    7.     ├─formatters::MatrixPrintForm(...)
    8.     │ └─base::structure(...)
    9.     ├─formatters::make_row_df(obj)
   10.     └─rlistings::make_row_df(obj)
   11.       └─rlistings (local) .local(...)
   12.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   15.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   16.             ├─formatters (local) FUN(X[[i]], ...)
   17.             └─formatters (local) FUN(X[[i]], ...)
   18.               └─base::vapply(...)
   19.                 └─formatters (local) FUN(X[[i]], ...)
   20.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   21.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-listings.R:314:3'): add_listing_col works with a function when a format is applied ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-listings.R:314:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─formatters::matrix_form(lsting)
    5. └─rlistings::matrix_form(lsting)
    6.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    7.     ├─formatters::MatrixPrintForm(...)
    8.     │ └─base::structure(...)
    9.     ├─formatters::make_row_df(obj)
   10.     └─rlistings::make_row_df(obj)
   11.       └─rlistings (local) .local(...)
   12.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   15.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   16.             ├─formatters (local) FUN(X[[i]], ...)
   17.             └─formatters (local) FUN(X[[i]], ...)
   18.               └─base::vapply(...)
   19.                 └─formatters (local) FUN(X[[i]], ...)
   20.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   21.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-matrix_form.R:10:3'): matrix_form keeps relevant information and structure about the listing ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─formatters::matrix_form(lsting) at test-matrix_form.R:10:3
    2. └─rlistings::matrix_form(lsting)
    3.   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    4.     ├─formatters::MatrixPrintForm(...)
    5.     │ └─base::structure(...)
    6.     ├─formatters::make_row_df(obj)
    7.     └─rlistings::make_row_df(obj)
    8.       └─rlistings (local) .local(...)
    9.         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   10.         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   12.           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   13.             ├─formatters (local) FUN(X[[i]], ...)
   14.             └─formatters (local) FUN(X[[i]], ...)
   15.               └─base::vapply(...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   18.                     └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:13:3'): pagination works vertically ─────────
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::suppressMessages(...) at test-paginate_listing.R:13:3
    2. │ └─base::withCallingHandlers(...)
    3. └─rlistings::paginate_listing(...)
    4.   └─formatters::paginate_to_mpfs(...)
    5.     ├─formatters::matrix_form(...)
    6.     └─rlistings::matrix_form(...)
    7.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    8.         ├─formatters::MatrixPrintForm(...)
    9.         │ └─base::structure(...)
   10.         ├─formatters::make_row_df(obj)
   11.         └─rlistings::make_row_df(obj)
   12.           └─rlistings (local) .local(...)
   13.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   15.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   16.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   17.                 ├─formatters (local) FUN(X[[i]], ...)
   18.                 └─formatters (local) FUN(X[[i]], ...)
   19.                   └─base::vapply(...)
   20.                     └─formatters (local) FUN(X[[i]], ...)
   21.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   22.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:38:3'): horizontal pagination with 0 or 1 key column specified works correctly ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, cpp = 70, print_pages = FALSE) at test-paginate_listing.R:38:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:98:3'): listing works with no vertical pagination ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = NULL, print_pages = FALSE) at test-paginate_listing.R:98:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:119:3'): checking vertical pagination line calculation. ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = 8, print_pages = FALSE) at test-paginate_listing.R:119:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:132:3'): pagination: lpp and cpp correctly computed for pg_width and pg_height ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = 24, cpp = 135, print_pages = FALSE) at test-paginate_listing.R:132:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:139:3'): pagination: lpp and cpp correctly computed for page_type and font_size ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = 69, cpp = 73, print_pages = FALSE) at test-paginate_listing.R:139:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:150:3'): pagination: lpp and cpp correctly computed for lineheight ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:150:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:157:3'): pagination: lpp and cpp correctly computed for landscape ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:157:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:164:3'): pagination: lpp and cpp correctly computed for margins ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:164:3
    2.   └─formatters::paginate_to_mpfs(...)
    3.     ├─formatters::matrix_form(...)
    4.     └─rlistings::matrix_form(...)
    5.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6.         ├─formatters::MatrixPrintForm(...)
    7.         │ └─base::structure(...)
    8.         ├─formatters::make_row_df(obj)
    9.         └─rlistings::make_row_df(obj)
   10.           └─rlistings (local) .local(...)
   11.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15.                 ├─formatters (local) FUN(X[[i]], ...)
   16.                 └─formatters (local) FUN(X[[i]], ...)
   17.                   └─base::vapply(...)
   18.                     └─formatters (local) FUN(X[[i]], ...)
   19.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:175:3'): pagination works with col wrapping ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-paginate_listing.R:175:3
    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. └─rlistings::paginate_listing(...)
   10.   └─formatters::paginate_to_mpfs(...)
   11.     ├─formatters::matrix_form(...)
   12.     └─rlistings::matrix_form(...)
   13.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
   14.         ├─formatters::MatrixPrintForm(...)
   15.         │ └─base::structure(...)
   16.         ├─formatters::make_row_df(obj)
   17.         └─rlistings::make_row_df(obj)
   18.           └─rlistings (local) .local(...)
   19.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   20.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   21.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   22.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   23.                 ├─formatters (local) FUN(X[[i]], ...)
   24.                 └─formatters (local) FUN(X[[i]], ...)
   25.                   └─base::vapply(...)
   26.                     └─formatters (local) FUN(X[[i]], ...)
   27.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   28.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:200:3'): pagination repeats keycols in other pages ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-paginate_listing.R:200:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::grepl(...)
    5. │ └─base::is.factor(x)
    6. └─formatters::paginate_to_mpfs(lsting, lpp = 33, cpp = 550)
    7.   ├─formatters::matrix_form(...)
    8.   └─rlistings::matrix_form(...)
    9.     └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
   10.       ├─formatters::MatrixPrintForm(...)
   11.       │ └─base::structure(...)
   12.       ├─formatters::make_row_df(obj)
   13.       └─rlistings::make_row_df(obj)
   14.         └─rlistings (local) .local(...)
   15.           ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   16.           └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   17.             ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   18.             └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   19.               ├─formatters (local) FUN(X[[i]], ...)
   20.               └─formatters (local) FUN(X[[i]], ...)
   21.                 └─base::vapply(...)
   22.                   └─formatters (local) FUN(X[[i]], ...)
   23.                     └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   24.                       └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:234:3'): paginate_to_mpfs works with wrapping on keycols ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─formatters::paginate_to_mpfs(...) at test-paginate_listing.R:234:3
    2.   ├─formatters::matrix_form(...)
    3.   └─rlistings::matrix_form(...)
    4.     └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    5.       ├─formatters::MatrixPrintForm(...)
    6.       │ └─base::structure(...)
    7.       ├─formatters::make_row_df(obj)
    8.       └─rlistings::make_row_df(obj)
    9.         └─rlistings (local) .local(...)
   10.           ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   13.             └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   14.               ├─formatters (local) FUN(X[[i]], ...)
   15.               └─formatters (local) FUN(X[[i]], ...)
   16.                 └─base::vapply(...)
   17.                   └─formatters (local) FUN(X[[i]], ...)
   18.                     └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   19.                       └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:271:3'): paginate_to_mpfs works with wrapping on keycols when doing horizontal pagination ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─formatters::propose_column_widths(lst) at test-paginate_listing.R:271:3
    2.   ├─formatters::matrix_form(...)
    3.   └─rlistings::matrix_form(...)
    4.     └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    5.       ├─formatters::MatrixPrintForm(...)
    6.       │ └─base::structure(...)
    7.       ├─formatters::make_row_df(obj)
    8.       └─rlistings::make_row_df(obj)
    9.         └─rlistings (local) .local(...)
   10.           ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   11.           └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12.             ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   13.             └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   14.               ├─formatters (local) FUN(X[[i]], ...)
   15.               └─formatters (local) FUN(X[[i]], ...)
   16.                 └─base::vapply(...)
   17.                   └─formatters (local) FUN(X[[i]], ...)
   18.                     └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   19.                       └─formatters::open_font_dev(fontspec)
  ── Error ('test-paginate_listing.R:309:3'): paginate_listing works with split_into_pages_by_var ──
  Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rlistings::paginate_listing(lsting, lpp = 20, cpp = 65, print_pages = FALSE) at test-paginate_listing.R:309:3
    2.   ├─formatters::paginate_to_mpfs(...)
    3.   │ ├─base::unlist(...)
    4.   │ └─base::lapply(...)
    5.   │   └─formatters (local) FUN(X[[i]], ...)
    6.   │     └─base::eval(cur_call, envir = parent.frame(3L))
    7.   │       └─base::eval(cur_call, envir = parent.frame(3L))
    8.   └─formatters::paginate_to_mpfs(...)
    9.     ├─formatters::matrix_form(...)
   10.     └─rlistings::matrix_form(...)
   11.       └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
   12.         ├─formatters::MatrixPrintForm(...)
   13.         │ └─base::structure(...)
   14.         ├─formatters::make_row_df(obj)
   15.         └─rlistings::make_row_df(obj)
   16.           └─rlistings (local) .local(...)
   17.             ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   18.             └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   19.               ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   20.               └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   21.                 ├─formatters (local) FUN(X[[i]], ...)
   22.                 └─formatters (local) FUN(X[[i]], ...)
   23.                   └─base::vapply(...)
   24.                     └─formatters (local) FUN(X[[i]], ...)
   25.                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   26.                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-print.R:5:3'): Listing print correctly ─────────────────────────
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:5:3
    2. ├─base::toString(matrix_form(lsting), hsep = "-")
    3. ├─formatters::matrix_form(lsting)
    4. ├─rlistings::matrix_form(lsting)
    5. │ └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6. │   ├─formatters::MatrixPrintForm(...)
    7. │   │ └─base::structure(...)
    8. │   ├─formatters::make_row_df(obj)
    9. │   └─rlistings::make_row_df(obj)
   10. │     └─rlistings (local) .local(...)
   11. │       ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12. │       └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13. │         ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14. │         └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15. │           ├─formatters (local) FUN(X[[i]], ...)
   16. │           └─formatters (local) FUN(X[[i]], ...)
   17. │             └─base::vapply(...)
   18. │               └─formatters (local) FUN(X[[i]], ...)
   19. │                 └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20. │                   └─formatters::open_font_dev(fontspec)
   21. └─base::.handleSimpleError(...)
   22.   └─base (local) h(simpleError(msg, call))
  ── Error ('test-print.R:14:3'): Listing print correctly with different widths ──
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(...) at test-print.R:14:3
    2. ├─base::toString(matrix_form(lsting), widths = c(7, 8, 9), hsep = "-")
    3. ├─formatters::matrix_form(lsting)
    4. ├─rlistings::matrix_form(lsting)
    5. │ └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6. │   ├─formatters::MatrixPrintForm(...)
    7. │   │ └─base::structure(...)
    8. │   ├─formatters::make_row_df(obj)
    9. │   └─rlistings::make_row_df(obj)
   10. │     └─rlistings (local) .local(...)
   11. │       ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12. │       └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13. │         ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14. │         └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15. │           ├─formatters (local) FUN(X[[i]], ...)
   16. │           └─formatters (local) FUN(X[[i]], ...)
   17. │             └─base::vapply(...)
   18. │               └─formatters (local) FUN(X[[i]], ...)
   19. │                 └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20. │                   └─formatters::open_font_dev(fontspec)
   21. └─base::.handleSimpleError(...)
   22.   └─base (local) h(simpleError(msg, call))
  ── Error ('test-print.R:33:3'): as_listing produces correct output when default_formatting is specified ──
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:33:3
    2. ├─base::toString(matrix_form(lsting), hsep = "-")
    3. ├─formatters::matrix_form(lsting)
    4. ├─rlistings::matrix_form(lsting)
    5. │ └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6. │   ├─formatters::MatrixPrintForm(...)
    7. │   │ └─base::structure(...)
    8. │   ├─formatters::make_row_df(obj)
    9. │   └─rlistings::make_row_df(obj)
   10. │     └─rlistings (local) .local(...)
   11. │       ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12. │       └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13. │         ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14. │         └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15. │           ├─formatters (local) FUN(X[[i]], ...)
   16. │           └─formatters (local) FUN(X[[i]], ...)
   17. │             └─base::vapply(...)
   18. │               └─formatters (local) FUN(X[[i]], ...)
   19. │                 └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20. │                   └─formatters::open_font_dev(fontspec)
   21. └─base::.handleSimpleError(...)
   22.   └─base (local) h(simpleError(msg, call))
  ── Error ('test-print.R:73:3'): as_listing produces correct output when col_formatting is specified ──
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:73:3
    2. ├─base::toString(matrix_form(lsting), hsep = "-")
    3. ├─formatters::matrix_form(lsting)
    4. ├─rlistings::matrix_form(lsting)
    5. │ └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6. │   ├─formatters::MatrixPrintForm(...)
    7. │   │ └─base::structure(...)
    8. │   ├─formatters::make_row_df(obj)
    9. │   └─rlistings::make_row_df(obj)
   10. │     └─rlistings (local) .local(...)
   11. │       ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12. │       └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13. │         ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14. │         └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15. │           ├─formatters (local) FUN(X[[i]], ...)
   16. │           └─formatters (local) FUN(X[[i]], ...)
   17. │             └─base::vapply(...)
   18. │               └─formatters (local) FUN(X[[i]], ...)
   19. │                 └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20. │                   └─formatters::open_font_dev(fontspec)
   21. └─base::.handleSimpleError(...)
   22.   └─base (local) h(simpleError(msg, call))
  ── Error ('test-print.R:136:3'): listings support newline characters ───────────
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:136:3
    2. ├─base::toString(matrix_form(lsting), hsep = "-")
    3. ├─formatters::matrix_form(lsting)
    4. ├─rlistings::matrix_form(lsting)
    5. │ └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    6. │   ├─formatters::MatrixPrintForm(...)
    7. │   │ └─base::structure(...)
    8. │   ├─formatters::make_row_df(obj)
    9. │   └─rlistings::make_row_df(obj)
   10. │     └─rlistings (local) .local(...)
   11. │       ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   12. │       └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   13. │         ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   14. │         └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   15. │           ├─formatters (local) FUN(X[[i]], ...)
   16. │           └─formatters (local) FUN(X[[i]], ...)
   17. │             └─base::vapply(...)
   18. │               └─formatters (local) FUN(X[[i]], ...)
   19. │                 └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   20. │                   └─formatters::open_font_dev(fontspec)
   21. └─base::.handleSimpleError(...)
   22.   └─base (local) h(simpleError(msg, call))
  ── Error ('test-print.R:154:3'): listings supports wrapping ────────────────────
  Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. ├─base::strsplit(toString(lsting, widths = cw), "\n") at test-print.R:154:3
    2. ├─base::toString(lsting, widths = cw)
    3. ├─rlistings::toString(lsting, widths = cw)
    4. │ ├─base::toString(matrix_form(x), ...)
    5. │ ├─formatters::matrix_form(x)
    6. │ └─rlistings::matrix_form(x)
    7. │   └─rlistings (local) .local(obj, indent_rownames, expand_newlines)
    8. │     ├─formatters::MatrixPrintForm(...)
    9. │     │ └─base::structure(...)
   10. │     ├─formatters::make_row_df(obj)
   11. │     └─rlistings::make_row_df(obj)
   12. │       └─rlistings (local) .local(...)
   13. │         ├─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   14. │         └─rlistings:::vec_nlines(tt[[col]], max_width = colwidths[col])
   15. │           ├─base::unlist(lapply(format_colvector(colvec = vec), nlines, max_width = max_width))
   16. │           └─base::lapply(format_colvector(colvec = vec), nlines, max_width = max_width)
   17. │             ├─formatters (local) FUN(X[[i]], ...)
   18. │             └─formatters (local) FUN(X[[i]], ...)
   19. │               └─base::vapply(...)
   20. │                 └─formatters (local) FUN(X[[i]], ...)
   21. │                   └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   22. │                     └─formatters::open_font_dev(fontspec)
   23. └─base::.handleSimpleError(...)
   24.   └─base (local) h(simpleError(msg, call))
  
  [ FAIL 35 | WARN 0 | SKIP 0 | PASS 5 ]
  Error: Test failures
  Execution halted