aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/time/instant.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-09-19 21:52:42 -0400
committerEduardo Julian2017-09-19 21:52:42 -0400
commit70534ffd9c346ac23f9d5574b9c7820dccebc350 (patch)
treee2370a43a8bb2bdcb349d5bbbe477312859365f3 /stdlib/source/lux/time/instant.lux
parente717f33e192a5969760c033c47f9c4709485dd76 (diff)
- Some refactoring.
- Moved "assume" and "default" to lux/data/maybe.
Diffstat (limited to 'stdlib/source/lux/time/instant.lux')
-rw-r--r--stdlib/source/lux/time/instant.lux3
1 files changed, 2 insertions, 1 deletions
diff --git a/stdlib/source/lux/time/instant.lux b/stdlib/source/lux/time/instant.lux
index 5fb8bf4f1..c626e9ec4 100644
--- a/stdlib/source/lux/time/instant.lux
+++ b/stdlib/source/lux/time/instant.lux
@@ -11,6 +11,7 @@
(text ["l" lexer])
[number "int/" Codec<Text,Int>]
["R" result]
+ [maybe]
(coll [list "L/" Fold<List> Functor<List>]
["v" vector "v/" Functor<Vector> Fold<Vector>]))
(type opaque))
@@ -252,7 +253,7 @@
normal-months)
month-days (|> months
(v;nth (int-to-nat (i.dec utc-month)))
- assume)]
+ maybe;assume)]
_ (l;this "-")
utc-day lex-section
_ (p;assert "Invalid day."