Remove unused function matchFanout

cardano-scaling · Dec 8, 2024 · 7a0f8be · 7a0f8be
1 parent 540191e
commit 7a0f8be
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/hydra-node/test/Hydra/BehaviorSpec.hs b/hydra-node/test/Hydra/BehaviorSpec.hs
@@ -1183,11 +1183,6 @@ openHead chain n1 n2 = do
   waitUntil [n1, n2] $ Committed testHeadId bob (utxoRef 2)
   waitUntil [n1, n2] $ HeadIsOpen{headId = testHeadId, utxo = utxoRefs [1, 2]}
 
-matchFanout :: PostChainTx tx -> Bool
-matchFanout = \case
-  FanoutTx{} -> True
-  _ -> False
-
 assertHeadIsClosed :: (HasCallStack, MonadThrow m) => ServerOutput tx -> m ()
 assertHeadIsClosed = \case
   HeadIsClosed{} -> pure ()