Sulkta-OSS/agora
3
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

restructure agora-scripts modules

Browse source 
In order to allow reusing this code in the future, I've made it so that
Agora-specific code all lives in `Main`, and everything else lives in
`ScriptExport` or other non-Agora modules.
This commit is contained in:
Emily Martins 2022-06-23 19:54:34 +02:00
parent c7869fe701
commit a7ed7989f1
10 changed files with 345 additions and 267 deletions
Download patch file Download diff file Expand all files Collapse all files

9
agora-scripts/Codec/Serialise/Orphans.hs
View file

@ -9,12 +9,10 @@ Orphan instances for Serialising and Hashing Cardano types.
-}
module Codec.Serialise.Orphans () where
import Codec.Serialise (Serialise, serialise)
import Data.Hashable (Hashable (hashWithSalt))
import Codec.Serialise (Serialise)
import Data.Tagged (Tagged (Tagged))
import PlutusLedgerApi.V1 (TxId, TxOutRef)
import PlutusLedgerApi.V1.Value (AssetClass, CurrencySymbol, TokenName)
import Types (ScriptParams)
deriving anyclass instance
Serialise TxOutRef
@ -34,8 +32,3 @@ deriving anyclass instance
deriving newtype instance
Serialise a =>
Serialise (Tagged s a)
deriving anyclass instance Serialise ScriptParams
instance Hashable ScriptParams where
hashWithSalt s scriptParams = hashWithSalt s (serialise scriptParams)