polysemy-chronos 0.1.2.4 → 0.1.3.0

raw patch · 3 files changed

+28/−30 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• lib/Polysemy/Chronos/Orphans.hs +26/−27
• polysemy-chronos.cabal +1/−1
• test/Main.hs +1/−2

@@ -4,38 +4,37 @@  import qualified Chronos as Chronos import Chronos (-  Date(Date),-  Datetime(Datetime),-  DayOfMonth(DayOfMonth),-  Month(Month),+  Date (Date),+  Datetime (Datetime),+  DayOfMonth (DayOfMonth),+  Month (Month),   Time,-  TimeOfDay(TimeOfDay),-  Timespan(Timespan),-  Year(Year),+  TimeOfDay (TimeOfDay),+  Timespan (Timespan),+  Year (Year),   )-import Prelude hiding (second)- import Polysemy.Time.Calendar (-  Calendar(..),-  HasDate(..),-  HasDay(..),-  HasHour(..),-  HasMinute(..),-  HasMonth(..),-  HasNanoSecond(..),-  HasSecond(..),-  HasYear(..),+  Calendar (..),+  HasDate (..),+  HasDay (..),+  HasHour (..),+  HasMinute (..),+  HasMonth (..),+  HasNanoSecond (..),+  HasSecond (..),+  HasYear (..),   ) import Polysemy.Time.Data.TimeUnit (-  Days(Days),-  Hours(Hours),-  Minutes(Minutes),-  Months(Months),-  NanoSeconds(NanoSeconds),-  TimeUnit(..),-  Years(Years),+  Days (Days),+  Hours (Hours),+  Minutes (Minutes),+  Months (Months),+  NanoSeconds (NanoSeconds),+  TimeUnit (..),+  Years (Years),   convert,   )+import Prelude hiding (second)  instance HasDate Time Date where   date =@@ -105,7 +104,7 @@  instance HasNanoSecond TimeOfDay where   nanoSecond (TimeOfDay _ _ s) =-    NanoSeconds (fromIntegral s)+    NanoSeconds s  instance HasNanoSecond Datetime where   nanoSecond (Datetime _ t) =@@ -133,7 +132,7 @@   mkDate y m d =     Date (Year (fromIntegral y)) (Month (fromIntegral m)) (DayOfMonth (fromIntegral d))   mkTime h m s =-    TimeOfDay (fromIntegral h) (fromIntegral m) (fromIntegral (s * 1000000000))+    TimeOfDay (fromIntegral h) (fromIntegral m) (s * 1000000000)   mkDatetime y mo d h mi s =     Datetime (mkDate @Datetime y mo d) (mkTime @Datetime h mi s) 

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           polysemy-chronos-version:        0.1.2.4+version:        0.1.3.0 synopsis:       Polysemy-time Interpreters for Chronos description:    Please see the readme on Github at <https://github.com/tek/polysemy-time> category:       Time

@@ -1,9 +1,8 @@ module Main where +import Polysemy.Chronos.ChronosTimeTest (test_chronosTime, test_chronosTimeAt) import Polysemy.Test (unitTest) import Test.Tasty (TestTree, defaultMain, testGroup)--import Polysemy.Chronos.ChronosTimeTest (test_chronosTime, test_chronosTimeAt)  tests :: TestTree tests =