Add pending module for routing spec

2 files changed, 13 insertions, 0 deletions

diff --git a/bittorrent.cabal b/bittorrent.cabal
index 5163e1e8..aaaa6878 100644
--- a/bittorrent.cabal
+++ b/bittorrent.cabal
@@ -172,6 +172,7 @@ test-suite spec
                        Network.BitTorrent.Core.PeerAddrSpec
                        Network.BitTorrent.Core.PeerIdSpec
                        Network.BitTorrent.DHT.MessageSpec
+                       Network.BitTorrent.DHT.RoutingSpec
                        Network.BitTorrent.Tracker.MessageSpec
                        Network.BitTorrent.Tracker.RPCSpec
                        Network.BitTorrent.Tracker.RPC.HTTPSpec
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 @@
+module Network.BitTorrent.DHT.RoutingSpec (spec) where
+import Data.Default
+import Test.Hspec
+
+import Network.BitTorrent.Core
+import Network.BitTorrent.DHT.Routing as T
+
+spec :: Spec
+spec = do
+  describe "size" $ do
+    it "null table is empty" $ do
+      T.size (nullTable def :: Table IPv4) `shouldBe` 0
\ No newline at end of file