-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | testsuit of protocol-radius haskell package
--   
--   This package provides testsuit of protocol-radius haskell package.
@package protocol-radius-test
@version 0.1.0.0

module Test.Data.Radius.Arbitraries
genPacket :: Arbitrary a => (a -> Put) -> Gen (Packet [a])
instance Test.QuickCheck.Arbitrary.Arbitrary v => Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.NumberAbstract v)
instance Test.QuickCheck.Arbitrary.Arbitrary v => Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute' v)
instance Data.Radius.Attribute.Pair.TypedNumberSets v => Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute v Data.Radius.Scalar.AtText)
instance Data.Radius.Attribute.Pair.TypedNumberSets v => Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute v Data.Radius.Scalar.AtString)
instance Data.Radius.Attribute.Pair.TypedNumberSets v => Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute v Data.Radius.Scalar.AtInteger)

module Test.Data.Radius.ArbitrariesNoVSA
data EmptyVSA
instance GHC.Classes.Eq Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA
instance GHC.Classes.Ord Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA
instance GHC.Show.Show Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA
instance Data.Radius.Attribute.Pair.TypedNumberSets Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.NumberAbstract Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA)
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute' Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA)
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA Data.Radius.Scalar.AtText)
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA Data.Radius.Scalar.AtString)
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Attribute.Pair.Attribute Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA Data.Radius.Scalar.AtInteger)
instance Test.QuickCheck.Arbitrary.Arbitrary (Data.Radius.Packet.Packet [Data.Radius.Attribute.Pair.Attribute' Test.Data.Radius.ArbitrariesNoVSA.EmptyVSA])

module Test.Data.Radius.Iso
tests :: [Test]
isoAttribute' :: Eq a => Get (Attribute' a) -> (a -> ByteString -> Put) -> Attribute' a -> Bool
isoPacket :: Eq a => Get (Attribute' a) -> (a -> ByteString -> Put) -> Packet [Attribute' a] -> Bool
isoAttributeText :: (Ord v, TypedNumberSets v) => Get (Attribute' v) -> (v -> ByteString -> Put) -> Attribute v AtText -> Bool
isoAttributeString :: (Ord v, TypedNumberSets v) => Get (Attribute' v) -> (v -> ByteString -> Put) -> Attribute v AtString -> Bool
isoAttributeInteger :: (Ord v, TypedNumberSets v) => Get (Attribute' v) -> (v -> ByteString -> Put) -> Attribute v AtInteger -> Bool

module Test.Data.Radius.IsoNoVSA
tests :: [Test]