waalge/aiken
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

chore: acceptance tests v3 syntax

Browse Source
This commit is contained in:
rvcas
2024-08-26 15:56:49 -04:00
parent b57f840cad
commit ff25fbd970
10 changed files with 21 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
examples/acceptance_tests/036/validators/spend.ak
View File

@@ -12,15 +12,15 @@ pub fn has_policy_id(self: Output, policy_id: PolicyId) -> Bool {
|> not
}
validator {
fn spend(_datum: Data, _redeemer: Data, ctx: ScriptContext) -> Bool {
validator foo {
spend(_datum: Data, _redeemer: Data, o_ref: Data, tx: Transaction) -> Bool {
ctx.transaction.outputs
|> list.any(has_policy_id(_, my_policy_id))
}
}
validator(output_reference: OutputReference) {
fn mint(_redeemer: Void, ctx: ScriptContext) -> Bool {
validator bar(output_reference: OutputReference) {
mint(_redeemer: Void, _policy_id: Data, tx: Transaction) -> Bool {
when
list.find(
ctx.transaction.inputs,