From 75711985512c8578e913a1b464816968b4aef5dd Mon Sep 17 00:00:00 2001 From: Sam Truzjan Date: Tue, 8 Apr 2014 02:36:18 +0400 Subject: Merge PeerAddr and NodeAddr modules --- tests/Network/BitTorrent/Core/FingerprintSpec.hs | 2 +- tests/Network/BitTorrent/Core/NodeInfoSpec.hs | 2 +- tests/Network/BitTorrent/Core/PeerAddrSpec.hs | 4 ++-- tests/Network/BitTorrent/Core/PeerIdSpec.hs | 2 +- 4 files changed, 5 insertions(+), 5 deletions(-) (limited to 'tests/Network/BitTorrent/Core') diff --git a/tests/Network/BitTorrent/Core/FingerprintSpec.hs b/tests/Network/BitTorrent/Core/FingerprintSpec.hs index df62442a..f8ed6950 100644 --- a/tests/Network/BitTorrent/Core/FingerprintSpec.hs +++ b/tests/Network/BitTorrent/Core/FingerprintSpec.hs @@ -1,7 +1,7 @@ -- | see module Network.BitTorrent.Core.FingerprintSpec (spec) where import Test.Hspec -import Network.BitTorrent.Core.PeerId +import Network.BitTorrent.Address spec :: Spec spec = do diff --git a/tests/Network/BitTorrent/Core/NodeInfoSpec.hs b/tests/Network/BitTorrent/Core/NodeInfoSpec.hs index fb777440..0d30b9a6 100644 --- a/tests/Network/BitTorrent/Core/NodeInfoSpec.hs +++ b/tests/Network/BitTorrent/Core/NodeInfoSpec.hs @@ -6,7 +6,7 @@ import Data.String import Test.Hspec import Test.QuickCheck -import Network.BitTorrent.Core +import Network.BitTorrent.Address import Network.BitTorrent.Core.PeerAddrSpec () instance Arbitrary NodeId where diff --git a/tests/Network/BitTorrent/Core/PeerAddrSpec.hs b/tests/Network/BitTorrent/Core/PeerAddrSpec.hs index abb90183..387126db 100644 --- a/tests/Network/BitTorrent/Core/PeerAddrSpec.hs +++ b/tests/Network/BitTorrent/Core/PeerAddrSpec.hs @@ -11,8 +11,8 @@ import Network import Test.Hspec import Test.QuickCheck -import Network.BitTorrent.Core.PeerIdSpec hiding (spec) -import Network.BitTorrent.Core.PeerAddr +import Network.BitTorrent.Core.PeerIdSpec () +import Network.BitTorrent.Address instance Arbitrary IPv4 where arbitrary = do diff --git a/tests/Network/BitTorrent/Core/PeerIdSpec.hs b/tests/Network/BitTorrent/Core/PeerIdSpec.hs index 4b0c2398..29b98bbc 100644 --- a/tests/Network/BitTorrent/Core/PeerIdSpec.hs +++ b/tests/Network/BitTorrent/Core/PeerIdSpec.hs @@ -6,7 +6,7 @@ import Data.Text.Encoding as T import Test.Hspec import Test.QuickCheck import Test.QuickCheck.Instances () -import Network.BitTorrent.Core.PeerId +import Network.BitTorrent.Address instance Arbitrary PeerId where -- cgit v1.2.3