{-# OPTIONS_GHC -fno-warn-orphans #-}

module Hydra.Cardano.Api.Address where

import Hydra.Cardano.Api.Prelude

import Test.Gen.Cardano.Api.Typed (genAddressByron)
import Test.QuickCheck.Hedgehog (hedgehog)

-- * Orphans

instance Arbitrary (Address ByronAddr) where
  arbitrary :: Gen (Address ByronAddr)
arbitrary = Gen (Address ByronAddr) -> Gen (Address ByronAddr)
forall a. Gen a -> Gen a
hedgehog Gen (Address ByronAddr)
genAddressByron