From 2470b216f112594189ac639ee9d40029ef96a164 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Thu, 17 Sep 2020 09:17:14 +0200 Subject: metrics: Change evaluation-completion-speed unit. * src/cuirass/metrics.scm (db-evaluation-completion-speed): Change the completion speed unit to builds/hour. (%metrics): Adapt comment. --- src/cuirass/metrics.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/cuirass/metrics.scm b/src/cuirass/metrics.scm index a08bcf5..1fa94cd 100644 --- a/src/cuirass/metrics.scm +++ b/src/cuirass/metrics.scm @@ -124,7 +124,7 @@ GROUP BY E.id;"))) (define* (db-evaluation-completion-speed eval) "Return the evaluation completion speed of the given EVAL. The speed is -expressed in builds per minute." +expressed in builds per hour." ;; completion_speed = 60 * completed_builds / eval_duration. ;; ;; evaluation_duration (seconds) = current_time - eval_start_time @@ -135,7 +135,7 @@ expressed in builds per minute." (with-db-worker-thread db (let ((rows (sqlite-exec db "\ SELECT -60.0 * SUM(B.status = 0) / +3600.0 * SUM(B.status = 0) / (CASE SUM(status < 0) WHEN 0 THEN MAX(stoptime) ELSE strftime('%s', 'now') @@ -243,7 +243,7 @@ status = 0 ORDER BY rowid DESC" days))) (id 'average-eval-build-complete-time) (compute-proc db-average-build-complete-time-per-eval)) - ;; Evaluation completion speed in builds/minute. + ;; Evaluation completion speed in builds/hour. (metric (id 'evaluation-completion-speed) (compute-proc db-evaluation-completion-speed)))) -- cgit v1.2.3