diff options
| author | Eduardo Julian | 2021-07-16 02:23:00 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-07-16 02:23:00 -0400 |
| commit | bfacc0c96e56eedf788aba44bd8ad2848a35c390 (patch) | |
| tree | 7d5f637d589ac68c645d6d726967d6fac51da15d /stdlib/source/program/aedifex/artifact/time.lux | |
| parent | 0abd5bd3c0e38e352e9ba38268e04e1c858ab01e (diff) | |
Fixed some inconsistent naming.
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/time.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/artifact/time.lux | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/stdlib/source/program/aedifex/artifact/time.lux b/stdlib/source/program/aedifex/artifact/time.lux index 41ee0d418..ec7ddc4a9 100644 --- a/stdlib/source/program/aedifex/artifact/time.lux +++ b/stdlib/source/program/aedifex/artifact/time.lux @@ -26,6 +26,12 @@ Time [/date.epoch time.midnight]) +(def: #export (instant time) + (-> Time Instant) + (let [[date time] time] + (instant.from_date_time (/date.value date) + time))) + (def: #export (from_instant instant) (-> Instant (Try Time)) (do try.monad |