aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/time/date.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/time/date.lux')
-rw-r--r--stdlib/source/lux/time/date.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/time/date.lux b/stdlib/source/lux/time/date.lux
index e80db8bac..3851d5ab4 100644
--- a/stdlib/source/lux/time/date.lux
+++ b/stdlib/source/lux/time/date.lux
@@ -36,7 +36,7 @@
(case [reference sample]
(^template [<tag>]
[<tag> <tag>]
- true)
+ #1)
([#January]
[#February]
[#March]
@@ -51,7 +51,7 @@
[#December])
_
- false)))
+ #0)))
(def: (month-to-nat month)
(-> Month Nat)
@@ -126,7 +126,7 @@
(case [reference sample]
(^template [<tag>]
[<tag> <tag>]
- true)
+ #1)
([#Sunday]
[#Monday]
[#Tuesday]
@@ -136,7 +136,7 @@
[#Saturday])
_
- false)))
+ #0)))
(def: (day-to-nat day)
(-> Day Nat)