Last updated on 2024-11-14 01:49:11 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.0.5 | 15.91 | 36.74 | 52.65 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.0.5 | 12.69 | 25.53 | 38.22 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.0.5 | 81.13 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 1.0.5 | 79.72 | ERROR | |||
| r-devel-windows-x86_64 | 1.0.5 | 28.00 | 78.00 | 106.00 | OK | |
| r-patched-linux-x86_64 | 1.0.5 | 17.88 | 34.37 | 52.25 | OK | |
| r-release-linux-x86_64 | 1.0.5 | 16.36 | 34.54 | 50.90 | OK | |
| r-release-macos-arm64 | 1.0.5 | 42.00 | OK | |||
| r-release-macos-x86_64 | 1.0.5 | 37.00 | OK | |||
| r-release-windows-x86_64 | 1.0.5 | 27.00 | 79.00 | 106.00 | OK | |
| r-oldrel-macos-arm64 | 1.0.5 | 36.00 | OK | |||
| r-oldrel-macos-x86_64 | 1.0.5 | 70.00 | OK | |||
| r-oldrel-windows-x86_64 | 1.0.5 | 28.00 | 84.00 | 112.00 | OK |
Version: 1.0.5
Check: examples
Result: ERROR
Running examples in ‘epanet2toolkit-Ex.R’ failed
The error most likely occurred in:
> ### Name: ENinitH
> ### Title: Initialize hydraulic engine
> ### Aliases: ENinitH
>
> ### ** Examples
>
> # path to Net1.inp example file included with this package
> inp <- file.path( find.package("epanet2toolkit"), "extdata","Net1.inp")
> ENopen( inp, "Net1.rpt")
> ENopenH()
*** caught segfault ***
address 0x1, cause 'memory not mapped'
Traceback:
1: ENopenH()
An irrecoverable exception occurred. R is aborting now ...
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.0.5
Check: tests
Result: ERROR
Running ‘testthat.r’
Running the tests in ‘tests/testthat.r’ failed.
Complete output:
> #*****************************************
> #
> # (C) Copyright IBM Corp. 2017
> # Author: Ernesto Arandia & Bradley J Eck
> #
> #*****************************************
>
>
>
>
> library(testthat)
> library(epanet2toolkit)
>
> test_check("epanet2toolkit")
*** caught segfault ***
address 0x1, cause 'memory not mapped'
Traceback:
1: .Call("enSetControl", 3, 0, 119, 1, 95, 17)
2: eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
3: withVisible(code)
4: withCallingHandlers(withVisible(code), warning = handle_warning, message = handle_message)
5: force(code)
6: withr::with_output_sink(path, withCallingHandlers(withVisible(code), warning = handle_warning, message = handle_message))
7: .capture(act$val <- eval_bare(quo_get_expr(.quo), quo_get_env(.quo)), ...)
8: quasi_capture(enquo(object), NULL, evaluate_promise)
9: expect_silent({ out <- .Call("enOpen", c("Net3.inp", "net3.rpt", " ")) ind1 <- .Call("enGetNodeIndex", "10") ind2 <- .Call("enGetNodeIndex", "15") ind3 <- .Call("enGetNodeIndex", "20") id1 <- .Call("enGetNodeID", 1) type1 <- .Call("enGetNodeType", ind3) type2 <- .Call("enGetNodeType", ind2) elev1 <- .Call("enGetNodeValue", ind3, 0) indlink <- .Call("enGetLinkIndex", "20") idlink <- .Call("enGetLinkID", 5) typelink <- .Call("enGetLinkType", indlink) diamlink <- .Call("enGetLinkValue", indlink, 0) nodeslink <- .Call("enGetLinkNodes", indlink) idpatt <- .Call("enGetPatternID", 3) indexpatt <- .Call("enGetPatternIndex", "2") lenpatt <- .Call("enGetPatternLen", 5) valpatt <- .Call("enGetPatternValue", 3, 12) ctrl1 <- .Call("enGetControl", 1) ctrl2 <- .Call("enGetControl", 2) ctrl3 <- .Call("enGetControl", 3) ctrl4 <- .Call("enGetControl", 4) ctrl5 <- .Call("enGetControl", 5) units <- .Call("enGetFlowUnits") timepar <- .Call("enGetTimeParam", 0) qtype <- .Call("enGetQualType") ver <- .Call("enGetVersion") setctrl <- .Call("enSetControl", 3, 0, 119, 1, 95, 17) nodevalout <- .Call("enSetNodeValue", 1, 0, 156) linkvalout <- .Call("enSetLinkValue", 3, 2, 189) setpatt <- .Call("enSetPattern", 3, as.numeric(rep(621, 24)), 24) valpatt <- .Call("enGetPatternValue", 3, 12) out <- .Call("enClose")})
10: eval(code, test_env)
11: eval(code, test_env)
12: 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)
13: doTryCatch(return(expr), name, parentenv, handler)
14: tryCatchOne(expr, names, parentenv, handlers[[1L]])
15: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
16: doTryCatch(return(expr), name, parentenv, handler)
17: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]])
18: tryCatchList(expr, classes, parentenv, handlers)
19: 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) { })
20: test_code(desc, code, env = parent.frame(), default_reporter = local_interactive_reporter())
21: test_that("call the funcs", { expect_silent({ out <- .Call("enOpen", c("Net3.inp", "net3.rpt", " ")) ind1 <- .Call("enGetNodeIndex", "10") ind2 <- .Call("enGetNodeIndex", "15") ind3 <- .Call("enGetNodeIndex", "20") id1 <- .Call("enGetNodeID", 1) type1 <- .Call("enGetNodeType", ind3) type2 <- .Call("enGetNodeType", ind2) elev1 <- .Call("enGetNodeValue", ind3, 0) indlink <- .Call("enGetLinkIndex", "20") idlink <- .Call("enGetLinkID", 5) typelink <- .Call("enGetLinkType", indlink) diamlink <- .Call("enGetLinkValue", indlink, 0) nodeslink <- .Call("enGetLinkNodes", indlink) idpatt <- .Call("enGetPatternID", 3) indexpatt <- .Call("enGetPatternIndex", "2") lenpatt <- .Call("enGetPatternLen", 5) valpatt <- .Call("enGetPatternValue", 3, 12) ctrl1 <- .Call("enGetControl", 1) ctrl2 <- .Call("enGetControl", 2) ctrl3 <- .Call("enGetControl", 3) ctrl4 <- .Call("enGetControl", 4) ctrl5 <- .Call("enGetControl", 5) units <- .Call("enGetFlowUnits") timepar <- .Call("enGetTimeParam", 0) qtype <- .Call("enGetQualType") ver <- .Call("enGetVersion") setctrl <- .Call("enSetControl", 3, 0, 119, 1, 95, 17) nodevalout <- .Call("enSetNodeValue", 1, 0, 156) linkvalout <- .Call("enSetLinkValue", 3, 2, 189) setpatt <- .Call("enSetPattern", 3, as.numeric(rep(621, 24)), 24) valpatt <- .Call("enGetPatternValue", 3, 12) out <- .Call("enClose") })})
22: eval(code, test_env)
23: eval(code, test_env)
24: 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)
25: doTryCatch(return(expr), name, parentenv, handler)
26: tryCatchOne(expr, names, parentenv, handlers[[1L]])
27: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
28: doTryCatch(return(expr), name, parentenv, handler)
29: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]])
30: tryCatchList(expr, classes, parentenv, handlers)
31: 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) { })
32: test_code(test = NULL, code = exprs, env = env, default_reporter = StopReporter$new())
33: source_file(path, env = env(env), desc = desc, error_call = error_call)
34: FUN(X[[i]], ...)
35: lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call)
36: doTryCatch(return(expr), name, parentenv, handler)
37: tryCatchOne(expr, names, parentenv, handlers[[1L]])
38: tryCatchList(expr, classes, parentenv, handlers)
39: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL})
40: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call))
41: 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, error_call = error_call)
42: 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)
43: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed")
44: test_check("epanet2toolkit")
An irrecoverable exception occurred. R is aborting now ...
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.0.5
Check: for non-standard things in the check directory
Result: NOTE
Found the following files/directories:
‘Net1.rpt’
Flavor: r-devel-linux-x86_64-fedora-gcc