diff options
Diffstat (limited to 'stdlib/source/lux/time/instant.lux')
| -rw-r--r-- | stdlib/source/lux/time/instant.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/lux/time/instant.lux b/stdlib/source/lux/time/instant.lux index 727407a57..86c27f8f4 100644 --- a/stdlib/source/lux/time/instant.lux +++ b/stdlib/source/lux/time/instant.lux @@ -7,15 +7,15 @@ codec [monad (#+ do Monad)] ["p" parser]) - (data [text "text/" Monoid<Text>] + (data [text ("text/" Monoid<Text>)] (text ["l" lexer]) - [number "int/" Codec<Text,Int>] + [number ("int/" Codec<Text,Int>)] ["e" error] [maybe] - (collection [list "L/" Fold<List> Functor<List>] - [row (#+ Row row) "row/" Functor<Row> Fold<Row>])) + (collection [list ("list/" Fold<List>)] + [row (#+ Row row) ("row/" Functor<Row> Fold<Row>)])) (type abstract)) - (// [duration "duration/" Order<Duration>] + (// [duration ("duration/" Order<Duration>)] [date])) (abstract: #export Instant @@ -283,7 +283,7 @@ month-days-so-far (|> months row.to-list (list.take (.nat (dec utc-month))) - (L/fold n/+ +0)) + (list/fold n/+ +0)) total-days (|> year-days-so-far (i/+ (.int month-days-so-far)) (i/+ (dec utc-day)))]] |