diff --git a/src/AuctionMintingPolicy.hs b/src/AuctionMintingPolicy.hs index 388f63e..d19bfc0 100644 --- a/src/AuctionMintingPolicy.hs +++ b/src/AuctionMintingPolicy.hs @@ -17,11 +17,11 @@ {-# OPTIONS_GHC -fno-strictness #-} {-# OPTIONS_GHC -fno-unbox-small-strict-fields #-} {-# OPTIONS_GHC -fno-unbox-strict-fields #-} -{-# OPTIONS_GHC -fplugin-opt PlutusTx.Plugin:target-version=1.0.0 #-} +{-# OPTIONS_GHC -fplugin-opt PlutusTx.Plugin:target-version=1.1.0 #-} module AuctionMintingPolicy where -import PlutusCore.Version (plcVersion100) +import PlutusCore.Version (plcVersion110) import PlutusLedgerApi.V1.Value (flattenValue) import PlutusLedgerApi.V2 (PubKeyHash, ScriptContext (..), TxInfo (..)) import PlutusLedgerApi.V2.Contexts (ownCurrencySymbol, txSignedBy) @@ -66,4 +66,4 @@ auctionMintingPolicyScript :: CompiledCode (BuiltinData -> BuiltinData -> PlutusTx.BuiltinUnit) auctionMintingPolicyScript pkh = $$(PlutusTx.compile [||auctionUntypedMintingPolicy||]) - `PlutusTx.unsafeApplyCode` PlutusTx.liftCode plcVersion100 pkh + `PlutusTx.unsafeApplyCode` PlutusTx.liftCode plcVersion110 pkh diff --git a/src/AuctionValidator.hs b/src/AuctionValidator.hs index 3cf2087..577bf66 100644 --- a/src/AuctionValidator.hs +++ b/src/AuctionValidator.hs @@ -22,13 +22,13 @@ {-# OPTIONS_GHC -fno-strictness #-} {-# OPTIONS_GHC -fno-unbox-small-strict-fields #-} {-# OPTIONS_GHC -fno-unbox-strict-fields #-} -{-# OPTIONS_GHC -fplugin-opt PlutusTx.Plugin:target-version=1.0.0 #-} +{-# OPTIONS_GHC -fplugin-opt PlutusTx.Plugin:target-version=1.1.0 #-} module AuctionValidator where import GHC.Generics (Generic) -import PlutusCore.Version (plcVersion100) +import PlutusCore.Version (plcVersion110) import PlutusLedgerApi.V1 (Lovelace, POSIXTime, PubKeyHash) import PlutusLedgerApi.V1.Address (toPubKeyHash) import PlutusLedgerApi.V1.Interval (contains) @@ -263,7 +263,7 @@ auctionValidatorScript :: CompiledCode (BuiltinData -> BuiltinData -> BuiltinData -> PlutusTx.BuiltinUnit) auctionValidatorScript params = $$(PlutusTx.compile [||auctionUntypedValidator||]) - `PlutusTx.unsafeApplyCode` PlutusTx.liftCode plcVersion100 params + `PlutusTx.unsafeApplyCode` PlutusTx.liftCode plcVersion110 params -- BLOCK9 -- AuctionValidator.hs