hw-ip 0.2.0.0 → 0.2.0.1
raw patch · 3 files changed
+21/−2 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- hw-ip.cabal +2/−1
- src/HaskellWorks/Data/Network/Ip.hs +9/−1
- src/HaskellWorks/Data/Network/Ip/Parser/Text.hs +10/−0
hw-ip.cabal view
@@ -3,7 +3,7 @@ -- see: https://github.com/sol/hpack name: hw-ip-version: 0.2.0.0+version: 0.2.0.1 synopsis: Library for manipulating IP addresses and CIDR blocks description: Please see README.md category: Network@@ -37,6 +37,7 @@ HaskellWorks.Data.Network.Ip other-modules: HaskellWorks.Data.Network.Ip.Internal+ HaskellWorks.Data.Network.Ip.Parser.Text HaskellWorks.Data.Network.Ip.Type Paths_hw_ip default-language: Haskell2010
src/HaskellWorks/Data/Network/Ip.hs view
@@ -11,11 +11,16 @@ , splitBlock ) where +import Control.Monad import Data.Word import GHC.Generics import HaskellWorks.Data.Bits.BitWise -import qualified HaskellWorks.Data.Network.Ip.Type as Z+import qualified Data.Attoparsec.Text as AP+import qualified Data.Text as T+import qualified HaskellWorks.Data.Network.Ip.Internal as I+import qualified HaskellWorks.Data.Network.Ip.Parser.Text as APT+import qualified HaskellWorks.Data.Network.Ip.Type as Z bitPower :: Z.Ipv4NetMask -> Word64 bitPower (Z.Ipv4NetMask m) = fromIntegral (32 - m)@@ -37,3 +42,6 @@ blockSize :: Z.Ipv4Block -> Int blockSize (Z.Ipv4Block _ m) = 2 ^ bitPower m++textToMaybeIpv4Address :: T.Text -> Maybe Z.Ipv4Address+textToMaybeIpv4Address t = join $ AP.maybeResult <$> AP.parseWith (return mempty) APT.ipv4Address t
+ src/HaskellWorks/Data/Network/Ip/Parser/Text.hs view
@@ -0,0 +1,10 @@+module HaskellWorks.Data.Network.Ip.Parser.Text+ ( ipv4Address+ ) where++import qualified Data.Attoparsec.Text as AP+import qualified HaskellWorks.Data.Network.Ip.Internal as I+import qualified HaskellWorks.Data.Network.Ip.Type as HW++ipv4Address :: AP.Parser HW.Ipv4Address+ipv4Address = HW.Ipv4Address <$> I.ipv4Address