R Under development (unstable) (2023-11-23 r85618 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2023 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

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.

> #### doRUnit.R --- Run RUnit tests
> ####------------------------------------------------------------------------
> 
> ### Originally follows Gregor Gojanc's example in CRAN package  'gdata'
> ### and the corresponding section in the R Wiki:
> ###  http://wiki.r-project.org/rwiki/doku.php?id=developers:runit
> 
> ### MM: Vastly changed:  This should also be "runnable" for *installed*
> ##              package which has no ./tests/
> ## ----> put the bulk of the code e.g. in  ../inst/unitTests/runTests.R :
> 
> ### DJS: Added the possibility of different testing levels
> ### environment variable LEVEL set by make
> ### default value of 1 is level used in check and install
> 
> if(require("RUnit", quietly=TRUE)) {
+ 
+   ## --- Setup ---
+ 
+   wd <- getwd()
+   pkg <- sub("\\.Rcheck$", '', basename(dirname(wd)))
+   level <- Sys.getenv("LEVEL")
+ 
+   library(package=pkg, character.only=TRUE)
+ 
+   path <- system.file("unitTests", package = pkg)
+ 
+   stopifnot(file.exists(path), file.info(path.expand(path))$isdir)
+ 
+   source(file.path(path, "runTests.R"), echo = TRUE)
+ }

> if (require("RUnit", quietly = TRUE)) {
+     if (Sys.getenv("RCMDCHECK") == "FALSE") {
+         level <- Sys.getenv("LEVEL")
+         pkg <- Sys. .... [TRUNCATED] 


Executing test function test.skewhypCalcRange  ...  done successfully.

[1] "D:/RCompile/CRANincoming/R-devel/lib/SkewHyperbolic/unitTests/report"
RUNIT TEST PROTOCOL -- Sun Nov 26 01:35:40 2023 
*********************************************** 
Number of test functions: 1 
Number of errors: 0 
Number of failures: 0 

 
1 Test Suite : 
SkewHyperbolic unit testing - 1 test function, 0 errors, 0 failures
Warning messages:
1: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) :
  RNGkind: Marsaglia-Multicarry has poor statistical properties
2: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) :
  RNGkind: severe deviations from normality for Kinderman-Ramage + Marsaglia-Multicarry
3: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) :
  RNGkind: Marsaglia-Multicarry has poor statistical properties
4: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) :
  RNGkind: severe deviations from normality for Kinderman-Ramage + Marsaglia-Multicarry
> 
> proc.time()
   user  system elapsed 
   0.18    0.09    0.28