{-# OPTIONS_GHC -Wno-orphans #-}

module Test.Cardano.Ledger.Api.Arbitrary () where

import Cardano.Ledger.Api.State.Query (MemberStatus)
import Test.Cardano.Ledger.Common

instance Arbitrary MemberStatus where
  arbitrary :: Gen MemberStatus
arbitrary = forall a. (Bounded a, Enum a) => Gen a
arbitraryBoundedEnum