Running 'testthat.R' [35s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(rscala)
  > 
  > test_check("rscala")
  Starting instance. ********************************
  -- 1. Error: primitives work in callbacks (@tests-callbacks.R#8)  --------------
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = x) * "R.evalI0(\"%-\",x)", as.integer(x)) at testthat/tests-callbacks.R:8
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = x), "R.evalI0(\"%-\",x)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 2. Error: length 1 vectors work in callbacks (@tests-callbacks.R#26)  -------
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = I(x)) * "R.evalI1(\"I(%-)\",x)", as.integer(x)) at testthat/tests-callbacks.R:26
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = I(x)), "R.evalI1(\"I(%-)\",x)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 3. Error: length 2 vectors work in callbacks (@tests-callbacks.R#36)  -------
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = x) * "R.evalI1(\"%-\",x)", as.integer(x)) at testthat/tests-callbacks.R:36
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = x), "R.evalI1(\"%-\",x)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 4. Error: matrices work in callbacks (@tests-callbacks.R#51)  ---------------
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = x) * "R.evalI2(\"%-\",x)", xi) at testthat/tests-callbacks.R:51
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = x), "R.evalI2(\"%-\",x)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 5. Failure: misc. stuff works as expected (@tests-callbacks.R#59)  ----------
  `s * "R.eval(\"%-\",List(1,2))"` threw an error with unexpected message.
  Expected match: "^Invocation error"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 6. Error: we evaluate in the calling R environment. (@tests-callbacks.R#69)  
  missing value where TRUE/FALSE needed
  1: `*.rscalaBridge`(s(x = x), "R.eval(\"a <- %-\",x)") at testthat/tests-callbacks.R:69
  2: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  3: scalaConnect(details)
  4: stop(details[["config"]]$error$message)
  
  -- 7. Error: references work (@tests-dollar.R#8)  ------------------------------
  missing value where TRUE/FALSE needed
  1: s$.new_scala.util.Random() at testthat/tests-dollar.R:8
  2: scalaInvoke(details, snippet, list(...), parent.frame(1))
  3: scalaConnect(details)
  4: stop(details[["config"]]$error$message)
  
  -- 8. Error: (unknown) (@tests-lexical-scoping.R#15)  --------------------------
  missing value where TRUE/FALSE needed
  1: `^.rscalaBridge`(s(x = 1, y), function() {
         z <- evalD0("z")
         x + y * z
     }) at testthat/tests-lexical-scoping.R:15
  2: scalaConnect(details)
  3: stop(details[["config"]]$error$message)
  
  -- 9. Error: regular matrices transfer to Scala as expected by rows (@tests-matr
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md2by3) * "m(0)", md2by3[1, ]) at testthat/tests-matrices.R:12
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md2by3), "m(0)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 10. Error: regular matrices transfer to Scala as expected in full (@tests-mat
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md2by3) * "m", md2by3) at testthat/tests-matrices.R:21
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md2by3), "m")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 11. Error: column vector transfer to Scala as expected by rows (@tests-matric
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md2by1) * "m(0)", md2by1[1, ]) at testthat/tests-matrices.R:35
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md2by1), "m(0)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 12. Error: column vector transfer to Scala as expected in full (@tests-matric
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md2by1) * "m", md2by1) at testthat/tests-matrices.R:43
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md2by1), "m")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 13. Error: row vector transfer to Scala as expected by rows (@tests-matrices.
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md1by2) * "m(0)", md1by2[1, ]) at testthat/tests-matrices.R:57
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md1by2), "m(0)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 14. Error: row vector transfer to Scala as expected in full (@tests-matrices.
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md1by2) * "m", md1by2) at testthat/tests-matrices.R:65
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md1by2), "m")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 15. Error: matrix with no columns and multipe rows transfer to Scala as expec
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md2by0) * "m", md2by0) at testthat/tests-matrices.R:79
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md2by0), "m")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 16. Error: matrix with no columns and one row transfer to Scala as expected i
  missing value where TRUE/FALSE needed
  1: expect_identical(s(m = md1by0) * "m", md1by0) at testthat/tests-matrices.R:93
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(m = md1by0), "m")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 17. Failure: matrix with no rows transfer to Scala as expected in full (@test
  `s(m = md0by2) * "m"` threw an error with unexpected message.
  Expected match: "^Number of rows must be at least 1"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 18. Failure: matrix with no rows transfer to Scala as expected in full (@test
  `s(m = mi0by2) * "m"` threw an error with unexpected message.
  Expected match: "^Number of rows must be at least 1"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 19. Failure: matrix with no rows transfer to Scala as expected in full (@test
  `s(m = ml0by2) * "m"` threw an error with unexpected message.
  Expected match: "^Number of rows must be at least 1"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 20. Failure: matrix with no rows transfer to Scala as expected in full (@test
  `s(m = mr0by2) * "m"` threw an error with unexpected message.
  Expected match: "^Number of rows must be at least 1"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 21. Failure: matrix with no rows transfer to Scala as expected in full (@test
  `s(m = mc0by2) * "m"` threw an error with unexpected message.
  Expected match: "^Number of rows must be at least 1"
  Actual message: "missing value where TRUE/FALSE needed"
  
  -- 22. Error: Basic serialization works (@tests-object-serialization.R#12)  ----
  missing value where TRUE/FALSE needed
  1: myExpect(list(a = 1, b = c(TRUE, FALSE), c = I(3)), "generic", as.is = TRUE) at testthat/tests-object-serialization.R:12
  2: scalaPush(obj, method, s, ...) at testthat/tests-object-serialization.R:6
  3: pushers[[method]](x, bridge, ...)
  4: bridge$.R.evalObject("x")
  5: scalaInvoke(details, snippet, list(...), parent.frame(1))
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 23. Error: serialization captures output (@tests-output-serialization.R#6)  -
  missing value where TRUE/FALSE needed
  1: expect_silent(s2 * "print(\"Hi\")") at testthat/tests-output-serialization.R:6
  2: quasi_capture(enquo(object), evaluate_promise)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: withr::with_output_sink(temp, withCallingHandlers(withVisible(code), warning = handle_warning, 
         message = handle_message))
  5: force(code)
  6: withCallingHandlers(withVisible(code), warning = handle_warning, message = handle_message)
  7: withVisible(code)
  8: eval_bare(get_expr(quo), get_env(quo))
  9: `*.rscalaBridge`(s2, "print(\"Hi\")")
  10: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  11: scalaConnect(details)
  12: stop(details[["config"]]$error$message)
  
  Hello 0 from R.
  -- 24. Error: recursive callbacks work (@tests-recursion.R#46)  ----------------
  missing value where TRUE/FALSE needed
  1: expect_identical(f(0, TRUE), 10L) at testthat/tests-recursion.R:46
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: f(0, TRUE)
  5: f(s(counter = as.integer(counter[1]), verbose = verbose) * "\n    if ( verbose ) println(\"Hello %s from Scala.\".format(counter))\n    R.evalI0(\"%- + 1L\",counter)\n  ", 
         verbose = verbose) at testthat/tests-recursion.R:8
  6: `*.rscalaBridge`(s(counter = as.integer(counter[1]), verbose = verbose), "\n    if ( verbose ) println(\"Hello %s from Scala.\".format(counter))\n    R.evalI0(\"%- + 1L\",counter)\n  ") at testthat/tests-recursion.R:6
  7: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  8: scalaConnect(details)
  9: stop(details[["config"]]$error$message)
  
  -- 25. Error: Basic transcompilation works (@tests-transcompile.R#16)  ---------
  missing value where TRUE/FALSE needed
  1: myExpect(function() {
         numeric(4)
     }) at testthat/tests-transcompile.R:16
  2: `^.rscalaBridge`(s, f) at testthat/tests-transcompile.R:6
  3: scalaConnect(details)
  4: stop(details[["config"]]$error$message)
  
  -- 26. Error: Apply and update work (@tests-transcompile.R#76)  ----------------
  missing value where TRUE/FALSE needed
  1: myExpect(function() c(11, 12, 13)[c(1, 1, 2, 2, 2, 3)]) at testthat/tests-transcompile.R:76
  2: `^.rscalaBridge`(s, f) at testthat/tests-transcompile.R:6
  3: scalaConnect(details)
  4: stop(details[["config"]]$error$message)
  
  -- 27. Error: More basic transcompilation works (@tests-transcompile.R#102)  ---
  missing value where TRUE/FALSE needed
  1: myExpect(f, list(F, F)) at testthat/tests-transcompile.R:102
  2: `^.rscalaBridge`(s, f) at testthat/tests-transcompile.R:6
  3: scalaConnect(details)
  4: stop(details[["config"]]$error$message)
  
  -- 28. Error: Misc. items work as expected (@tests-transcompile.R#124)  --------
  missing value where TRUE/FALSE needed
  1: expect_identical(x <- {
         r <- s()^function(x = scalaType("Array[Boolean]")) {
             mean(x)
         }
         r(c(T, F, T, T, F))
     }, mean(c(T, F, T, T, F))) at testthat/tests-transcompile.R:124
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `^.rscalaBridge`(s(), function(x = scalaType("Array[Boolean]")) {
         mean(x)
     }) at testthat/tests-transcompile.R:124
  5: scalaConnect(details)
  6: stop(details[["config"]]$error$message)
  
  -- 29. Error: Scala snippets can be embedded (@tests-transcompile.R#137)  ------
  missing value where TRUE/FALSE needed
  1: expect_identical((s^function() {
         a = 1:13
         I("a.sum")
     })(), sum(1:13)) at testthat/tests-transcompile.R:137
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `^.rscalaBridge`(s, function() {
         a = 1:13
         I("a.sum")
     })
  5: scalaConnect(details)
  6: stop(details[["config"]]$error$message)
  
  -- 30. Error: Recursion works (@tests-transcompile.R#146)  ---------------------
  missing value where TRUE/FALSE needed
  1: expect_identical((s^self)(3L), self(3L)) at testthat/tests-transcompile.R:146
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `^.rscalaBridge`(s, self)
  5: scalaConnect(details)
  6: stop(details[["config"]]$error$message)
  
  -- 31. Error: The following work: return, break, next, &&, ||, %%, %/%, T, F, !=
  missing value where TRUE/FALSE needed
  1: expect_output((s^f)(3.1, T, T, T), capture.output(invisible(f(3.1, T, T, T))), fixed = TRUE) at testthat/tests-transcompile.R:163
  2: quasi_capture(enquo(object), capture_output, label = label)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: capture_output_lines(code, print, width = width)
  5: eval_with_output(code, print = print, width = width)
  6: withr::with_output_sink(temp, withVisible(code))
  7: force(code)
  8: withVisible(code)
  9: eval_bare(get_expr(quo), get_env(quo))
  10: `^.rscalaBridge`(s, f)
  11: scalaConnect(details)
  12: stop(details[["config"]]$error$message)
  
  -- 32. Error: length 1 as primitives, bridge without a parameter list (@tests-ve
  missing value where TRUE/FALSE needed
  1: expect_identical(s * "0", 0L) at testthat/tests-vectors.R:6
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s, "0")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 33. Error: length 1 as primitives, bridge with a parameter list (@tests-vecto
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = 0L) * "x", 0L) at testthat/tests-vectors.R:19
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = 0L), "x")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 34. Error: length 1 as vector, bridge with a parameter list (@tests-vectors.R
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = I(0L)) * "x(0)", 0L) at testthat/tests-vectors.R:32
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = I(0L)), "x(0)")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 35. Error: length 0 as primitives, bridge with a parameter list (@tests-vecto
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = integer()) * "x", integer()) at testthat/tests-vectors.R:45
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = integer()), "x")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  -- 36. Error: length 3 as primitives, bridge with a parameter list (@tests-vecto
  missing value where TRUE/FALSE needed
  1: expect_identical(s(x = c(0L, 1L, 2L)) * "x", c(0L, 1L, 2L)) at testthat/tests-vectors.R:53
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: `*.rscalaBridge`(s(x = c(0L, 1L, 2L)), "x")
  5: scalaInvoke(details, snippet, args, parent.frame(1), withNames = TRUE)
  6: scalaConnect(details)
  7: stop(details[["config"]]$error$message)
  
  == testthat results  ===========================================================
  OK: 2 SKIPPED: 0 FAILED: 36
  1. Error: primitives work in callbacks (@tests-callbacks.R#8) 
  2. Error: length 1 vectors work in callbacks (@tests-callbacks.R#26) 
  3. Error: length 2 vectors work in callbacks (@tests-callbacks.R#36) 
  4. Error: matrices work in callbacks (@tests-callbacks.R#51) 
  5. Failure: misc. stuff works as expected (@tests-callbacks.R#59) 
  6. Error: we evaluate in the calling R environment. (@tests-callbacks.R#69) 
  7. Error: references work (@tests-dollar.R#8) 
  8. Error: (unknown) (@tests-lexical-scoping.R#15) 
  9. Error: regular matrices transfer to Scala as expected by rows (@tests-matrices.R#12) 
  1. ...
  
  Error: testthat unit tests failed
  Stopping instance. **************************
  Execution halted