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

parameterize scripts over AgoraScripts

Browse source
This commit is contained in:
Hongrui Fang 2022-08-10 17:37:59 +08:00
parent 33e4ed037e
commit 3d9c447783
15 changed files with 423 additions and 572 deletions
Download patch file Download diff file Expand all files Collapse all files

2
agora/Agora/Effect.hs
View file

@ -23,7 +23,7 @@ import PlutusLedgerApi.V1.Value (CurrencySymbol)
-}
makeEffect ::
forall (datum :: PType).
(PTryFrom PData datum) =>
(PTryFrom PData datum, PIsData datum) =>
CurrencySymbol ->
(forall (s :: S). Term s PCurrencySymbol -> Term s datum -> Term s PTxOutRef -> Term s (PAsData PTxInfo) -> Term s POpaque) ->
ClosedTerm PValidator