module Test.Cleveland
( Alias
, ContractAlias
, ImplicitAlias
, KindedAddress
, ContractAddress
, ImplicitAddress
, AddressWithAlias (..)
, ImplicitAddressWithAlias
, ContractAddressWithAlias
, ContractHandle (..)
, TransferData (..)
, TypedContract (..)
, Scenario
, PureM
, ClientM
, TransferFailure
, testScenario
, testScenarioOnNetwork
, scenarioNetwork
, MonadScenario(..)
, getMorleyClientEnv
, getOnlyRpcEnv
, testScenarioOnEmulator
, scenarioEmulated
, withInitialNow
, withInitialLevel
, withMinBlockTime
, withChainId
, collectLogs
, logsForAddress
, MonadCleveland
, MonadOps
, MonadEmulated
, ClevelandT
, EmulatedT
, withSender
, withMoneybag
, runIO
, resolveAddress
, refillable
, refillables
, newAddress
, newAddresses
, newFreshAddress
, importSecretKey
, enumAliases
, signBytes
, signBinary
, originate
, Large (..)
, transfer
, transferTicket
, unsafeTransferTicket
, WithContractEvents (..)
, ContractEvent (..)
, calling
, Default(def)
, unsafeCalling
, importUntypedContract
, importContract
, noViews
, comment
, getBalance
, getDelegate
, registerDelegate
, setDelegate
, getMorleyLogs
, getMorleyLogs_
, getStorage
, getFullStorage
, getSomeStorage
, getAllBigMapValues
, getAllBigMapValuesMaybe
, getBigMapSize
, getBigMapSizeMaybe
, getBigMapValueMaybe
, getBigMapValue
, getPublicKey
, getChainId
, advanceTime
, advanceLevel
, advanceToLevel
, getNow
, getLevel
, getApproximateBlockInterval
, getMinBlockTime
, RunCode(..)
, runCode
, branchout
, offshoot
, setVotingPowers
, whenEmulation
, whenNetwork
, ifEmulation
, inBatch
, getTicketBalance
, getAllTicketBalances
, SomeTicket(..)
, ToAddress(..)
, ToL1Address(..)
, ToL1TAddress(..)
, ToContractAddress(..)
, ToImplicitAddress(..)
, EntrypointRef (..)
, VotingPowers
, Mutez
, tz
, mkVotingPowers
, mkVotingPowersFromMap
, failure
, assert
, (@==)
, (@/=)
, (@@==)
, (@@/=)
, checkCompares
, checkComparesWith
, evalJust
, evalRight
, Showing(..)
, callView
, unsafeCallView
, attempt
, catchTransferFailure
, checkTransferFailure
, expectTransferFailure
, expectFailedWith
, expectError
, expectCustomError
, expectCustomError_
, expectCustomErrorNoArg
, expectCustomErrorAnyArg
, expectNumericError
, clarifyErrors
, TransferFailurePredicate
, shiftOverflow
, emptyTransaction
, badParameter
, gasExhaustion
, failedWith
, addressIs
, constant
, lerror
, customError
, customError_
, customErrorNoArg
, numericError
, auto
, pattern DefEpName
, ep
, (?-)
, (:!)
, NamedF (..)
, testScenarioProps
, TezosClientEnv(..)
, MorleyClientEnv(..)
, NetworkEnv (..)
, MorleyLogs
, mkMorleyOnlyRpcEnvNetwork
, AsRPC.HasRPCRepr(AsRPC)
, AsRPC.deriveRPC
, mapEach
, forEach
) where
import Data.Default (Default(def))
import Lorentz (EntrypointRef(..), Mutez, noViews, pattern DefEpName, tz)
import Morley.AsRPC qualified as AsRPC
import Morley.Client (MorleyClientEnv(..))
import Morley.Client.TezosClient.Types (TezosClientEnv(..))
import Morley.Client.Types
(AddressWithAlias(..), ContractAddressWithAlias, ImplicitAddressWithAlias)
import Morley.Michelson.Interpret (MorleyLogs)
import Morley.Michelson.Runtime (VotingPowers, mkVotingPowers, mkVotingPowersFromMap)
import Morley.Tezos.Address
import Morley.Tezos.Address.Alias
import Morley.Util.Named
import Test.Cleveland.Instances ()
import Test.Cleveland.Internal.Abstract
import Test.Cleveland.Internal.Actions
import Test.Cleveland.Internal.Client (ClientM, mkMorleyOnlyRpcEnvNetwork)
import Test.Cleveland.Internal.Hedgehog
import Test.Cleveland.Internal.Pure (PureM)
import Test.Cleveland.Internal.Scenario
import Test.Cleveland.Lorentz.Types
import Test.Cleveland.Tasty.Internal
import Test.Cleveland.Util