diff options
author | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-27 06:26:38 +0400 |
---|---|---|
committer | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-27 06:26:38 +0400 |
commit | 12c32c9b6c25c9768b01cca583061f19908d7151 (patch) | |
tree | ee2fa819269cb4013bf4a4524ef0e223ea1fdd5f /tests | |
parent | 31b7dbfe7e62c5aaa4026504e2ebd908bd3d2cbb (diff) |
Add pending module for routing spec
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Network/BitTorrent/DHT/RoutingSpec.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/Network/BitTorrent/DHT/RoutingSpec.hs b/tests/Network/BitTorrent/DHT/RoutingSpec.hs new file mode 100644 index 00000000..10b00ace --- /dev/null +++ b/tests/Network/BitTorrent/DHT/RoutingSpec.hs | |||
@@ -0,0 +1,12 @@ | |||
1 | module Network.BitTorrent.DHT.RoutingSpec (spec) where | ||
2 | import Data.Default | ||
3 | import Test.Hspec | ||
4 | |||
5 | import Network.BitTorrent.Core | ||
6 | import Network.BitTorrent.DHT.Routing as T | ||
7 | |||
8 | spec :: Spec | ||
9 | spec = do | ||
10 | describe "size" $ do | ||
11 | it "null table is empty" $ do | ||
12 | T.size (nullTable def :: Table IPv4) `shouldBe` 0 \ No newline at end of file | ||