hora 1.0 → 1.0.1

raw patch · 3 files changed

+18/−8 lines, 3 filesdep +binaryPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies added: binary

API changes (from Hackage documentation)

Files

• changelog.md +4/−0
• hora.cabal +7/−3
• src/Data/Time/Hora/Type/DmyHm.hs +7/−5

@@ -1,3 +1,7 @@+#####   1.0.1+    DmyHmp derive Binary+    + #####   1.0     initial version         

@@ -1,5 +1,5 @@ name:                hora-version:             1.0+version:             1.0.1 build-type:          Simple cabal-version:       >=1.10 @@ -35,7 +35,8 @@        build-depends:       base >=4.7 && <5.0,                        time,-                       regex-do+                       regex-do >= 3.1, +                       binary                           hs-source-dirs:      src   default-language:    Haskell2010@@ -51,6 +52,7 @@                         ConstraintKinds                         GeneralizedNewtypeDeriving                         RecordWildCards+                        DeriveGeneric                          test-suite spec@@ -70,6 +72,7 @@                         ConstraintKinds                         GeneralizedNewtypeDeriving                         RecordWildCards+                        DeriveGeneric    main-is: Main.hs   other-modules:@@ -84,4 +87,5 @@                   hspec >= 2.1.7,                   QuickCheck >= 2.8.1,                   time,-                  regex-do                          +                  regex-do >= 3.1,+                  binary                          

@@ -1,5 +1,7 @@ module Data.Time.Hora.Type.DmyHm where +import GHC.Generics+import Data.Binary import Data.Fixed import qualified Data.Time.Hora.Type.YmdHms as S @@ -11,7 +13,7 @@     year::a,     hour::a,     minute::a-    } deriving Eq+    } deriving (Show, Eq)   instance Functor DmyHm where@@ -23,17 +25,17 @@             minute = f0 (minute d0)         }  -deriving instance Show (DmyHm Int)-deriving instance Show (DmyHm String) - -- | @(DmyHm {day = "12", month = "12", year = "2016", hour = "17", minute = "32"},"59.727280400000")@ type DmyHmp' = (DmyHm String, String)    --  dmyhm   -- | @DmyHmp (DmyHm {day = 12, month = 12, year = 2016, hour = 17, minute = 32},59.727482058000)@-newtype DmyHmp = DmyHmp (DmyHm Int, Pico) deriving (Eq,Show)   --  dmyhm, pico+newtype DmyHmp = DmyHmp (DmyHm Int, Pico) deriving (Eq, Show, Generic)  --  dmyhm, pico +deriving instance Generic (DmyHm Int)+instance Binary (DmyHm Int)+instance Binary DmyHmp  {- | convert from more precise to more common type -} pico2second::DmyHmp -> S.YmdHms