diff --git a/onchain/src/TrustlessSidechain/Types.hs b/onchain/src/TrustlessSidechain/Types.hs index f03c988a..1abc628f 100644 --- a/onchain/src/TrustlessSidechain/Types.hs +++ b/onchain/src/TrustlessSidechain/Types.hs @@ -870,22 +870,22 @@ instance UnsafeFromData PermissionedCandidatesValidatorRedeemer where -- | 'InitTokenRedeemer' signals whether the init tokens should be minted -- (possible only in transaction that initializes the sidechain) or burned. data InitTokenRedeemer - = -- | @since Unreleased + = -- | @since v6.0.0 MintInitToken - | -- | @since Unreleased + | -- | @since v6.0.0 BurnInitToken deriving stock ( TSPrelude.Eq , TSPrelude.Show ) --- | @since Unreleased +-- | @since v6.0.0 instance ToData InitTokenRedeemer where {-# INLINEABLE toBuiltinData #-} toBuiltinData MintInitToken = BuiltinData $ PlutusTx.I 0 toBuiltinData BurnInitToken = BuiltinData $ PlutusTx.I 1 --- | @since Unreleased +-- | @since v6.0.0 instance FromData InitTokenRedeemer where {-# INLINEABLE fromBuiltinData #-} fromBuiltinData x = do @@ -895,7 +895,7 @@ instance FromData InitTokenRedeemer where 1 -> Just BurnInitToken _ -> Nothing --- | @since Unreleased +-- | @since v6.0.0 instance UnsafeFromData InitTokenRedeemer where {-# INLINEABLE unsafeFromBuiltinData #-} unsafeFromBuiltinData x = @@ -920,18 +920,18 @@ data InitTokenAssetClass = InitTokenAssetClass PlutusTx.makeLift ''InitTokenAssetClass makeHasField ''InitTokenAssetClass --- | @since Unreleased +-- | @since v6.0.0 instance ToData InitTokenAssetClass where {-# INLINEABLE toBuiltinData #-} toBuiltinData (InitTokenAssetClass {..}) = productToData2 initTokenCurrencySymbol initTokenName --- | @since Unreleased +-- | @since v6.0.0 instance FromData InitTokenAssetClass where {-# INLINEABLE fromBuiltinData #-} fromBuiltinData = productFromData2 InitTokenAssetClass --- | @since Unreleased +-- | @since v6.0.0 instance UnsafeFromData InitTokenAssetClass where {-# INLINEABLE unsafeFromBuiltinData #-} unsafeFromBuiltinData = productUnsafeFromData2 InitTokenAssetClass diff --git a/onchain/src/TrustlessSidechain/Versioning.hs b/onchain/src/TrustlessSidechain/Versioning.hs index e568b474..bbb8286b 100644 --- a/onchain/src/TrustlessSidechain/Versioning.hs +++ b/onchain/src/TrustlessSidechain/Versioning.hs @@ -201,31 +201,31 @@ instance Eq VersionOracle where -- 'VersionOracleValidator' script. data VersionOracleDatum = VersionOracleDatum { -- | VersionOracle which identifies the script. - -- @since Unreleased + -- @since v6.0.0 versionOracle :: VersionOracle , -- | Currency Symbol of the VersioningOraclePolicy tokens. - -- @since Unreleased + -- @since v6.0.0 currencySymbol :: CurrencySymbol } deriving stock (TSPrelude.Show, TSPrelude.Eq) --- | @since Unreleased +-- | @since v6.0.0 instance ToData VersionOracleDatum where {-# INLINEABLE toBuiltinData #-} toBuiltinData (VersionOracleDatum {..}) = productToData2 versionOracle currencySymbol --- | @since Unreleased +-- | @since v6.0.0 instance FromData VersionOracleDatum where {-# INLINEABLE fromBuiltinData #-} fromBuiltinData = productFromData2 VersionOracleDatum --- | @since Unreleased +-- | @since v6.0.0 instance UnsafeFromData VersionOracleDatum where {-# INLINEABLE unsafeFromBuiltinData #-} unsafeFromBuiltinData = productUnsafeFromData2 VersionOracleDatum --- | @since Unreleased +-- | @since v6.0.0 instance Eq VersionOracleDatum where VersionOracleDatum vO c == VersionOracleDatum vO' c' = vO == vO' && c == c' @@ -268,7 +268,7 @@ versionOracleTokenName = TokenName "Version oracle" data VersionOraclePolicyRedeemer = -- | Mint versioning tokens from init tokens. Used during sidechain -- initialization. - -- @since Unreleased + -- @since v6.0.0 InitializeVersionOracle VersionOracle ScriptHash | -- | Mint a new versioning token ensuring it contains correct datum and -- reference script.