Running ‘ChecksumFile.R’ [5s/32s]
  Running ‘DEPRECATED.GenericDataFileSet,dsApply.R’ [3s/138s]
  Running ‘GenericDataFile.R’ [5s/28s]
  Running ‘GenericDataFileSet,sortBy.R’ [3s/18s]
  Running ‘GenericDataFileSet.R’ [24s/105s]
  Running ‘RDataFileSet.R’
  Running ‘RdsFileSet.R’
  Running ‘TabularTextFile,extend.R’
  Running ‘TabularTextFile,huge.R’ [4s/23s]
  Running ‘TabularTextFile.R’ [4s/27s]
  Running ‘TabularTextFileSet.R’ [7s/45s]
  Running ‘VectorAndListAPI.R’ [10s/64s]
  Running ‘fullname.R’
  Running ‘readDataFrame.R’ [2s/14s]
Running the tests in ‘tests/DEPRECATED.GenericDataFileSet,dsApply.R’ failed.
Complete output:
  > source("incl/start.R")
  Loading required package: R.oo
  Loading required package: R.methodsS3
  R.methodsS3 v1.7.1 (2016-02-15) successfully loaded. See ?R.methodsS3 for help.
  R.oo v1.22.0 (2018-04-21) successfully loaded. See ?R.oo for help.
  
  Attaching package: 'R.oo'
  
  The following objects are masked from 'package:methods':
  
      getClasses, getMethods
  
  The following objects are masked from 'package:base':
  
      attach, detach, gc, load, save
  
  R.filesets v2.12.1 successfully loaded. See ?R.filesets for help.
  
  Attaching package: 'R.filesets'
  
  The following objects are masked from 'package:base':
  
      append, readLines
  
  > 
  > message("*** dsApply() on GenericDataFile")
  *** dsApply() on GenericDataFile
  > 
  > # Example files
  > path <- system.file("exData", "dataSetA,original", package="R.filesets")
  > print(path)
  [1] "/data/gannet/ripley/R/packages/tests-clang/R.filesets.Rcheck/R.filesets/exData/dataSetA,original"
  > 
  > # - - - - - - - - - - - - - - - - - - - - - - - -
  > # Setting up a file set
  > # - - - - - - - - - - - - - - - - - - - - - - - -
  > ds <- GenericDataFileSet$byPath(path)
  > print(ds)
  GenericDataFileSet:
  Name: dataSetA
  Tags: original
  Full name: dataSetA,original
  Number of files: 11
  Names: 1.2(a), 11.2(a), all, ..., fileFF [11]
  Path (to the first file): ../R.filesets/exData/dataSetA,original
  Total file size: 1.90 KiB (1945 bytes)
  > 
  > # - - - - - - - - - - - - - - - - - - - - - - - -
  > # Get the size of each file
  > # - - - - - - - - - - - - - - - - - - - - - - - -
  > # Alt 1.
  > message("**** lapply()")
  **** lapply()
  > res1 <- lapply(ds, FUN=getFileSize)
  > str(res1)
  List of 11
   $ 1.2(a)          : num 153
   $ 11.2(a)         : num 153
   $ all,fullnames   : num 71
   $ fileA,20100112  : num 288
   $ fileA,20130116  : num 357
   $ fileB,other,tags: num 108
   $ fileC,inverted  : num 166
   $ fileD,3cols     : num 142
   $ fileE,headerArgs: num 201
   $ fileF           : num 153
   $ fileFF          : num 153
  > 
  > message("**** future_lapply()")
  **** future_lapply()
  > strategies <- future:::supportedStrategies()
  > for (strategy in strategies) {
  +   future::plan(strategy)
  +   res2a <- future.apply::future_lapply(ds, FUN=getFileSize)
  +   str(res2a)
  +   stopifnot(all.equal(res2a, res1, check.attributes=FALSE))
  + }
  List of 11
   $ 1.2(a)          : num 153
   $ 11.2(a)         : num 153
   $ all,fullnames   : num 71
   $ fileA,20100112  : num 288
   $ fileA,20130116  : num 357
   $ fileB,other,tags: num 108
   $ fileC,inverted  : num 166
   $ fileD,3cols     : num 142
   $ fileE,headerArgs: num 201
   $ fileF           : num 153
   $ fileFF          : num 153
  List of 11
   $ 1.2(a)          : num 153
   $ 11.2(a)         : num 153
   $ all,fullnames   : num 71
   $ fileA,20100112  : num 288
   $ fileA,20130116  : num 357
   $ fileB,other,tags: num 108
   $ fileC,inverted  : num 166
   $ fileD,3cols     : num 142
   $ fileE,headerArgs: num 201
   $ fileF           : num 153
   $ fileFF          : num 153
  Error in unserialize(node$con) : error reading from connection
  Calls: <Anonymous> ... FUN -> recvData -> recvData.SOCKnode -> unserialize
  Execution halted