export alwaysSucceedsPolicy as a standalone builder

This commit is contained in:
Hongrui Fang 2023-01-23 20:16:46 +08:00
parent 563746f1ef
commit c547494c93
3 changed files with 27 additions and 13 deletions

View file

@ -8,13 +8,16 @@
-}
module Main (main) where
import Agora.Bootstrap (alwaysSucceedsPolicyRoledScript)
import Agora.Bootstrap qualified as Bootstrap
import Agora.Linker (linker)
import Data.Aeson qualified as Aeson
import Data.Default (def)
import Plutarch (Config (Config), TracingMode (DoTracingAndBinds))
import ScriptExport.Export (exportMain)
import ScriptExport.Types (
Builders,
insertBuilder,
insertScriptExportWithLinker,
)
@ -31,4 +34,9 @@ builders =
(Config DoTracingAndBinds)
)
linker
, -- Note: To be compatible with current off-chain setup, we are not using
-- static builder here.
insertBuilder
"alwaysSucceedsPolicy"
(const @_ @Aeson.Value alwaysSucceedsPolicyRoledScript)
]