I am using the following function from the Plutus pioneer program:
stakeReferenceLedgerToPlutus :: Ledger.StakeReference StandardCrypto -> Maybe Plutus.StakingCredential stakeReferenceLedgerToPlutus (StakeRefPtr (Ptr (SlotNo x) y z)) = Just $ StakingPtr (fromIntegral x) (fromIntegral y) (fromIntegral z)
But the latest release of Plutus-apps seems to require a change, because
fromIntegral y does not work anymore. See error below:
error: • No instance for (Integral Cardano.Ledger.BaseTypes.TxIx) arising from a use of ‘fromIntegral’ • In the second argument of ‘StakingPtr’, namely ‘(fromIntegral y)’
The same is true for
fromIntegral z but for
Any help is appreciated.