Running ‘testthat.R’ [8s/9s]
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.0271675586700439
  
  Context: board custom
  can board_register() a custom board: 0.328982830047607
  can pin() with custom board: 0.485203504562378
  can pin_find() with custom board: 0.0294909477233887
  can pin_get() with custom board: 0.00993061065673828
  can board_deregister() custom board: 0.0893268585205078
  
  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.00159430503845215
  can not evaluate expressions from data.txt board: skip: Reason: On CRAN 
  can pin_get() iris from a data.txt board: 0.00196027755737305
  can board_deregister() a data.txt board: skip: Reason: On CRAN 
  can not evaluate expressions from data.txt board: 0.00204110145568848
  can board_register() with URL and name: skip: Reason: On CRAN 
  can board_deregister() a data.txt board: 0.0019681453704834
  can board_register() with URL and no name: skip: Reason: On CRAN 
  can board_register() with URL and name: 0.0019989013671875
  can board_register() with URL and no name: skip: Reason: On CRAN 
  can board_register() with URL and no name: 0.00398945808410645
  
  Context: board dospace
  
  Context: board gcloud
  can't register gcloud board: skip: Reason: failed to register gcloud board 
  board contains proper gcloud headers: 0.034160852432251
  can't register gcloud board: skip: Reason: failed to register gcloud board 
  can't register gcloud board: 0.00456404685974121
  
  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.00174856185913086
  uninitialized repo returns empty results: skip: Reason: GITHUB_PAT envvar required. 
  can pin large resources in github releases: 0.00179457664489746
  uninitialized repo returns empty results: 0.0181362628936768
  
  Context: board kaggle
  test kaggle board: skip: Reason: kaggle board is not registered 
  test kaggle board: 0.00187230110168457
  
  Context: board local
  local board is registered: 0.00382709503173828
  can pin() file with auto-generated name in local board: 0.324953079223633
  can pin() file to local board: 0.0309643745422363
  can pin() data frame to local board: 0.0148563385009766
  can pin_get() a pin from local board: 0.0261950492858887
  can pin_find() the pin in any board: 0.290784120559692
  can pin_find() in local board: 0.0309536457061768
  can pin_info() in local board: 0.0564582347869873
  can pin_remove() file from local board: 0.00378036499023438
  can pin() medium files local board: skip: Reason: This test is too slow 
  can pin_remove() dataset from local board: 0.00920248031616211
  can pin() medium files local board: 0.00800824165344238
  can pin() with version local board: 0.0131373405456543
  can pin() file to local board with links: 0.179435729980469
  can pin() data frame to local board with links: 0.0230391025543213
  can pin_get() a pin from local board with links: 0.0537874698638916
  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.183843851089478
  can pin_find() in local board with links: 0.0591490268707275
  can pin_info() in local board with links: 0.0490603446960449
  can pin_remove() file from local board with links: 0.00371503829956055
  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.0103833675384521
  can pin() medium files local board with links: 0.0409290790557861
  can pin() with version local board with links: 0.0297074317932129
  local board is registered with versions: 0.00661110877990723
  can pin() and retrieve specific version local board: 0.0481207370758057
  can pin_remove() a pin with versions local board: 0.00390172004699707
  
  Context: board metadata
  can roundtrip table metadata with no description: 0.00342059135437012
  can roundtrip table metadata with description: 0.00258564949035645
  can roundtrip files metadata with no description: 0.00244617462158203
  can roundtrip files metadata with description: 0.0187733173370361
  can read empty metadata from empty text: 0.00340390205383301
  can read empty metadata from invalid text: 0.00226354598999023
  can read empty metadata from semi-valid text: 0.00222063064575195
  
  Context: board packages
  can pin_find() packages with empty search: 0.246438980102539
  can pin_get() an specific resource: skip: Reason: Need to investigate in GitHub action 
  can pin_find() packages with search term: 0.0639369487762451
  can pin_get() an specific resource: 0.00218629837036133
  
  Context: board rsc
  can't register rsconnect board: skip: Reason: failed to register rsconnect board 
  can't register rsconnect board: 0.00236630439758301
  User-supplied html files can overwrite the default: 0.0218141078948975
  Mismatched protocols generate correct URL: 0.00338625907897949
  
  Context: board s3
  can't register s3 board: skip: Reason: failed to register s3 board 
  board contains proper s3 headers: 0.0831968784332275
  can't register s3 board: skip: Reason: failed to register s3 board 
  can't register s3 board: 0.00492739677429199
  
  Context: board azure
  can't register azure board: skip: Reason: failed to register azure board 
  board contains proper azure headers: 0.0119614601135254
  can't register azure board: skip: Reason: failed to register azure board 
  can't register azure board: 0.0214898586273193
  
  Context: pin dataframe
  can pin() data frame: 0.0655033588409424
  can sanitize data frame names: 0.00249886512756348
  can save data frame with different types: 0.0179054737091064
  can pin complex data frame: 0.0644640922546387
  
  Context: pin data table
  can maintain class when using pin(I()): 0.204770565032959
  
  Context: pin find
  can pin_find() entries across all boards: 0.497267484664917
  
  Context: pin identity
  can maintain class when using pin(I()): 0.0140197277069092
  
  Context: pin info
  can retrieve pin_info() across all boards: 0.114012718200684
  can retrieve pin_info() with no extended info across all boards: 0.0988912582397461
  can retrieve pin_info() with no metadata info across all boards: 0.130723237991333
  can retrieve pin_info() with no extended nor metadata info across all boards: 0.209164619445801
  
  Context: pin metadata
  can pin() with custom metadata: skip: Reason: On CRAN 
  can pin() with custom metadata: 0.0016326904296875
  
  Context: pin object
  can pin() object: 0.010322093963623
  can pin() concurrently: 2.25687980651855
  
  Context: pin owner
  can retrieve name with pin_content_name(): 0.00190424919128418
  can retrieve empty owner with pin_content_owner(): 0.0024106502532959
  can retrieve empty name with pin_content_owner(): 0.00238704681396484
  can parse simple names with pin_content_owner() and pin_content_name(): 0.0109078884124756
  
  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.00158238410949707
  can pin() remote CSV with URL and name: skip: Reason: On CRAN 
  can pin() remote CSV with URL: 0.00211787223815918
  can pin() remote CSV with signature: skip: Reason: On CRAN 
  can pin() remote CSV with URL and name: 0.00242376327514648
  fail to pin() remote CSV with bad signature: skip: Reason: On CRAN 
  can pin() remote CSV with signature: 0.00217628479003906
  fail to pin() remote CSV with bad signature: 0.00213193893432617
  
  Context: pin zzz check
  tests do not create local dirs: skip: Reason: On CRAN 
  tests do not create local dirs: 0.00157308578491211
  
  
  --- Performance Summary  ----
  
          context      time
      board azure    0.0335
     board custom     0.943
    board datatxt    0.0136
     board gcloud    0.0387
     board github    0.0217
     board kaggle   0.00187
      board local       1.5
   board metadata    0.0351
   board packages     0.313
        board rsc    0.0276
         board s3    0.0881
    pin aaa check    0.0272
   pin data table     0.205
    pin dataframe      0.15
         pin find     0.497
     pin identity     0.014
         pin info     0.553
        pin local    0.0104
     pin metadata   0.00163
       pin object      2.27
        pin owner    0.0176
    pin zzz check   0.00157
  
  Total: 6.77s
  
  ------- Tests Summary -------
  
  OK:          92
  Failed:       1
  Warnings:     0
  Skipped:     29
  
  Error: Test failures
  Execution halted