anchor.diff:      cat("Installed data.table to be tested against:",as.character(packageVersion("data.table")),"\n")
       cat("CRAN:\n"); status("cran")
       cat("BIOC:\n"); status("bioc")
  -    cat("TOTAL    :", length(deps), "\n\n")
  +    cat("TOTAL          :", length(deps), "\n\n")
       cat("Oldest 00check.log (to check no old stale ones somehow missed):\n")
       system("find . -name '00check.log' | xargs ls -lt | tail -1")
       cat("\n")
  
positive.code:     for (i in x) system(paste0("rm -rf ./",i,".Rcheck"))
      cmd = paste0("ls -1 *.tar.gz | grep -E '", paste0(x,collapse="|"),"' | TZ='UTC' parallel R CMD check")
    }
    if (as.integer(system("ps -a | grep perfbar | wc -l", intern=TRUE)) < 1) system("perfbar",wait=FALSE)
    system("touch /tmp/started.flag ; rm -f /tmp/finished.flag")
    system(paste("((",cmd,">/dev/null 2>&1); touch /tmp/finished.flag)"), wait=FALSE)
  }
  
negative.code:       "NOTE    :",sprintf("%3d",length(n)),"\n",  #":",paste(sort(names(x)[n])),"\n",
        "OK      :",sprintf("%3d",length(ok)),"\n",
        "TOTAL   :",length(e)+length(w)+length(n)+length(ok),"/",length(deps),"\n",
        if (length(r))  paste0("RUNNING       : ",paste(sort(names(x)[r]),collapse=" "),"\n"),
        if (length(ns)) paste0("NOT STARTED   : ",paste(sort(names(x)[head(ns,20)]),collapse=" "), if(length(ns)>20)paste(" +",length(ns)-20,"more"), "\n"),
        "\n"
        )
    assign(paste0(".fail.",which), c(sort(names(x)[e]), sort(names(x)[w])), envir=.GlobalEnv)
    invisible()
  