DA/raaql-paper-experiments Files · harness.R · Centrum Wiskunde & Informatica (CWI)

Files @ 2aece7dd2719

Branch filter:

Location: DA/raaql-paper-experiments/harness.R

2aece7dd2719 484 B text/S-plus Show Annotation Show as Raw Download as Raw

Hannes Muehleisen

import

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")
	}
}