Last updated on 2026-11-13 05:51:54 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 2.0.8 | 139.32 | 164.29 | 303.61 | OK | |
| r-devel-linux-x86_64-debian-gcc | 2.0.8 | 128.81 | 175.61 | 304.42 | OK | |
| r-devel-linux-x86_64-fedora-clang | 2.1.0 | 134.00 | 118.38 | 252.38 | OK | |
| r-devel-linux-x86_64-fedora-gcc | 2.1.0 | 268.00 | 563.41 | 831.41 | OK | |
| r-devel-windows-x86_64 | 2.0.8 | 211.00 | 395.00 | 606.00 | OK | |
| r-patched-linux-x86_64 | 2.0.8 | 170.51 | 251.99 | 422.50 | OK | |
| r-release-linux-x86_64 | 2.0.8 | 169.28 | 252.14 | 421.42 | OK | |
| r-release-macos-arm64 | 2.1.0 | 52.00 | 29.00 | 81.00 | OK | |
| r-release-macos-x86_64 | 2.1.0 | 189.00 | 232.00 | 421.00 | OK | |
| r-release-windows-x86_64 | 2.0.8 | 205.00 | 331.00 | 536.00 | OK | |
| r-oldrel-macos-arm64 | 2.1.0 | 63.00 | 30.00 | 93.00 | ERROR | |
| r-oldrel-macos-x86_64 | 2.1.0 | 188.00 | 419.00 | 607.00 | OK | |
| r-oldrel-windows-x86_64 | 2.0.8 | 254.00 | 430.00 | 684.00 | OK |
Version: 2.1.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [16s/17s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> if (requireNamespace("testthat", quietly = TRUE)) {
+ testthat::test_check(
+ "acousticTS",
+ reporter = testthat::SummaryReporter$new()
+ )
+ }
Loading required package: acousticTS
acoustics_utilities: .......................................................................
bbfm: ..............
bessel_functions: ..........................................................................................................................................................................................................................................................................................................................................................................................................................
calibration_sphere: ......................
canonicalize_shape: ................
class_inheritance: ....................................................................................
cylinder_modal_models: ...................................................................
data_objects: ......................................................
dwba_profiles: ............................................................................................................................................................................
essms: ........
generic_methods: .................................
geometry_internal_helpers: ......................................
harmonics: ...........................................
helper_utilities: .............
hpa: .......................
krm_modal_reference: .........................................................................................................................
krm_vectorization: ......
math_utilities: ................................................................................................
modal_series: ............SS.
model_helper_branches: ...........................................................................
model_initialization: .........................................................
model_registry: ...........................................
native_kernels: .
pcdwba: ..................................
pkgdown_helpers: ........................................
psms_helpers: ........................................................................S........SSS..SSS............................S...................................................S................SSSSSSSSSS
scatterer_reforge: .........................................................................................................................................................................................................................................................................................................................
sdwba_phase_convention: ...
sdwba_pipeline: .........................................................................................
shape_creation: .........................................................................................................
shape_internal_helpers: ...................................................................
shape_manipulation: .....................................................................
simulation: ...................................SS.....S.....................................................................................................................SS.S...............
spheroidal: .........................................................................................................................................................................................................................................................................................................................................................................................
target_strength: .......................................................
tmm: ........................................
*** caught segfault ***
address 0x1, cause 'invalid permissions'
Traceback:
1: rcond(lhs_proj)
2: doTryCatch(return(expr), name, parentenv, handler)
3: tryCatchOne(expr, names, parentenv, handlers[[1L]])
4: tryCatchList(expr, classes, parentenv, handlers)
5: tryCatch(rcond(lhs_proj), error = function(...) NA_real_)
6: .tmm_solve_spherical_block(setup = setup, boundary = boundary, k_sw = acoustics$k_sw[frequency_idx], k_body = acoustics$k_body[frequency_idx], rho_sw = rho_sw, rho_body = rho_body)
7: .tmm_spherical_stored_frequency_sweep(acoustics = acoustics, theta_body = body$theta_body, boundary = parameters$boundary, shape_parameters = shape_parameters, rho_sw = medium$density, rho_body = body$density, store_t_matrix = parameters$store_t_matrix)
8: (function (object) { model_params <- acousticTS::extract(object, "model_parameters")$TMM parameters <- model_params$parameters acoustics <- parameters$acoustics medium <- model_params$medium body <- model_params$body shape_parameters <- acousticTS::extract(object, "shape_parameters") if (identical(parameters$coordinate_system, "sphere_modal")) { shell_result <- .tmm_run_shell_sphere_branch(acoustics = acoustics, body = body, boundary = parameters$boundary) methods::slot(object, "model")$TMM <- shell_result$model if (isTRUE(parameters$store_t_matrix)) { methods::slot(object, "model_parameters")$TMM$parameters$t_matrix <- shell_result$t_matrix } return(object) } if (.tmm_is_spheroidal_branch(shape_parameters, parameters$boundary)) { spheroidal_result <- .tmm_run_spheroidal_branch(object = object, acoustics = acoustics, medium = medium, parameters = parameters) methods::slot(object, "model")$TMM <- spheroidal_result$model methods::slot(object, "model_parameters")$TMM$parameters$acoustics$n_max <- spheroidal_result$n_max if (isTRUE(parameters$store_t_matrix)) { methods::slot(object, "model_parameters")$TMM$parameters$t_matrix <- spheroidal_result$t_matrix } return(object) } if (identical(parameters$coordinate_system, "cylindrical")) { cylindrical_result <- .tmm_run_cylindrical_branch(shape_parameters = shape_parameters, acoustics = acoustics, body = body, boundary = parameters$boundary) methods::slot(object, "model")$TMM <- cylindrical_result$model if (isTRUE(parameters$store_t_matrix)) { methods::slot(object, "model_parameters")$TMM$parameters$t_matrix <- .tmm_store_cylindrical_branch(acoustics) } return(object) } if (!isTRUE(parameters$store_t_matrix)) { f_bs <- tmm_backscatter_cpp(frequency = acoustics$frequency, theta_body = body$theta_body, shape = shape_parameters$shape, shape_values = .tmm_shape_values(shape_parameters), boundary = parameters$boundary, sound_speed_sw = medium$sound_speed, density_sw = medium$density, density_body = body$density %||% NA_real_, sound_speed_body = body$sound_speed %||% NA_real_, n_max = acoustics$n_max) } else { stored_spherical <- .tmm_spherical_stored_frequency_sweep(acoustics = acoustics, theta_body = body$theta_body, boundary = parameters$boundary, shape_parameters = shape_parameters, rho_sw = medium$density, rho_body = body$density, store_t_matrix = parameters$store_t_matrix) f_bs <- stored_spherical$f_bs t_store <- stored_spherical$t_matrix methods::slot(object, "model_parameters")$TMM$parameters$t_matrix <- t_store } sigma_bs <- .sigma_bs(f_bs) methods::slot(object, "model")$TMM <- data.frame(frequency = acoustics$frequency, f_bs = f_bs, sigma_bs = sigma_bs, TS = db(sigma_bs), n_max = acoustics$n_max) object})(object = new("FLS", metadata = list(ID = "UID"), model_parameters = list( TMM = list(parameters = list(acoustics = list(frequency = c(1000, 38000, 180000), k_sw = c(4.25286673018789, 161.60893574714, 765.51601143382), k_body = c(4.13743236714455, 157.222429951493, 744.73782608602), n_max = c(1L, 8L, 24L)), boundary = "liquid_filled", coordinate_system = "spherical", precision = "double", n_integration = NA_integer_, store_t_matrix = TRUE, t_matrix = list( NULL, NULL, NULL)), medium = list(sound_speed = 1477.4, density = 1026.8), body = list(theta_body = 0, theta_scatter = 3.14159265358979, phi_body = 3.14159265358979, phi_scatter = 6.28318530717959, density = 1063.45676, sound_speed = 1518.61946, g_body = 1.0357, h_body = 1.0279))), model = list(TMM = list(frequency = c(1000, 38000, 180000), f_bs = c(NA_real_, NA_real_, NA_real_), sigma_bs = c(NA_real_, NA_real_, NA_real_), TS = c(NA_real_, NA_real_, NA_real_), n_max = c(NA_real_, NA_real_, NA_real_))), body = list(rpos = c(0.02, 0, 0, 0, 0, 0.0198, 0, 0, 0.00198997487421324, -0.00198997487421324, 0.0196, 0, 0, 0.0028, -0.0028, 0.0194, 0, 0, 0.0034117444218464, -0.0034117444218464, 0.0192, 0, 0, 0.00391918358845308, -0.00391918358845308, 0.019, 0, 0, 0.00435889894354068, -0.00435889894354068, 0.0188, 0, 0, 0.00474973683481517, -0.00474973683481517, 0.0186, 0, 0, 0.00510294032886923, -0.00510294032886923, 0.0184, 0, 0, 0.00542586398650022, -0.00542586398650022, 0.0182, 0, 0, 0.00572363520850167, -0.00572363520850167, 0.018, 0, 0, 0.006, -0.006, 0.0178, 0, 0, 0.00625779513886481, -0.00625779513886481, 0.0176, 0, 0, 0.00649923072370877, -0.00649923072370877, 0.0174, 0, 0, 0.00672606868832009, -0.00672606868832009, 0.0172, 0, 0, 0.00693974062915899, -0.00693974062915899, 0.017, 0, 0, 0.00714142842854285, -0.00714142842854285, 0.0168, 0, 0, 0.00733212111192934, -0.00733212111192934, 0.0166, 0, 0, 0.00751265598839718, -0.00751265598839718, 0.0164, 0, 0, 0.00768374908491942, -0.00768374908491942, 0.0162, 0, 0, 0.00784601809837321, -0.00784601809837321, 0.016, 0, 0, 0.008, -0.008, 0.0158, 0, 0, 0.00814616474176652, -0.00814616474176652, 0.0156, 0, 0, 0.00828492607088319, -0.00828492607088319, 0.0154, 0, 0, 0.00841665016500033, -0.00841665016500033, 0.0152, 0, 0, 0.00854166260162505, -0.00854166260162505, 0.015, 0, 0, 0.00866025403784439, -0.00866025403784439, 0.0148, 0, 0, 0.00877268487978452, -0.00877268487978452, 0.0146, 0, 0, 0.00887918915216925, -0.00887918915216925, 0.0144, 0, 0, 0.00897997772825746, -0.00897997772825746, 0.0142, 0, 0, 0.00907524104363074, -0.00907524104363074, 0.014, 0, 0, 0.00916515138991168, -0.00916515138991168, 0.0138, 0, 0, 0.00924986486387774, -0.00924986486387774, 0.0136, 0, 0, 0.00932952303175248, -0.00932952303175248, 0.0134, 0, 0, 0.009404254356407, -0.009404254356407, 0.0132, 0, 0, 0.00947417542586161, -0.00947417542586161, 0.013, 0, 0, 0.00953939201416946, -0.00953939201416946, 0.0128, 0, 0, 0.0096, -0.0096, 0.0126, 0, 0, 0.00965608616365865, -0.00965608616365865, 0.0124, 0, 0, 0.00970772887960928, -0.00970772887960928, 0.0122, 0, 0, 0.00975499871860576, -0.00975499871860576, 0.012, 0, 0, 0.00979795897113271, -0.00979795897113271, 0.0118, 0, 0, 0.00983666610188635, -0.00983666610188635, 0.0116, 0, 0, 0.00987117014340245, -0.00987117014340245, 0.0114, 0, 0, 0.00990151503558925, -0.00990151503558925, 0.0112, 0, 0, 0.00992773891679269, -0.00992773891679269, 0.011, 0, 0, 0.0099498743710662, -0.0099498743710662, 0.0108, 0, 0, 0.00996794863550169, -0.00996794863550169, 0.0106, 0, 0, 0.00998198377077422, -0.00998198377077422, 0.0104, 0, 0, 0.00999199679743744, -0.00999199679743744, 0.0102, 0, 0, 0.00999799979995999, -0.00999799979995999, 0.01, 0, 0, 0.01, -0.01, 0.0098, 0, 0, 0.00999799979995999, -0.00999799979995999, 0.0096, 0, 0, 0.00999199679743744, -0.00999199679743744, 0.0094, 0, 0, 0.00998198377077422, -0.00998198377077422, 0.0092, 0, 0, 0.00996794863550169, -0.00996794863550169, 0.009, 0, 0, 0.0099498743710662, -0.0099498743710662, 0.0088, 0, 0, 0.00992773891679269, -0.00992773891679269, 0.0086, 0, 0, 0.00990151503558925, -0.00990151503558925, 0.0084, 0, 0, 0.00987117014340245, -0.00987117014340245, 0.0082, 0, 0, 0.00983666610188635, -0.00983666610188635, 0.008, 0, 0, 0.00979795897113271, -0.00979795897113271, 0.0078, 0, 0, 0.00975499871860576, -0.00975499871860576, 0.0076, 0, 0, 0.00970772887960928, -0.00970772887960928, 0.0074, 0, 0, 0.00965608616365865, -0.00965608616365865, 0.0072, 0, 0, 0.0096, -0.0096, 0.007, 0, 0, 0.00953939201416946, -0.00953939201416946, 0.0068, 0, 0, 0.00947417542586161, -0.00947417542586161, 0.0066, 0, 0, 0.009404254356407, -0.009404254356407, 0.0064, 0, 0, 0.00932952303175248, -0.00932952303175248, 0.0062, 0, 0, 0.00924986486387774, -0.00924986486387774, 0.006, 0, 0, 0.00916515138991168, -0.00916515138991168, 0.0058, 0, 0, 0.00907524104363074, -0.00907524104363074, 0.0056, 0, 0, 0.00897997772825746, -0.00897997772825746, 0.0054, 0, 0, 0.00887918915216925, -0.00887918915216925, 0.0052, 0, 0, 0.00877268487978452, -0.00877268487978452, 0.005, 0, 0, 0.00866025403784439, -0.00866025403784439, 0.0048, 0, 0, 0.00854166260162505, -0.00854166260162505, 0.0046, 0, 0, 0.00841665016500033, -0.00841665016500033, 0.0044, 0, 0, 0.00828492607088319, -0.00828492607088319, 0.0042, 0, 0, 0.00814616474176652, -0.00814616474176652, 0.004, 0, 0, 0.008, -0.008, 0.0038, 0, 0, 0.00784601809837321, -0.00784601809837321, 0.0036, 0, 0, 0.00768374908491942, -0.00768374908491942, 0.0034, 0, 0, 0.00751265598839718, -0.00751265598839718, 0.0032, 0, 0, 0.00733212111192934, -0.00733212111192934, 0.003, 0, 0, 0.00714142842854285, -0.00714142842854285, 0.0028, 0, 0, 0.00693974062915899, -0.00693974062915899, 0.0026, 0, 0, 0.0067260686883201, -0.0067260686883201, 0.0024, 0, 0, 0.00649923072370877, -0.00649923072370877, 0.0022, 0, 0, 0.00625779513886481, -0.00625779513886481, 0.002, 0, 0, 0.006, -0.006, 0.0018, 0, 0, 0.00572363520850167, -0.00572363520850167, 0.0016, 0, 0, 0.00542586398650022, -0.00542586398650022, 0.0014, 0, 0, 0.00510294032886923, -0.00510294032886923, 0.0012, 0, 0, 0.00474973683481517, -0.00474973683481517, 0.001, 0, 0, 0.00435889894354067, -0.00435889894354067, 8e-04, 0, 0, 0.00391918358845309, -0.00391918358845309, 6e-04, 0, 0, 0.0034117444218464, -0.0034117444218464, 4e-04, 0, 0, 0.0028, -0.0028, 2e-04, 0, 0, 0.00198997487421324, -0.00198997487421324, 0, 0, 0, 0, 0), radius = 0.01, theta = 0, g = 1.0357, h = 1.0279, density = NULL, sound_speed = NULL, radius_curvature_ratio = NULL), shape_parameters = list(length = 0.02, radius = 0.01, n_segments = 100L, radius_shape = c(0, 0.00198997487421324, 0.0028, 0.0034117444218464, 0.00391918358845308, 0.00435889894354068, 0.00474973683481517, 0.00510294032886923, 0.00542586398650022, 0.00572363520850167, 0.006, 0.00625779513886481, 0.00649923072370877, 0.00672606868832009, 0.00693974062915899, 0.00714142842854285, 0.00733212111192934, 0.00751265598839718, 0.00768374908491942, 0.00784601809837321, 0.008, 0.00814616474176652, 0.00828492607088319, 0.00841665016500033, 0.00854166260162505, 0.00866025403784439, 0.00877268487978452, 0.00887918915216925, 0.00897997772825746, 0.00907524104363074, 0.00916515138991168, 0.00924986486387774, 0.00932952303175248, 0.009404254356407, 0.00947417542586161, 0.00953939201416946, 0.0096, 0.00965608616365865, 0.00970772887960928, 0.00975499871860576, 0.00979795897113271, 0.00983666610188635, 0.00987117014340245, 0.00990151503558925, 0.00992773891679269, 0.0099498743710662, 0.00996794863550169, 0.00998198377077422, 0.00999199679743744, 0.00999799979995999, 0.01, 0.00999799979995999, 0.00999199679743744, 0.00998198377077422, 0.00996794863550169, 0.0099498743710662, 0.00992773891679269, 0.00990151503558925, 0.00987117014340245, 0.00983666610188635, 0.00979795897113271, 0.00975499871860576, 0.00970772887960928, 0.00965608616365865, 0.0096, 0.00953939201416946, 0.00947417542586161, 0.009404254356407, 0.00932952303175248, 0.00924986486387774, 0.00916515138991168, 0.00907524104363074, 0.00897997772825746, 0.00887918915216925, 0.00877268487978452, 0.00866025403784439, 0.00854166260162505, 0.00841665016500033, 0.00828492607088319, 0.00814616474176652, 0.008, 0.00784601809837321, 0.00768374908491942, 0.00751265598839718, 0.00733212111192934, 0.00714142842854285, 0.00693974062915899, 0.0067260686883201, 0.00649923072370877, 0.00625779513886481, 0.006, 0.00572363520850167, 0.00542586398650022, 0.00510294032886923, 0.00474973683481517, 0.00435889894354067, 0.00391918358845309, 0.0034117444218464, 0.0028, 0.00198997487421324, 0), diameter_shape = 0.02, shape = "Sphere", length_units = "m", theta_units = "radians")))
9: do.call(solver_fun, list(object = target_object))
10: .run_target_strength_models(target_object = target_object, model_specs = model_specs, verbose = verbose)
11: target_strength(object, frequencies, "tmm", boundary = boundary, n_max = cutoffs, sound_speed_sw = 1477.4, density_sw = 1026.8, store_t_matrix = TRUE)
12: eval(code, test_env)
13: eval(code, test_env)
14: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt)
15: doTryCatch(return(expr), name, parentenv, handler)
16: tryCatchOne(expr, names, parentenv, handlers[[1L]])
17: tryCatchList(expr, classes, parentenv, handlers)
18: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal)
19: doWithOneRestart(return(expr), restart)
20: withOneRestart(expr, restarts[[1L]])
21: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { })
22: test_code(code, parent.frame())
23: test_that("exact spherical TMM preserves retained blocks and modal cutoffs", { frequencies <- c(1000, 38000, 180000) cutoffs <- c(1L, 8L, 24L) for (boundary in c("fixed_rigid", "pressure_release", "liquid_filled", "gas_filled")) { for (angle in c(0, 0.7, pi/2)) { object <- if (boundary == "gas_filled") { gas_generate(sphere(0.01), density_fluid = 1.24, sound_speed_fluid = 345, theta_body = angle) } else { fls_generate(sphere(0.01), g_body = 1.0357, h_body = 1.0279, theta_body = angle) } direct <- target_strength(object, frequencies, "tmm", boundary = boundary, n_max = cutoffs, sound_speed_sw = 1477.4, density_sw = 1026.8) retained <- target_strength(object, frequencies, "tmm", boundary = boundary, n_max = cutoffs, sound_speed_sw = 1477.4, density_sw = 1026.8, store_t_matrix = TRUE) expect_equal(direct@model$TMM$f_bs, retained@model$TMM$f_bs, tolerance = 2e-10) expect_equal(direct@model$TMM$TS, retained@model$TMM$TS, tolerance = 2e-10) expect_identical(direct@model$TMM$n_max, cutoffs) } } })
24: eval(code, test_env)
25: eval(code, test_env)
26: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt)
27: doTryCatch(return(expr), name, parentenv, handler)
28: tryCatchOne(expr, names, parentenv, handlers[[1L]])
29: tryCatchList(expr, classes, parentenv, handlers)
30: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal)
31: doWithOneRestart(return(expr), restart)
32: withOneRestart(expr, restarts[[1L]])
33: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { })
34: test_code(code = exprs, env = env, reporter = get_reporter() %||% StopReporter$new())
35: source_file(path, env = env(env), desc = desc, shuffle = shuffle, error_call = error_call)
36: FUN(X[[i]], ...)
37: lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call)
38: doTryCatch(return(expr), name, parentenv, handler)
39: tryCatchOne(expr, names, parentenv, handlers[[1L]])
40: tryCatchList(expr, classes, parentenv, handlers)
41: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL})
42: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call))
43: 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, desc = desc, load_package = load_package, shuffle = shuffle, error_call = error_call)
44: 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, load_package = load_package, parallel = parallel, shuffle = shuffle)
45: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed")
46: testthat::test_check("acousticTS", reporter = testthat::SummaryReporter$new())
An irrecoverable exception occurred. R is aborting now ...
Flavor: r-oldrel-macos-arm64