Running ‘testthat.R’ [13s/21s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > testthat::test_check("rock");
  Loading required package: rock
  
  
  Starting to extract all codings from all sources in directory '/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/rock/extdata' that match regular expression 'merging-test-1'.
  
  Read 2 sources.
  
  Processed codings for a total of 6 utterances, where the first six utterance identifiers are '7d8m728r', '7d8m728x', '7d8m7295', '7d8m728t', '7d8m729b' & '7d8m729d' and the last six utterance identifiers are '7d8m728r', '7d8m728x', '7d8m7295', '7d8m728t', '7d8m729b' & '7d8m729d'.
  
  
  
  Starting to load primary sources in directory '/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/rock/extdata'.
  
  
  
  Loaded 1 primary sources.
  
  Starting to merge codes into primary sources.
  
   - Starting to process primary source 'merging-test-1-primary.rock'.
     - Out of the 24 lines in this source, 20 match the uidRegex (i.e. contain an utterance identifier).
     - 6 utterances merged.
     - Starting to merge section breaks - starting with checking 6 section breaks to insert after a UID.
  Starting to write merged source 'merging-test-1-primary_merged.rock' to directory '/home/hornik/tmp/scratch/Rtmp3aMmmS'.
  [ FAIL 9 | WARN 35 | SKIP 2 | PASS 8 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • empty test (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-anchors.R:28:3'): reading anchors works ────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(examplePath) at test-anchors.R:28:2
    2. │ └─base::lapply(...)
    3. │   └─rock (local) FUN(X[[i]], ...)
    4. │     ├─base::do.call(rock::apply_graph_theme, c(list(graph = res), rock::opts$get("theme_codeTreeDiagram")))
    5. │     └─rock (local) `<fn>`(...)
    6. │       └─DiagrammeR::add_global_graph_attrs(...)
    7. │         └─... %>% dplyr::select(attr, value, attr_type)
    8. ├─dplyr::select(., attr, value, attr_type)
    9. ├─dplyr::transmute(...)
   10. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:40:3'): example 2 is read correctly ─────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_source(...) at test-rock-general.R:40:2
    2. │ ├─base::do.call(apply_graph_theme, list(utteranceDiagram, theme_utteranceDiagram))
    3. │ └─rock (local) `<fn>`(`<dgr_grph>`, `<list>`)
    4. │   └─DiagrammeR::add_global_graph_attrs(...)
    5. │     └─... %>% dplyr::select(attr, value, attr_type)
    6. ├─dplyr::select(., attr, value, attr_type)
    7. ├─dplyr::transmute(...)
    8. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
    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-rock-general.R:68:3'): a code tree is printed correctly ────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_output(print(testres), "This source contained inductive coding trees.") at test-rock-general.R:68:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─testthat::capture_output_lines(code, print, width = width)
    5. │   │   └─testthat:::eval_with_output(code, print = print, width = width)
    6. │   │     ├─withr::with_output_sink(path, withVisible(code))
    7. │   │     │ └─base::force(code)
    8. │   │     └─base::withVisible(code)
    9. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   10. ├─base::print(testres)
   11. ├─rock:::print.rock_parsedSource(testres)
   12. │ ├─base::print(graphics::plot(x$deductiveCodeTrees))
   13. │ ├─graphics::plot(x$deductiveCodeTrees)
   14. │ └─data.tree:::plot.Node(x$deductiveCodeTrees)
   15. │   └─data.tree::ToDiagrammeRGraph(x, direction, pruneFun)
   16. │     └─DiagrammeR::add_global_graph_attrs(...)
   17. │       └─... %>% dplyr::select(attr, value, attr_type)
   18. ├─dplyr::select(., attr, value, attr_type)
   19. ├─dplyr::transmute(...)
   20. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   21. └─dplyr:::full_join.data.frame(...)
   22.   └─dplyr:::join_mutate(...)
   23.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   24.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   25.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   26.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   27.           ├─base::withCallingHandlers(...)
   28.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:82:3'): an inductive code tree is read correctly using parse_sources() ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(...) at test-rock-general.R:82:2
    2. │ └─base::lapply(...)
    3. │   └─rock (local) FUN(X[[i]], ...)
    4. │     ├─base::do.call(rock::apply_graph_theme, c(list(graph = res), rock::opts$get("theme_codeTreeDiagram")))
    5. │     └─rock (local) `<fn>`(...)
    6. │       └─DiagrammeR::add_global_graph_attrs(...)
    7. │         └─... %>% dplyr::select(attr, value, attr_type)
    8. ├─dplyr::select(., attr, value, attr_type)
    9. ├─dplyr::transmute(...)
   10. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:111:3'): Multiple sources are read correctly ────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(examplePath, extension = "rock", silent = TRUE) at test-rock-general.R:111:2
    2. │ └─base::lapply(...)
    3. │   └─rock (local) FUN(X[[i]], ...)
    4. │     ├─base::do.call(apply_graph_theme, list(utteranceDiagram, theme_utteranceDiagram))
    5. │     └─rock (local) `<fn>`(`<dgr_grph>`, `<list>`)
    6. │       └─DiagrammeR::add_global_graph_attrs(...)
    7. │         └─... %>% dplyr::select(attr, value, attr_type)
    8. ├─dplyr::select(., attr, value, attr_type)
    9. ├─dplyr::transmute(...)
   10. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:139:3'): A deductive code tree is read correctly from multiple DCT files ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(examplePath, extension = "dct", silent = TRUE) at test-rock-general.R:139:2
    2. │ └─data.tree::ToDiagrammeRGraph(res$deductiveCodeTrees)
    3. │   └─DiagrammeR::add_global_graph_attrs(...)
    4. │     └─... %>% dplyr::select(attr, value, attr_type)
    5. ├─dplyr::select(., attr, value, attr_type)
    6. ├─dplyr::transmute(...)
    7. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
    8. └─dplyr:::full_join.data.frame(...)
    9.   └─dplyr:::join_mutate(...)
   10.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   11.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   12.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.           ├─base::withCallingHandlers(...)
   15.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:157:3'): Sources are exported to html properly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(examplePath, extension = "rock", silent = TRUE) at test-rock-general.R:157:2
    2. │ └─base::lapply(...)
    3. │   └─rock (local) FUN(X[[i]], ...)
    4. │     ├─base::do.call(apply_graph_theme, list(utteranceDiagram, theme_utteranceDiagram))
    5. │     └─rock (local) `<fn>`(`<dgr_grph>`, `<list>`)
    6. │       └─DiagrammeR::add_global_graph_attrs(...)
    7. │         └─... %>% dplyr::select(attr, value, attr_type)
    8. ├─dplyr::select(., attr, value, attr_type)
    9. ├─dplyr::transmute(...)
   10. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:175:3'): Coded fragments are collected properly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─rock::parse_sources(examplePath, extension = "rock", silent = TRUE) at test-rock-general.R:175:2
    2. │ └─base::lapply(...)
    3. │   └─rock (local) FUN(X[[i]], ...)
    4. │     ├─base::do.call(apply_graph_theme, list(utteranceDiagram, theme_utteranceDiagram))
    5. │     └─rock (local) `<fn>`(`<dgr_grph>`, `<list>`)
    6. │       └─DiagrammeR::add_global_graph_attrs(...)
    7. │         └─... %>% dplyr::select(attr, value, attr_type)
    8. ├─dplyr::select(., attr, value, attr_type)
    9. ├─dplyr::transmute(...)
   10. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-rock-general.R:191:3'): the example in export_codes_to_txt.Rd runs properly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-rock-general.R:191:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─rock::parse_sources(examplePath) at test-rock-general.R:197:4
    5. │ └─base::lapply(...)
    6. │   └─rock (local) FUN(X[[i]], ...)
    7. │     ├─base::do.call(apply_graph_theme, list(utteranceDiagram, theme_utteranceDiagram))
    8. │     └─rock (local) `<fn>`(`<dgr_grph>`, `<list>`)
    9. │       └─DiagrammeR::add_global_graph_attrs(...)
   10. │         └─... %>% dplyr::select(attr, value, attr_type)
   11. ├─dplyr::select(., attr, value, attr_type)
   12. ├─dplyr::transmute(...)
   13. ├─dplyr::full_join(., global_attrs_to_add, by = c("attr", "attr_type"))
   14. └─dplyr:::full_join.data.frame(...)
   15.   └─dplyr:::join_mutate(...)
   16.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   17.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   18.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   19.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   20.           ├─base::withCallingHandlers(...)
   21.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 9 | WARN 35 | SKIP 2 | PASS 8 ]
  Error: Test failures
  Execution halted