From 3ad1727bc852310abbf81459285f28426c1e73ef Mon Sep 17 00:00:00 2001 From: Sasha Bogicevic Date: Wed, 9 Oct 2024 13:18:48 +0200 Subject: [PATCH] Remove redundant constraint --- hydra-node/src/Hydra/API/ClientInput.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hydra-node/src/Hydra/API/ClientInput.hs b/hydra-node/src/Hydra/API/ClientInput.hs index 4cf4f5385aa..0705afb2618 100644 --- a/hydra-node/src/Hydra/API/ClientInput.hs +++ b/hydra-node/src/Hydra/API/ClientInput.hs @@ -4,7 +4,7 @@ module Hydra.API.ClientInput where import Hydra.Prelude -import Hydra.Tx (IsTx, TxIdType, UTxOType) +import Hydra.Tx (IsTx, TxIdType) data ClientInput tx = Init @@ -23,7 +23,7 @@ deriving stock instance IsTx tx => Show (ClientInput tx) deriving anyclass instance IsTx tx => ToJSON (ClientInput tx) deriving anyclass instance IsTx tx => FromJSON (ClientInput tx) -instance (Arbitrary tx, Arbitrary (UTxOType tx), Arbitrary (TxIdType tx)) => Arbitrary (ClientInput tx) where +instance (Arbitrary tx, Arbitrary (TxIdType tx)) => Arbitrary (ClientInput tx) where arbitrary = genericArbitrary -- NOTE: Somehow, can't use 'genericShrink' here as GHC is complaining about