hans-3.0.1: tests/Tests/Network.hs

module Tests.Network where

import Hans.Network.Types

import Test.QuickCheck (Gen,arbitraryBoundedRandom)


arbitraryProtocol :: Gen NetworkProtocol
arbitraryProtocol  = arbitraryBoundedRandom