Error when running tests: BATCH: line 60: 40766 Bus error

[barracuda156]

* checking tests ...
  Running ‘testthat.R’/opt/local/Library/Frameworks/R.framework/Resources/bin/BATCH: line 60: 40766 Bus error               ${R_HOME}/bin/R -f ${in} ${opts} ${R_BATCH_OPTIONS} > ${out} 2>&1

 ERROR
Running the tests in ‘tests/testthat.R’ failed.
Last 13 lines of output:
  32: tryCatch(code, testthat_abort_reporter = function(cnd) {    cat(conditionMessage(cnd), "\n")    NULL})
  33: with_reporter(reporters$multi, lapply(test_paths, test_one_file,     env = env, wrap = wrap))
  34: test_files_serial(test_dir = test_dir, test_package = test_package,     test_paths = test_paths, load_helpers = load_helpers, reporter = reporter,     env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,     wrap = wrap, load_package = load_package)
  35: test_files(test_dir = path, test_paths = test_paths, test_package = package,     reporter = reporter, load_helpers = load_helpers, env = env,     stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,     wrap = wrap, load_package = load_package, parallel = parallel)
  36: test_dir("testthat", package = package, reporter = reporter,     ..., load_package = "installed")
  37: test_check("websocket")
  An irrecoverable exception occurred. R is aborting now ...

R 4.2.2, gcc 12.2.0, macOS 10.6.8, websocket 1.4.1

[barracuda156]

R version 4.2.2 (2022-10-31) -- "Innocent and Trusting"
Copyright (C) 2022 The R Foundation for Statistical Computing
Platform: powerpc-apple-darwin10.8.0 (32-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(testthat)
R(40766,0xa0dfb620) malloc: *** error for object 0xa0d51754: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0xa0d517c4: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2bb02c0: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf928: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf890: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf8dc: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf7c8: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf6a0: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf5c0: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf630: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2baf4f8: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2bb0200: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2bb0380: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2bb038c: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xa0dfb620) malloc: *** error for object 0x2bb03a8: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
> library(websocket)
> 
> test_check("websocket")
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug

 *** caught bus error ***

Traceback:
 1: execCallbacks(timeoutSecs, all, loop$id)
 2: later::run_now(0.1)
 3: eval(code, test_env)
 4: eval(code, test_env)
 5: withCallingHandlers({    eval(code, test_env)    if (!handled && !is.null(test)) {        skip_empty()    }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,     message = handle_message, error = handle_error)
 6: doTryCatch(return(expr), name, parentenv, handler)
 7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
 8: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
 9: doTryCatch(return(expr), name, parentenv, handler)
10: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),     names[nh], parentenv, handlers[[nh]])
11: tryCatchList(expr, classes, parentenv, handlers)
12: tryCatch(withCallingHandlers({    eval(code, test_env)    if (!handled && !is.null(test)) {        skip_empty()    }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,     message = handle_message, error = handle_error), error = handle_fatal,     skip = function(e) {    })
13: test_code(desc, code, env = parent.frame(), reporter = reporter)
14: test_that("Connection errors are reported", {    error_reported <- FALSE    ws <- WebSocket$new("ws://example.com")    ws$onError(function(event) {        expect_identical(ws, event[["target"]])        expect_true(is.character(event[["message"]]))        expect_true(nzchar(event[["message"]]))        error_reported <<- TRUE    })    end_time <- as.numeric(Sys.time()) + 10    while (ws$readyState() != 3L && as.numeric(Sys.time()) <         end_time) {        later::run_now(0.1)    }    expect_true(error_reported)})
15: eval(code, test_env)
16: eval(code, test_env)
17: withCallingHandlers({    eval(code, test_env)    if (!handled && !is.null(test)) {        skip_empty()    }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,     message = handle_message, error = handle_error)
18: doTryCatch(return(expr), name, parentenv, handler)
19: tryCatchOne(expr, names, parentenv, handlers[[1L]])
20: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
21: doTryCatch(return(expr), name, parentenv, handler)
22: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]),     names[nh], parentenv, handlers[[nh]])
23: tryCatchList(expr, classes, parentenv, handlers)
24: tryCatch(withCallingHandlers({    eval(code, test_env)    if (!handled && !is.null(test)) {        skip_empty()    }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,     message = handle_message, error = handle_error), error = handle_fatal,     skip = function(e) {    })
25: test_code(NULL, exprs, env)
26: source_file(path, child_env(env), wrap = wrap)
27: FUN(X[[i]], ...)
28: lapply(test_paths, test_one_file, env = env, wrap = wrap)
29: doTryCatch(return(expr), name, parentenv, handler)
30: tryCatchOne(expr, names, parentenv, handlers[[1L]])
31: tryCatchList(expr, classes, parentenv, handlers)
32: tryCatch(code, testthat_abort_reporter = function(cnd) {    cat(conditionMessage(cnd), "\n")    NULL})
33: with_reporter(reporters$multi, lapply(test_paths, test_one_file,     env = env, wrap = wrap))
34: test_files_serial(test_dir = test_dir, test_package = test_package,     test_paths = test_paths, load_helpers = load_helpers, reporter = reporter,     env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,     wrap = wrap, load_package = load_package)
35: test_files(test_dir = path, test_paths = test_paths, test_package = package,     reporter = reporter, load_helpers = load_helpers, env = env,     stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning,     wrap = wrap, load_package = load_package, parallel = parallel)
36: test_dir("testthat", package = package, reporter = reporter,     ..., load_package = "installed")
37: test_check("websocket")
An irrecoverable exception occurred. R is aborting now ...
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug
R(40766,0xb0019000) malloc: *** error for object 0xb000ff18: pointer being freed was not allocated
*** set a breakpoint in malloc_error_break to debug

P. S. These malloc errors are a known issue, unrelated to websocket or R. They occur with a number of packages and do not as such cause failures. (Reason for those is an unfixed bug in GCC and duplicate libstdc++ in older macOS with modern compiler.)