Running 'test-all.R' [42s]
Running the tests in 'tests/test-all.R' failed.
Complete output:
  > library(testthat)
  > test_check("diffrprojects")
  Loading required package: diffrprojects
  Loading required package: stringb
  Loading required package: rtext
  -- FAILURE (test_diff_align.R:9:3): diff_align works on basic level ------------
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_diff_align.R:9:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. \-diffrprojects::diff_align("", "") test_diff_align.R:9:20
    7.   +-stringb:::tokenizer(text1)
    8.   \-stringb:::text_tokenize_lines.default(text1)
    9.     +-stringb::text_tokenize(string, "\n")
   10.     \-stringb:::text_tokenize.default(string, "\n")
   11.       \-stringb:::stringb_arrange(token, "from", "to")
   12.         +-df[eval(parse(text = order_call)), ]
   13.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   14.         +-base::eval(parse(text = order_call))
   15.         | \-base::eval(parse(text = order_call))
   16.         \-base::order(df["from"], df["to"])
   17.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.             \-base:::FUN(X[[i]], ...)
   19.               +-base::as.vector(xtfrm(x))
   20.               +-base::xtfrm(x)
   21.               \-base::xtfrm.default(x)
  
  -- FAILURE (test_diff_align.R:11:3): diff_align works on basic level -----------
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_diff_align.R:11:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. \-diffrprojects::diff_align("", "2") test_diff_align.R:11:20
    7.   +-stringb:::tokenizer(text1)
    8.   \-stringb:::text_tokenize_lines.default(text1)
    9.     +-stringb::text_tokenize(string, "\n")
   10.     \-stringb:::text_tokenize.default(string, "\n")
   11.       \-stringb:::stringb_arrange(token, "from", "to")
   12.         +-df[eval(parse(text = order_call)), ]
   13.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   14.         +-base::eval(parse(text = order_call))
   15.         | \-base::eval(parse(text = order_call))
   16.         \-base::order(df["from"], df["to"])
   17.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.             \-base:::FUN(X[[i]], ...)
   19.               +-base::as.vector(xtfrm(x))
   20.               +-base::xtfrm(x)
   21.               \-base::xtfrm.default(x)
  
  -- FAILURE (test_diff_align.R:12:3): diff_align works on basic level -----------
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_diff_align.R:12:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. \-diffrprojects::diff_align("1", "") test_diff_align.R:12:20
    7.   +-stringb:::tokenizer(text2)
    8.   \-stringb:::text_tokenize_lines.default(text2)
    9.     +-stringb::text_tokenize(string, "\n")
   10.     \-stringb:::text_tokenize.default(string, "\n")
   11.       \-stringb:::stringb_arrange(token, "from", "to")
   12.         +-df[eval(parse(text = order_call)), ]
   13.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   14.         +-base::eval(parse(text = order_call))
   15.         | \-base::eval(parse(text = order_call))
   16.         \-base::order(df["from"], df["to"])
   17.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.             \-base:::FUN(X[[i]], ...)
   19.               +-base::as.vector(xtfrm(x))
   20.               +-base::xtfrm(x)
   21.               \-base::xtfrm.default(x)
  
  -- ERROR (test_diff_align.R:13:3): diff_align works on basic level -------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_diff_align.R:13:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrprojects::diff_align("", "") test_diff_align.R:14:4
    5.   +-stringb:::tokenizer(text1)
    6.   \-stringb:::text_tokenize_lines.default(text1)
    7.     +-stringb::text_tokenize(string, "\n")
    8.     \-stringb:::text_tokenize.default(string, "\n")
    9.       \-stringb:::stringb_arrange(token, "from", "to")
   10.         +-df[eval(parse(text = order_call)), ]
   11.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   12.         +-base::eval(parse(text = order_call))
   13.         | \-base::eval(parse(text = order_call))
   14.         \-base::order(df["from"], df["to"])
   15.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.             \-base:::FUN(X[[i]], ...)
   17.               +-base::as.vector(xtfrm(x))
   18.               +-base::xtfrm(x)
   19.               \-base::xtfrm.default(x)
  
  -- ERROR (test_diff_align.R:47:3): diff_align works on level 2 -----------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_diff_align.R:47:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrprojects::diff_align("a\nc\ne", "a\nb\nc", maxDist = Inf) test_diff_align.R:48:4
    5.   +-stringb:::tokenizer(text1)
    6.   \-stringb:::text_tokenize_lines.default(text1)
    7.     +-stringb::text_tokenize(string, "\n")
    8.     \-stringb:::text_tokenize.default(string, "\n")
    9.       \-stringb:::stringb_arrange(token, "from", "to")
   10.         +-df[eval(parse(text = order_call)), ]
   11.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   12.         +-base::eval(parse(text = order_call))
   13.         | \-base::eval(parse(text = order_call))
   14.         \-base::order(df["from"], df["to"])
   15.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.             \-base:::FUN(X[[i]], ...)
   17.               +-base::as.vector(xtfrm(x))
   18.               +-base::xtfrm(x)
   19.               \-base::xtfrm.default(x)
  
  -- ERROR (test_diff_align.R:58:3): diff_align works with ignore option ---------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_diff_align.R:58:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrprojects::diff_align(...) test_diff_align.R:59:4
    5.   +-stringb:::tokenizer(text1)
    6.   \-stringb:::text_tokenize_lines.default(text1)
    7.     +-stringb::text_tokenize(string, "\n")
    8.     \-stringb:::text_tokenize.default(string, "\n")
    9.       \-stringb:::stringb_arrange(token, "from", "to")
   10.         +-df[eval(parse(text = order_call)), ]
   11.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   12.         +-base::eval(parse(text = order_call))
   13.         | \-base::eval(parse(text = order_call))
   14.         \-base::order(df["from"], df["to"])
   15.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.             \-base:::FUN(X[[i]], ...)
   17.               +-base::as.vector(xtfrm(x))
   18.               +-base::xtfrm(x)
   19.               \-base::xtfrm.default(x)
  
  -- ERROR (test_diff_align.R:70:3): diff_align works with clean option ----------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_diff_align.R:70:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrprojects::diff_align(...) test_diff_align.R:71:4
    5.   +-stringb:::tokenizer(text1)
    6.   \-stringb:::text_tokenize_lines.default(text1)
    7.     +-stringb::text_tokenize(string, "\n")
    8.     \-stringb:::text_tokenize.default(string, "\n")
    9.       \-stringb:::stringb_arrange(token, "from", "to")
   10.         +-df[eval(parse(text = order_call)), ]
   11.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   12.         +-base::eval(parse(text = order_call))
   13.         | \-base::eval(parse(text = order_call))
   14.         \-base::order(df["from"], df["to"])
   15.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.             \-base:::FUN(X[[i]], ...)
   17.               +-base::as.vector(xtfrm(x))
   18.               +-base::xtfrm(x)
   19.               \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_align.r:10:3): diffrproject text_align works -----------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_dp_align.r:10:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-dp$text_align() test_dp_align.r:17:4
    5.   \-self$text_align(...)
    6.     \-diffrprojects::diff_align(...)
    7.       +-stringb:::tokenizer(text1)
    8.       \-stringb:::text_tokenize_lines.default(text1)
    9.         +-stringb::text_tokenize(string, "\n")
   10.         \-stringb:::text_tokenize.default(string, "\n")
   11.           \-stringb:::stringb_arrange(token, "from", "to")
   12.             +-df[eval(parse(text = order_call)), ]
   13.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   14.             +-base::eval(parse(text = order_call))
   15.             | \-base::eval(parse(text = order_call))
   16.             \-base::order(df["from"], df["to"])
   17.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.                 \-base:::FUN(X[[i]], ...)
   19.                   +-base::as.vector(xtfrm(x))
   20.                   +-base::xtfrm(x)
   21.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_align.r:77:3): diffrproject alignment_delete works -----------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_dp_align.r:77:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-dp$text_align() test_dp_align.r:82:4
    5.   \-self$text_align(...)
    6.     \-diffrprojects::diff_align(...)
    7.       +-stringb:::tokenizer(text1)
    8.       \-stringb:::text_tokenize_lines.default(text1)
    9.         +-stringb::text_tokenize(string, "\n")
   10.         \-stringb:::text_tokenize.default(string, "\n")
   11.           \-stringb:::stringb_arrange(token, "from", "to")
   12.             +-df[eval(parse(text = order_call)), ]
   13.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   14.             +-base::eval(parse(text = order_call))
   15.             | \-base::eval(parse(text = order_call))
   16.             \-base::order(df["from"], df["to"])
   17.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.                 \-base:::FUN(X[[i]], ...)
   19.                   +-base::as.vector(xtfrm(x))
   20.                   +-base::xtfrm(x)
   21.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_align.r:147:3): diffrproject alignment_data_set() ------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_dp_align.r:147:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrproject$new()$text_add(list("abcd", "bcdaa", "ccdabbcd"))$text_link()$debug()$text_align(...) test_dp_align.r:148:4
    5.   \-self$text_align(...)
    6.     \-diffrprojects::diff_align(...)
    7.       \-diffrprojects:::tokenizer(text1)
    8.         +-stringb::text_tokenize(x, "") test_dp_align.r:154:39
    9.         \-stringb:::text_tokenize.default(x, "")
   10.           \-stringb:::stringb_arrange(token, "from", "to")
   11.             +-df[eval(parse(text = order_call)), ]
   12.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   13.             +-base::eval(parse(text = order_call))
   14.             | \-base::eval(parse(text = order_call))
   15.             \-base::order(df["from"], df["to"])
   16.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   17.                 \-base:::FUN(X[[i]], ...)
   18.                   +-base::as.vector(xtfrm(x))
   19.                   +-base::xtfrm(x)
   20.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_align.r:221:3): diffrproject alignment_data_code() -----------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_dp_align.r:221:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrproject$new()$text_add(list("abcd", "bcdaa", "ccdabbcd"))$text_link()$debug()$text_align(...) test_dp_align.r:222:4
    5.   \-self$text_align(...)
    6.     \-diffrprojects::diff_align(...)
    7.       \-diffrprojects:::tokenizer(text1)
    8.         +-stringb::text_tokenize(x, "") test_dp_align.r:228:39
    9.         \-stringb:::text_tokenize.default(x, "")
   10.           \-stringb:::stringb_arrange(token, "from", "to")
   11.             +-df[eval(parse(text = order_call)), ]
   12.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   13.             +-base::eval(parse(text = order_call))
   14.             | \-base::eval(parse(text = order_call))
   15.             \-base::order(df["from"], df["to"])
   16.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   17.                 \-base:::FUN(X[[i]], ...)
   18.                   +-base::as.vector(xtfrm(x))
   19.                   +-base::xtfrm(x)
   20.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_export.r:6:3): imported equals exported ----------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. \-diffrproject$new()$text_add(list("aaa\nbb\ncccc\ndd\nee\nff\ny\n", ... test_dp_export.r:6:2
    2.   \-self$text_align(...)
    3.     \-diffrprojects::diff_align(...)
    4.       +-stringb:::tokenizer(text1)
    5.       \-stringb:::text_tokenize_lines.default(text1)
    6.         +-stringb::text_tokenize(string, "\n")
    7.         \-stringb:::text_tokenize.default(string, "\n")
    8.           \-stringb:::stringb_arrange(token, "from", "to")
    9.             +-df[eval(parse(text = order_call)), ]
   10.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   11.             +-base::eval(parse(text = order_call))
   12.             | \-base::eval(parse(text = order_call))
   13.             \-base::order(df["from"], df["to"])
   14.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   15.                 \-base:::FUN(X[[i]], ...)
   16.                   +-base::as.vector(xtfrm(x))
   17.                   +-base::xtfrm(x)
   18.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_dp_loadsave.r:6:3): loaded equals saved -------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. \-diffrproject$new()$text_add(list("aaa\nbb\ncccc\ndd\nee\nff\ny\n", ... test_dp_loadsave.r:6:2
    2.   \-self$text_align(...)
    3.     \-diffrprojects::diff_align(...)
    4.       +-stringb:::tokenizer(text1)
    5.       \-stringb:::text_tokenize_lines.default(text1)
    6.         +-stringb::text_tokenize(string, "\n")
    7.         \-stringb:::text_tokenize.default(string, "\n")
    8.           \-stringb:::stringb_arrange(token, "from", "to")
    9.             +-df[eval(parse(text = order_call)), ]
   10.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   11.             +-base::eval(parse(text = order_call))
   12.             | \-base::eval(parse(text = order_call))
   13.             \-base::order(df["from"], df["to"])
   14.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   15.                 \-base:::FUN(X[[i]], ...)
   16.                   +-base::as.vector(xtfrm(x))
   17.                   +-base::xtfrm(x)
   18.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_tools.r:48:3): as.data.frame methods work -----------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. \-dp$text_align() test_tools.r:48:2
    2.   \-self$text_align(...)
    3.     \-diffrprojects::diff_align(...)
    4.       +-stringb:::tokenizer(text1)
    5.       \-stringb:::text_tokenize_lines.default(text1)
    6.         +-stringb::text_tokenize(string, "\n")
    7.         \-stringb:::text_tokenize.default(string, "\n")
    8.           \-stringb:::stringb_arrange(token, "from", "to")
    9.             +-df[eval(parse(text = order_call)), ]
   10.             +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   11.             +-base::eval(parse(text = order_call))
   12.             | \-base::eval(parse(text = order_call))
   13.             \-base::order(df["from"], df["to"])
   14.               \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   15.                 \-base:::FUN(X[[i]], ...)
   16.                   +-base::as.vector(xtfrm(x))
   17.                   +-base::xtfrm(x)
   18.                   \-base::xtfrm.default(x)
  
  -- ERROR (test_tools.r:428:3): dp_arrange works --------------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_identical(...) test_tools.r:428:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-diffrprojects:::dp_arrange(data.frame(i = 10:9), i) test_tools.r:429:4
    5.   +-df[eval(parse(text = order_call)), ]
    6.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    7.   +-base::eval(parse(text = order_call))
    8.   | \-base::eval(parse(text = order_call))
    9.   \-base::order(df["i"])
   10.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   11.       \-base:::FUN(X[[i]], ...)
   12.         +-base::as.vector(xtfrm(x))
   13.         +-base::xtfrm(x)
   14.         \-base::xtfrm.default(x)
  
  == testthat results  ===========================================================
  FAILURE (test_diff_align.R:9:3): diff_align works on basic level
  FAILURE (test_diff_align.R:11:3): diff_align works on basic level
  FAILURE (test_diff_align.R:12:3): diff_align works on basic level
  ERROR (test_diff_align.R:13:3): diff_align works on basic level
  ERROR (test_diff_align.R:47:3): diff_align works on level 2
  ERROR (test_diff_align.R:58:3): diff_align works with ignore option
  ERROR (test_diff_align.R:70:3): diff_align works with clean option
  ERROR (test_dp_align.r:10:3): diffrproject text_align works
  ERROR (test_dp_align.r:77:3): diffrproject alignment_delete works
  ERROR (test_dp_align.r:147:3): diffrproject alignment_data_set()
  ERROR (test_dp_align.r:221:3): diffrproject alignment_data_code()
  ERROR (test_dp_export.r:6:3): imported equals exported
  ERROR (test_dp_loadsave.r:6:3): loaded equals saved
  ERROR (test_tools.r:48:3): as.data.frame methods work
  ERROR (test_tools.r:428:3): dp_arrange works
  
  [ FAIL 15 | WARN 0 | SKIP 0 | PASS 87 ]
  Error: Test failures
  Execution halted