Add a note about constructing the HeadParameters from the InitTx

input-output-hk · Jun 8, 2021 · dbf3d56 · dbf3d56
1 parent d912a80
commit dbf3d56
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/hydra-node/src/Hydra/HeadLogic.hs b/hydra-node/src/Hydra/HeadLogic.hs
@@ -168,6 +168,8 @@ update Environment{party} ledger (HeadState p st) ev = case (st, ev) of
   (InitState, ClientEvent (Init parties)) ->
     newState p InitState [OnChainEffect (InitTx $ makeAllTokens parties)]
   (InitState, OnChainEvent (InitTx tokens)) ->
+    -- NOTE(SN): Eventually we won't be able to construct 'HeadParameters' from
+    -- the 'InitTx'
     let parties = Set.map thisToken tokens
      in newState (p{parties}) (CollectingState tokens mempty) [ClientEffect ReadyToCommit]
   --