summaryrefslogtreecommitdiff
path: root/util.lisp
diff options
context:
space:
mode:
authorLogan Hunt <loganhunt@simponic.xyz>2022-05-31 14:56:24 -0700
committerLogan Hunt <loganhunt@simponic.xyz>2022-05-31 14:56:24 -0700
commit84e566e92bd7c00fa01bd08c5d22ed77cbeb1a4c (patch)
treed18000ede4f60743786e0d83cd36a83fea24e88e /util.lisp
parente6fe31daef40bec71e962c502f3a17ff9fa59d31 (diff)
downloadspeedrun-timer-84e566e92bd7c00fa01bd08c5d22ed77cbeb1a4c.tar.gz
speedrun-timer-84e566e92bd7c00fa01bd08c5d22ed77cbeb1a4c.zip
Add elapsed time to each split
Diffstat (limited to 'util.lisp')
-rw-r--r--util.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/util.lisp b/util.lisp
index 180a1e3..3369a03 100644
--- a/util.lisp
+++ b/util.lisp
@@ -9,3 +9,6 @@
(defun max-length (lists)
(reduce (lambda (a x) (max a x)) (mapcar #'length lists)))
+
+(defun not-empty-string (str)
+ (not (zerop (length str))))