Running ‘testthat.R’ [10s/7s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(pins)
  > 
  > PerformanceReporter <- R6::R6Class(
  +   "PerformanceReporter",
  +   inherit = Reporter,
  +   public = list(
  +    results = list(
  +      context = character(0),
  +      time = numeric(0)
  +    ),
  +    last_context = NA_character_,
  +    last_test = NA_character_,
  +    last_time = Sys.time(),
  +    last_test_time = 0,
  +    n_ok = 0,
  +    n_skip = 0,
  +    n_warn = 0,
  +    n_fail = 0,
  + 
  +    start_context = function(context) {
  +      private$print_last_test()
  + 
  +      self$last_context <- context
  +      self$last_time <- Sys.time()
  +      cat(paste0("\nContext: ", context, "\n"))
  +    },
  + 
  +    add_result = function(context, test, result) {
  +      elapsed_time <- as.numeric(Sys.time()) - as.numeric(self$last_time)
  + 
  +      print_message = TRUE
  +      if (inherits(result, "expectation_failure") ||
  +          inherits(result, "expectation_error")) {
  +        self$n_fail <- self$n_fail + 1
  +      } else if (inherits(result, "expectation_skip")) {
  +        self$n_skip <- self$n_skip + 1
  +      } else if (inherits(result, "expectation_warning")) {
  +        self$n_warn <- self$n_warn + 1
  +      } else {
  +        print_message = FALSE
  +        self$n_ok <- self$n_ok + 1
  +      }
  + 
  +      if (print_message) {
  +        cat(
  +          paste0(test, ": ", private$expectation_type(result), ": ", result$message),
  +          "\n"
  +        )
  +      }
  + 
  +      if (identical(self$last_test, test)) {
  +        elapsed_time <- self$last_test_time + elapsed_time
  +        self$results$time[length(self$results$time)] <- elapsed_time
  +        self$last_test_time <- elapsed_time
  +      }
  +      else {
  +        private$print_last_test()
  + 
  +        self$results$context[length(self$results$context) + 1] <- self$last_context
  +        self$results$time[length(self$results$time) + 1] <- elapsed_time
  +        self$last_test_time <- elapsed_time
  +      }
  + 
  +      self$last_test <- test
  +      self$last_time <- Sys.time()
  +    },
  + 
  +    end_reporter = function() {
  +      private$print_last_test()
  + 
  +      cat("\n")
  +      data <- data.frame(
  +        context = self$results$context,
  +        time = self$results$time
  +      )
  + 
  +      summary <- aggregate(. ~ context, data, function(e) format(sum(e), width = "9", digits = "3", scientific = F))
  + 
  +      total <- format(sum(data$time), digits = "3", scientific = F)
  + 
  +      cat("\n")
  +      cat("--- Performance Summary  ----\n\n")
  +      print(as.data.frame(summary), row.names = FALSE)
  + 
  +      cat(paste0("\nTotal: ", total, "s\n"))
  + 
  +      cat("\n")
  +      cat("------- Tests Summary -------\n\n")
  +      self$cat_line("OK:       ", format(self$n_ok, width = 5))
  +      self$cat_line("Failed:   ", format(self$n_fail, width = 5))
  +      self$cat_line("Warnings: ", format(self$n_warn, width = 5))
  +      self$cat_line("Skipped:  ", format(self$n_skip, width = 5))
  +      cat("\n")
  +    }
  +   ),
  +   private = list(
  +    print_last_test = function() {
  +      if (!is.na(self$last_test) &&
  +          length(self$last_test) > 0 &&
  +          length(self$last_test_time) > 0) {
  +        cat(paste0(self$last_test, ": ", self$last_test_time, "\n"))
  +      }
  + 
  +      self$last_test <- NA_character_
  +    },
  +    expectation_type = function(exp) {
  +      stopifnot(is.expectation(exp))
  +      gsub("^expectation_", "", class(exp)[[1]])
  +    }
  +   )
  + )
  > 
  > test_check("pins", reporter = "performance")
  
  Context: pin aaa check
  tests start without local dirs: skip: Reason: On CRAN 
  tests start without local dirs: 0.0300836563110352
  
  Context: board custom
  can board_register() a custom board: 0.188676595687866
  can pin() with custom board: 0.268987894058228
  can pin_find() with custom board: 0.0169498920440674
  can pin_get() with custom board: 0.0130383968353271
  can board_deregister() custom board: 0.0167944431304932
  
  Context: board datatxt
  can board_register() a data.txt board: skip: Reason: On CRAN 
  can pin_get() iris from a data.txt board: skip: Reason: On CRAN 
  can board_register() a data.txt board: 0.00211858749389648
  can not evaluate expressions from data.txt board: skip: Reason: On CRAN 
  can pin_get() iris from a data.txt board: 0.00279951095581055
  can board_deregister() a data.txt board: skip: Reason: On CRAN 
  can not evaluate expressions from data.txt board: 0.00278186798095703
  can board_register() with URL and name: skip: Reason: On CRAN 
  can board_deregister() a data.txt board: 0.00278472900390625
  can board_register() with URL and no name: skip: Reason: On CRAN 
  can board_register() with URL and name: 0.0026240348815918
  can board_register() with URL and no name: skip: Reason: On CRAN 
  can board_register() with URL and no name: 0.00527739524841309
  
  Context: board dospace
  
  Context: board gcloud
  can't register gcloud board: skip: Reason: failed to register gcloud board 
  board contains proper gcloud headers: 0.0243713855743408
  can't register gcloud board: skip: Reason: failed to register gcloud board 
  can't register gcloud board: 0.00830316543579102
  
  Context: board github
  can't register github board: skip: Reason: failed to register github board 
  can pin large resources in github releases: skip: Reason: Board 'github' not registered. 
  can't register github board: 0.0031132698059082
  uninitialized repo returns empty results: skip: Reason: GITHUB_PAT envvar required. 
  can pin large resources in github releases: 0.00282001495361328
  uninitialized repo returns empty results: 0.00253057479858398
  
  Context: board kaggle
  test kaggle board: skip: Reason: kaggle board is not registered 
  test kaggle board: 0.00295186042785645
  
  Context: board local
  local board is registered: 0.00592160224914551
  can pin() file with auto-generated name in local board: 0.241081953048706
  can pin() file to local board: 0.020097017288208
  can pin() data frame to local board: 0.02303147315979
  can pin_get() a pin from local board: 0.0144407749176025
  can pin_find() the pin in any board: 0.178298473358154
  can pin_find() in local board: 0.0225069522857666
  can pin_info() in local board: 0.0327754020690918
  can pin_remove() file from local board: 0.00508809089660645
  can pin() medium files local board: skip: Reason: This test is too slow 
  can pin_remove() dataset from local board: 0.0122718811035156
  can pin() medium files local board: 0.00901651382446289
  can pin() with version local board: 0.0187053680419922
  can pin() file to local board with links: 0.124757289886475
  can pin() data frame to local board with links: 0.0248129367828369
  can pin_get() a pin from local board with links: 0.0241947174072266
  can pin_find() in local board with links: failure: grepl(pin_name, results$name) is not TRUE
  
  `actual`:   TRUE TRUE
  `expected`: TRUE      
  can pin_find() the pin in any board: 0.162994384765625
  can pin_find() in local board with links: 0.0619704723358154
  can pin_info() in local board with links: 0.0304412841796875
  can pin_remove() file from local board with links: 0.00588154792785645
  can pin() medium files local board with links: skip: Reason: This test is too slow 
  can pin_remove() dataset from local board with links: 0.016298770904541
  can pin() medium files local board with links: 0.0106973648071289
  can pin() with version local board with links: 0.0181605815887451
  local board is registered with versions: 0.00947189331054688
  can pin() and retrieve specific version local board: 0.0504612922668457
  can pin_remove() a pin with versions local board: 0.0059049129486084
  
  Context: board metadata
  can roundtrip table metadata with no description: 0.00396466255187988
  can roundtrip table metadata with description: 0.00339913368225098
  can roundtrip files metadata with no description: 0.00357651710510254
  can roundtrip files metadata with description: 0.00338959693908691
  can read empty metadata from empty text: 0.00431156158447266
  can read empty metadata from invalid text: 0.00304126739501953
  can read empty metadata from semi-valid text: 0.00286006927490234
  
  Context: board packages
  can pin_find() packages with empty search: 0.207911252975464
  can pin_get() an specific resource: skip: Reason: Need to investigate in GitHub action 
  can pin_find() packages with search term: 0.0747454166412354
  can pin_get() an specific resource: 0.00299477577209473
  
  Context: board rsc
  can't register rsconnect board: skip: Reason: failed to register rsconnect board 
  can't register rsconnect board: 0.00349259376525879
  User-supplied html files can overwrite the default: 0.0368146896362305
  Mismatched protocols generate correct URL: 0.0346810817718506
  
  Context: board s3
  can't register s3 board: skip: Reason: failed to register s3 board 
  board contains proper s3 headers: 0.111764430999756
  can't register s3 board: skip: Reason: failed to register s3 board 
  can't register s3 board: 0.0239348411560059
  
  Context: board azure
  can't register azure board: skip: Reason: failed to register azure board 
  board contains proper azure headers: 0.0148513317108154
  can't register azure board: skip: Reason: failed to register azure board 
  can't register azure board: 0.00681591033935547
  
  Context: pin dataframe
  can pin() data frame: 0.0221199989318848
  can sanitize data frame names: 0.00316286087036133
  can save data frame with different types: 0.016441822052002
  can pin complex data frame: 0.0248885154724121
  
  Context: pin data table
  can maintain class when using pin(I()): 0.175599098205566
  
  Context: pin find
  can pin_find() entries across all boards: 0.442872762680054
  
  Context: pin identity
  can maintain class when using pin(I()): 0.0111565589904785
  
  Context: pin info
  can retrieve pin_info() across all boards: 0.1346755027771
  can retrieve pin_info() with no extended info across all boards: 0.136106491088867
  can retrieve pin_info() with no metadata info across all boards: 0.134608507156372
  can retrieve pin_info() with no extended nor metadata info across all boards: 0.109075784683228
  
  Context: pin metadata
  can pin() with custom metadata: skip: Reason: On CRAN 
  can pin() with custom metadata: 0.00226831436157227
  
  Context: pin object
  can pin() object: 0.0137162208557129
  can pin() concurrently: 1.87750673294067
  
  Context: pin owner
  can retrieve name with pin_content_name(): 0.00287532806396484
  can retrieve empty owner with pin_content_owner(): 0.0159609317779541
  can retrieve empty name with pin_content_owner(): 0.00394940376281738
  can parse simple names with pin_content_owner() and pin_content_name(): 0.0123946666717529
  
  Context: pin local
  can pin() remote URL: skip: Reason: On CRAN 
  can pin() remote CSV with URL: skip: Reason: On CRAN 
  can pin() remote URL: 0.00256800651550293
  can pin() remote CSV with URL and name: skip: Reason: On CRAN 
  can pin() remote CSV with URL: 0.00351071357727051
  can pin() remote CSV with signature: skip: Reason: On CRAN 
  can pin() remote CSV with URL and name: 0.00330376625061035
  fail to pin() remote CSV with bad signature: skip: Reason: On CRAN 
  can pin() remote CSV with signature: 0.00349831581115723
  fail to pin() remote CSV with bad signature: 0.00384759902954102
  
  Context: pin zzz check
  tests do not create local dirs: skip: Reason: On CRAN 
  tests do not create local dirs: 0.00255155563354492
  
  
  --- Performance Summary  ----
  
          context      time
      board azure    0.0217
     board custom     0.504
    board datatxt    0.0184
     board gcloud    0.0327
     board github   0.00846
     board kaggle   0.00295
      board local      1.13
   board metadata    0.0245
   board packages     0.286
        board rsc     0.075
         board s3     0.136
    pin aaa check    0.0301
   pin data table     0.176
    pin dataframe    0.0666
         pin find     0.443
     pin identity    0.0112
         pin info     0.514
        pin local    0.0167
     pin metadata   0.00227
       pin object      1.89
        pin owner    0.0352
    pin zzz check   0.00255
  
  Total: 5.43s
  
  ------- Tests Summary -------
  
  OK:          92
  Failed:       1
  Warnings:     0
  Skipped:     29
  
  Error: Test failures
  Execution halted