Running ‘spelling.R’
  Running ‘testthat.R’ [16s/16s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidysq)
  
  Attaching package: 'tidysq'
  
  The following object is masked from 'package:base':
  
      paste
  
  > 
  > test_check("tidysq")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • warning handling on C++ side is poorly implemented (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-concatenate.R:93:3): c() generalizes any standard type and untyped sequences to unt sq ──
  Error: Can't combine `..1` <tidysq alphabet> and `..2` <tidysq alphabet>.
  x Some attributes are incompatible.
  i The author of the class should implement vctrs methods.
  i See <https://vctrs.r-lib.org/reference/faq-error-incompatible-attributes.html>.
  Backtrace:
       █
    1. ├─testthat::expect_vector(...) test-concatenate.R:93:2
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::c(sq_dna_bsc, sq_unt, sq_dna_bsc)
    5. └─vctrs:::c.vctrs_vctr(sq_dna_bsc, sq_unt, sq_dna_bsc)
    6.   └─vctrs::vec_c(...)
    7.     └─(function () ...
    8.       └─tidysq:::vec_ptype2.sq_dna_bsc.sq_unt(...)
    9.         ├─tidysq:::sq_ptype(union(alphabet(x), alphabet(y)), "unt")
   10.         │ ├─vctrs::new_list_of(...)
   11.         │ │ └─vctrs::new_vctr(x, ..., ptype = ptype, class = c(class, "vctrs_list_of"))
   12.         │ └─tidysq:::sq_alphabet(str_alphabet, type)
   13.         │   └─vctrs::new_vctr(alph, type = type, class = c("sq_alphabet", "character"))
   14.         │     └─rlang::is_vector(.data)
   15.         └─base::union(alphabet(x), alphabet(y))
   16.           ├─base::c(...)
   17.           └─vctrs:::c.vctrs_vctr(...)
   18.             └─vctrs::vec_c(...)
   19.               └─(function () ...
   20.                 └─vctrs::vec_default_ptype2(...)
   21.                   └─vctrs::stop_incompatible_type(...)
   22.                     └─vctrs:::stop_incompatible(...)
   23.                       └─vctrs:::stop_vctrs(...)
  ── Error (test-concatenate.R:114:3): c() on any standard type and untyped sequences return correct value ──
  Error: Can't combine `..1` <tidysq alphabet> and `..2` <tidysq alphabet>.
  x Some attributes are incompatible.
  i The author of the class should implement vctrs methods.
  i See <https://vctrs.r-lib.org/reference/faq-error-incompatible-attributes.html>.
  Backtrace:
       █
    1. ├─testthat::expect_identical(...) test-concatenate.R:114:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::c(sq_dna_bsc, sq_unt, sq_dna_bsc)
    5. └─vctrs:::c.vctrs_vctr(sq_dna_bsc, sq_unt, sq_dna_bsc)
    6.   └─vctrs::vec_c(...)
    7.     └─(function () ...
    8.       └─tidysq:::vec_ptype2.sq_dna_bsc.sq_unt(...)
    9.         ├─tidysq:::sq_ptype(union(alphabet(x), alphabet(y)), "unt")
   10.         │ ├─vctrs::new_list_of(...)
   11.         │ │ └─vctrs::new_vctr(x, ..., ptype = ptype, class = c(class, "vctrs_list_of"))
   12.         │ └─tidysq:::sq_alphabet(str_alphabet, type)
   13.         │   └─vctrs::new_vctr(alph, type = type, class = c("sq_alphabet", "character"))
   14.         │     └─rlang::is_vector(.data)
   15.         └─base::union(alphabet(x), alphabet(y))
   16.           ├─base::c(...)
   17.           └─vctrs:::c.vctrs_vctr(...)
   18.             └─vctrs::vec_c(...)
   19.               └─(function () ...
   20.                 └─vctrs::vec_default_ptype2(...)
   21.                   └─vctrs::stop_incompatible_type(...)
   22.                     └─vctrs:::stop_incompatible(...)
   23.                       └─vctrs:::stop_vctrs(...)
  ── Error (test-paste.R:29:3): paste() finds common prototype for all arguments (recycling length 1 vectors if necessary) ──
  Error: Can't combine `..1` <tidysq alphabet> and `..2` <tidysq alphabet>.
  x Some attributes are incompatible.
  i The author of the class should implement vctrs methods.
  i See <https://vctrs.r-lib.org/reference/faq-error-incompatible-attributes.html>.
  Backtrace:
       █
    1. ├─testthat::expect_vector(...) test-paste.R:29:2
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidysq::paste(sq_dna_1, sq_unt_3, sq_dna_2)
    5. └─tidysq:::paste.sq(sq_dna_1, sq_unt_3, sq_dna_2)
    6.   ├─tidysq:::CPP_paste(vec_cast_common(...), NA_letter)
    7.   └─vctrs::vec_cast_common(...)
    8.     └─(function () ...
    9.       └─tidysq:::vec_ptype2.sq_dna_bsc.sq_unt(...)
   10.         ├─tidysq:::sq_ptype(union(alphabet(x), alphabet(y)), "unt")
   11.         │ ├─vctrs::new_list_of(...)
   12.         │ │ └─vctrs::new_vctr(x, ..., ptype = ptype, class = c(class, "vctrs_list_of"))
   13.         │ └─tidysq:::sq_alphabet(str_alphabet, type)
   14.         │   └─vctrs::new_vctr(alph, type = type, class = c("sq_alphabet", "character"))
   15.         │     └─rlang::is_vector(.data)
   16.         └─base::union(alphabet(x), alphabet(y))
   17.           ├─base::c(...)
   18.           └─vctrs:::c.vctrs_vctr(...)
   19.             └─vctrs::vec_c(...)
   20.               └─(function () ...
   21.                 └─vctrs::vec_default_ptype2(...)
   22.                   └─vctrs::stop_incompatible_type(...)
   23.                     └─vctrs:::stop_incompatible(...)
   24.                       └─vctrs:::stop_vctrs(...)
  ── Error (test-paste.R:57:3): paste() correctly merges sq objects of different types and alphabets ──
  Error: Can't combine `..1` <tidysq alphabet> and `..2` <tidysq alphabet>.
  x Some attributes are incompatible.
  i The author of the class should implement vctrs methods.
  i See <https://vctrs.r-lib.org/reference/faq-error-incompatible-attributes.html>.
  Backtrace:
       █
    1. ├─testthat::expect_identical(...) test-paste.R:57:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidysq::paste(sq_dna_1, sq_unt_3, sq_dna_2)
    5. └─tidysq:::paste.sq(sq_dna_1, sq_unt_3, sq_dna_2)
    6.   ├─tidysq:::CPP_paste(vec_cast_common(...), NA_letter)
    7.   └─vctrs::vec_cast_common(...)
    8.     └─(function () ...
    9.       └─tidysq:::vec_ptype2.sq_dna_bsc.sq_unt(...)
   10.         ├─tidysq:::sq_ptype(union(alphabet(x), alphabet(y)), "unt")
   11.         │ ├─vctrs::new_list_of(...)
   12.         │ │ └─vctrs::new_vctr(x, ..., ptype = ptype, class = c(class, "vctrs_list_of"))
   13.         │ └─tidysq:::sq_alphabet(str_alphabet, type)
   14.         │   └─vctrs::new_vctr(alph, type = type, class = c("sq_alphabet", "character"))
   15.         │     └─rlang::is_vector(.data)
   16.         └─base::union(alphabet(x), alphabet(y))
   17.           ├─base::c(...)
   18.           └─vctrs:::c.vctrs_vctr(...)
   19.             └─vctrs::vec_c(...)
   20.               └─(function () ...
   21.                 └─vctrs::vec_default_ptype2(...)
   22.                   └─vctrs::stop_incompatible_type(...)
   23.                     └─vctrs:::stop_incompatible(...)
   24.                       └─vctrs:::stop_vctrs(...)
  
  [ FAIL 4 | WARN 0 | SKIP 1 | PASS 789 ]
  Error: Test failures
  Execution halted