Skip to content

Commit c4e3ab6

Browse files
carlostomelehins
authored andcommitted
Satisfy fourmolu
1 parent d794e66 commit c4e3ab6

File tree

1 file changed

+7
-5
lines changed
  • libs/cardano-ledger-conformance/src/Test/Cardano/Ledger/Conformance/SpecTranslate/Conway

1 file changed

+7
-5
lines changed

libs/cardano-ledger-conformance/src/Test/Cardano/Ledger/Conformance/SpecTranslate/Conway/Base.hs

Lines changed: 7 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -600,11 +600,13 @@ instance SpecTranslate ctx RewardAccount where
600600
instance SpecTranslate ctx PoolParams where
601601
type SpecRep PoolParams = Agda.PoolParams
602602

603-
toSpecRep PoolParams {..} = Agda.PoolParams <$> toSpecRep ppOwners
604-
<*> toSpecRep ppCost
605-
<*> toSpecRep ppMargin
606-
<*> toSpecRep ppPledge
607-
<*> toSpecRep (KeyHashObj ppId)
603+
toSpecRep PoolParams {..} =
604+
Agda.PoolParams
605+
<$> toSpecRep ppOwners
606+
<*> toSpecRep ppCost
607+
<*> toSpecRep ppMargin
608+
<*> toSpecRep ppPledge
609+
<*> toSpecRep (KeyHashObj ppId)
608610

609611
instance SpecTranslate ctx DRep where
610612
type SpecRep DRep = Agda.VDeleg

0 commit comments

Comments
 (0)