- With less than 3 revisions the analysis fails - Check this requirement and log error if not satisfied Signed-off-by: Mitchell Joblin <mitchell.joblin.ext@xxxxxxxxxxx> --- codeface/R/ts_utils.r | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/codeface/R/ts_utils.r b/codeface/R/ts_utils.r index 33adebb..bcc11bd 100644 --- a/codeface/R/ts_utils.r +++ b/codeface/R/ts_utils.r @@ -85,6 +85,13 @@ compute.release.distance <- function(series.merged, conf) { series <- gen.series(series.merged, "Averaged (large window)") series <- split.by.ranges(series, conf$boundaries) + ## Number of series is equal to (1 - number of revisions) provided + ## by the configuration file + if(length(series) < 2) { + logerror("Less than 3 revisions provided by configuration file", + logger="ts_ulits") + } + res <- sapply(1:(length(series)-1), function(i) { compute.ts.distance(series[[i]], series[[i+1]]) }) -- 1.8.3.2