From edeab2d09444e02a2eeb3adb2bf7933a2851c5b3 Mon Sep 17 00:00:00 2001 From: Logan Hunt Date: Sun, 29 May 2022 21:31:48 -0700 Subject: Get a timer on the screen finally --- database/run.lisp | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'database/run.lisp') diff --git a/database/run.lisp b/database/run.lisp index 30b8342..21d278a 100644 --- a/database/run.lisp +++ b/database/run.lisp @@ -15,3 +15,9 @@ (mito:select-dao 'run-split (sxql:order-by :category_split_id) (sxql:where (:= :run run)))) + +;; Returns stuff like PB, best of each split, etc. +(defun run-statistics (category) + `((asdf . 1))) + +;; select *, sum(julianday(end_time)-julianday(start_time))*24*60*60 as total_time from run_split group by run_id order by total_time; -- cgit v1.2.3-70-g09d2