aboutsummaryrefslogtreecommitdiff
path: root/src/duration.ml
diff options
context:
space:
mode:
authorJoris2020-02-16 22:45:07 +0100
committerJoris2020-02-17 09:15:11 +0100
commit25afb0bde9b8a2c064135a534231c232a461b341 (patch)
tree5ab25640024238a2f6f2d176e5870178f18b5345 /src/duration.ml
parent0366f8cd49d2db40ea5efc639f6a475ecd97675e (diff)
downloadtabata-25afb0bde9b8a2c064135a534231c232a461b341.tar.gz
tabata-25afb0bde9b8a2c064135a534231c232a461b341.tar.bz2
tabata-25afb0bde9b8a2c064135a534231c232a461b341.zip
Set up a first version of tabata timer
Diffstat (limited to 'src/duration.ml')
-rw-r--r--src/duration.ml6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/duration.ml b/src/duration.ml
new file mode 100644
index 0000000..b0b119b
--- /dev/null
+++ b/src/duration.ml
@@ -0,0 +1,6 @@
+let prettyPrintNumber number = String.padStart (Js.Int.toString number) 2 "0"
+
+let prettyPrint duration =
+ let minutes = duration / 60 in
+ let seconds = duration mod 60 in
+ prettyPrintNumber minutes ^ ":" ^ prettyPrintNumber seconds