Remove unused function isReqSn

cardano-scaling · Dec 8, 2024 · 664c0ae · 664c0ae
1 parent 3e2db61
commit 664c0ae
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/hydra-node/test/Hydra/NodeSpec.hs b/hydra-node/test/Hydra/NodeSpec.hs
@@ -360,11 +360,6 @@ createPersistenceInMemory = do
       , loadAll = readTVarIO tvar
       }
 
-isReqSn :: Message tx -> Bool
-isReqSn = \case
-  ReqSn{} -> True
-  _ -> False
-
 inputsToOpenHead :: [Input SimpleTx]
 inputsToOpenHead =
   [ observationInput $ OnInitTx testHeadId testHeadSeed headParameters participants