devxy/build-cran-binaries
Watch
1
0
Fork
You've already forked build-cran-binaries
 0
Code Issues 10 Pull requests Releases Activity

6 workers

Browse source
This commit is contained in:
Patrick Schratz 2024-07-27 13:46:23 +02:00
commit 9e95deb225
Signed by: pat-s
GPG key ID: 3C6318841EF78925
2 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
.woodpecker/build.yaml
View file

@ -38,16 +38,16 @@ steps:
# Hmisc -> ABCanalysis
- R -q -e 'pak::pak(c("Hmisc", "pls", "abd", "doRNG"))'
- mkdir -p /mnt/cache/pkgcache /mnt/cache/R-pkgs /mnt/cache/binaries
- R -q -e 'options(crayon.enabled = TRUE, Ncpus = 4, future.globals.onReference = "error"); pkgs = tools::CRAN_package_db()[[1]][16:20]; library(rBinaries); future::plan("multisession", workers = 4, rscript_startup = quote(options(crayon.enabled = TRUE))); foo = lapply(pkgs, function(x) build_binary_package(x, build_for_minor=FALSE, debug = FALSE, force = TRUE))'
- R -q -e 'options(crayon.enabled = TRUE, Ncpus = 6, future.globals.onReference = "error"); pkgs = tools::CRAN_package_db()[[1]][16:20]; library(rBinaries); future::plan("multisession", workers = 6, rscript_startup = quote(options(crayon.enabled = TRUE))); foo = lapply(pkgs, function(x) build_binary_package(x, build_for_minor=FALSE, debug = FALSE, force = TRUE))'
backend_options:
kubernetes:
resources:
requests:
memory: 2000Mi
memory: 3000Mi
cpu: 2000m
limits:
memory: 6000Mi
cpu: 4050m
memory: 4000Mi
cpu: 6050m
nodeSelector:
kubernetes.io/arch: 'arm64'
# - name: Sleep

4
R/build_binaries.R
View file

@ -77,7 +77,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
out <- progressr::with_progress({
p <- progressr::progressor(along = tag)
future::future_mapply(function(x, y) {
future.apply::future_mapply(function(x, y) {
tryCatch(
{
p()
@ -107,7 +107,7 @@ build_binary_package <- function(package_name, tag = NULL, codename = NULL,
cli::cli_h2("Uploading ({.pkg {package_name[1]}})")
out <- progressr::with_progress({
p <- progressr::progressor(along = tag)
future::future_mapply(function(x, y) {
future.apply::future_mapply(function(x, y) {
tryCatch(
{
p()