R Under development (unstable) (2023-10-08 r85282 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.
>
> isIntelMac <- .Platform$pkgType == "mac.binary.big-sur-x86_64"
> isRVersion4.3 <- getRversion() >= "4.3.0" && getRversion() < "4.4.0"
> options("dratBranch" = "docs")
>
> repodir <- tempdir()
> docsdir <- file.path(repodir, "docs")
> if (!dir.exists(docsdir)) dir.create(docsdir)
> cat("
empty", file=file.path(docsdir, "index.html"))
>
> isWindows <- Sys.info()[["sysname"]] == "Windows"
>
> if (!isWindows) { # this is the default case of a source package
+ pkg <- system.file("extdata", "src", "bar_1.1.tar.gz", package="drat")
+ drat::insertPackage(file = pkg, repodir = repodir)
+
+ avpkg <- available.packages(repos=file.path("file:", docsdir))
+
+ good <- avpkg[1,1] == "bar" && avpkg[1,2] == "1.1"
+ if (!good) stop("Package round-turn failed for big-sur-x86_64 source package")
+ }
>
>
>
> if (isIntelMac && isRVersion4.3) {
+ pkg <- system.file("extdata", "big-sur-x86_64", "bin", "4.3", "bar_1.1.tgz", package="drat")
+ drat::insertPackage(file = pkg, repodir = repodir, action = "prune")
+ avpkg <- available.packages(repos=file.path("file:", docsdir))
+
+ good <- avpkg[1,1] == "bar" && avpkg[1,2] == "1.1"
+ if (!good) stop("Package round-turn failed for big-sur-x86_64 binary package")
+ }
>
> proc.time()
user system elapsed
0.06 0.09 0.14