Files
@ 2aece7dd2719
Branch filter:
Location: DA/raaql-paper-experiments/harness.R - annotation
2aece7dd2719
484 B
text/S-plus
import
2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 2aece7dd2719 | arg <- commandArgs(TRUE)
if (length(arg) < 2) {
stop("args")
}
conf <- arg[[1]]
sm <- as.integer(arg[[2]])
sys <- ifelse(R.Version()$major == 2L, "Renjin", "GNU R")
log.result <- function(...) {
con <- file("results.tsv", open="at")
writeLines(paste(c(...), collapse="\t"), con=con)
close(con)
}
clearResultRecycler <- function() {
if (sys == "Renjin") {
import(org.renjin.compiler.pipeline.optimize.AggregationRecycler)$clear()
print("cleaned aggregation cache")
}
}
|