hans-3.0.2: tests/Tests/Network.hs

module Tests.Network where

import Hans.Network.Types

import Test.QuickCheck (Gen,arbitraryBoundedRandom)


arbitraryProtocol :: Gen NetworkProtocol
arbitraryProtocol  = arbitraryBoundedRandom