#! /usr/bin/env Rscript foo <- dir('/data/ftp/pub/bdr/Intel', patt="[.]out$") foo <- sub("[.]out$", "", foo) ref <- "../tests-devel" this <- "Intel" source('../pkgdiff.R') junk <- pkgdiff(c(foo, readLines('segfault'), readLines("temp"), readLines('../stoplist2')))