blob: 90ff0f03098a049fa064d53b83f25e808428334d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
{-# OPTIONS_GHC -fno-warn-orphans #-}
module Network.BitTorrent.DHT.TokenSpec (spec) where
import Control.Applicative
import Data.String
import Test.Hspec
import Test.QuickCheck
import Network.BitTorrent.DHT.Token
instance Arbitrary Token where
arbitrary = fromString <$> arbitrary
spec :: Spec
spec = return ()
|
