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

Re-format and re-run all acceptance tests.

Browse Source
This commit is contained in:
KtorZ
2024-01-20 10:43:17 +01:00
parent 9ee2d58ba3
commit b50e4ab63a
77 changed files with 449 additions and 830 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
examples/acceptance_tests/071/validators/spend.ak
View File

@@ -69,13 +69,10 @@ pub fn validate_pool_deposit(
datum: PoolDatum,
redeemer: PoolDepositRedeemer,
) -> Bool {
let validator_address =
scripthash_address(#"ff")
let validator_address = scripthash_address(#"ff")
expect Some(pool_output) =
get_output(ctx, validator_address)
expect Some(pool_input) =
get_input(ctx, validator_address)
expect Some(pool_output) = get_output(ctx, validator_address)
expect Some(pool_input) = get_input(ctx, validator_address)
True
}
@@ -86,34 +83,28 @@ pub fn validate_pool_borrow(
datum: PoolDatum,
redeemer: PoolBorrowRedeemer,
) -> Bool {
let validator_address =
scripthash_address(#"ff")
let validator_address = scripthash_address(#"ff")
expect Some(pool_output) =
get_output(ctx, validator_address)
expect Some(pool_input) =
get_input(ctx, validator_address)
expect Some(pool_output) = get_output(ctx, validator_address)
expect Some(pool_input) = get_input(ctx, validator_address)
True
}
validator {
fn pool_contract(datum: PoolDatum, redeemer: PoolRedeemer, ctx: ScriptContext) {
when redeemer.action is {
PoolWithdraw(_) ->
True
PoolWithdraw(_) -> True
PoolDeposit(pool_deposit_redeemer) ->
when ctx.purpose is {
Spend(output_ref) ->
validate_pool_deposit(ctx, output_ref, datum, pool_deposit_redeemer)
_ ->
False
_ -> False
}
PoolBorrow(pool_borrow_redeemer) ->
when ctx.purpose is {
Spend(output_ref) ->
validate_pool_borrow(ctx, output_ref, datum, pool_borrow_redeemer)
_ ->
False
_ -> False
}
}
}