blob: 10b00ace2435c2e1137b9fff00c457339ab36b34 (
plain)
1
2
3
4
5
6
7
8
9
10
11
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
|
