Running ‘test-catch.R’ [5s/9s]
Running the tests in ‘tests/test-catch.R’ failed.
Complete output:
  > library(testthat)
  > 
  > local({
  + 
  +   # Disable test on Windows, pending devtools
  +   # compatibility with new toolchain
  +   isWindows <- Sys.info()[["sysname"]] == "Windows"
  +   if (isWindows)
  +     return()
  + 
  +   # Disable tests on Solaris, because we don't use Catch there.
  +   isSolaris <- Sys.info()[["sysname"]] == "SunOS"
  +   if (isSolaris)
  +     return()
  + 
  +   if (!requireNamespace("devtools", quietly = TRUE))
  +     return()
  + 
  +   devel <- try(devtools::has_devel(), silent = TRUE)
  +   if (!isTRUE(devel))
  +     return()
  + 
  +   quietly <- function(expr) {
  +     suppressMessages(capture_output(result <- expr))
  +     result
  +   }
  + 
  +   perform_test <- function(pkgName, catchEnabled) {
  + 
  +     owd <- setwd(tempdir())
  +     on.exit(setwd(owd), add = TRUE)
  + 
  +     pkgPath <- file.path(tempdir(), pkgName)
  +     libPath <- file.path(tempdir(), "rlib")
  +     if (!utils::file_test("-d", libPath))
  +       dir.create(libPath)
  +     .libPaths(c(libPath, .libPaths()))
  + 
  +     on.exit({
  +       unlink(pkgPath, recursive = TRUE)
  +       unlink(libPath, recursive = TRUE)
  +     }, add = TRUE)
  + 
  +     quietly(devtools::create(pkgPath))
  +     quietly(testthat::use_catch(pkgPath))
  + 
  +     cat("LinkingTo: testthat",
  +         file = file.path(pkgPath, "DESCRIPTION"),
  +         append = TRUE,
  +         sep = "\n")
  + 
  +     cat(
  +       sprintf("useDynLib(%s)", pkgName),
  +       file = file.path(pkgPath, "NAMESPACE"),
  +       append = TRUE,
  +       sep = "\n"
  +     )
  + 
  +     if (!catchEnabled) {
  + 
  +       makevarsPath <- file.path(
  +         pkgPath,
  +         "src",
  +         if (isWindows) "Makevars.win" else "Makevars"
  +       )
  + 
  +       cat(
  +         "PKG_CPPFLAGS = -DTESTTHAT_DISABLED",
  +         file = makevarsPath,
  +         sep = "\n"
  +       )
  + 
  +     }
  + 
  +     quietly(devtools::install(pkgPath, quick = TRUE, quiet = TRUE))
  + 
  +     library(pkgName, character.only = TRUE)
  +     stopifnot(quietly(.Call("run_testthat_tests", PACKAGE = pkgName)))
  + 
  +     devtools::unload(pkgName)
  +   }
  + 
  +   perform_test("testthatclient1",  TRUE)
  +   perform_test("testthatclient2", FALSE)
  + 
  + })
  '/home/hornik/tmp/R.check/r-devel-gcc/Work/build/bin/R' --no-site-file  \
    --no-environ --no-save --no-restore --quiet CMD SHLIB foo.c 
  
  make[1]: Entering directory '/home/hornik/tmp/scratch/RtmphRMZog'
  gcc-7 -I"/home/hornik/tmp/R.check/r-devel-gcc/Work/build/include" -DNDEBUG   -I/usr/local/include   -fpic  -g -O3 -Wall -pedantic -mtune=native -c foo.c -o foo.o
  gcc-7 -shared -L/home/hornik/tmp/R.check/r-devel-gcc/Work/build/lib -Wl,-O1 -o foo.so foo.o -L/home/hornik/tmp/R.check/r-devel-gcc/Work/build/lib -lR
  make[1]: Leaving directory '/home/hornik/tmp/scratch/RtmphRMZog'
  make[1]: Entering directory '/home/hornik/tmp/scratch/RtmphRMZog'
  make[1]: Leaving directory '/home/hornik/tmp/scratch/RtmphRMZog'
  Error: Command failed (1)
  Execution halted