From 80fc14be351a756f00606c4063bf3f87d579a72e Mon Sep 17 00:00:00 2001
From: Ian Burzynski <23251244+iburzynski@users.noreply.github.com>
Date: Sun, 11 Feb 2024 12:46:44 -0500
Subject: [PATCH] Update samples
---
lib/utils.ak | 10 ++--------
validators/samples/minting.ak | 4 ++--
validators/samples/typed.ak | 1 -
validators/samples/vesting.ak | 8 ++++----
4 files changed, 8 insertions(+), 15 deletions(-)
diff --git a/lib/utils.ak b/lib/utils.ak
index 1d65565..ebf8bf6 100644
--- a/lib/utils.ak
+++ b/lib/utils.ak
@@ -1,6 +1,6 @@
use aiken/hash.{Blake2b_224, Hash}
use aiken/list.{filter}
-use aiken/transaction.{Input, Output, ScriptContext, Spend, find_input} as tx
+use aiken/transaction.{Input, Output, ScriptContext, Spend, find_input}
use aiken/transaction/credential.{VerificationKey}
pub type POSIXTime =
@@ -25,14 +25,8 @@ pub fn find_own_input(ctx: ScriptContext) -> Option {
}
}
-// getContinuingOutputs :: ScriptContext -> [TxOut]
-// getContinuingOutputs ctx | Just TxInInfo{txInInfoResolved=TxOut{txOutAddress}} <- findOwnInput ctx = filter (f txOutAddress) (txInfoOutputs $ scriptContextTxInfo ctx)
-// where
-// f addr TxOut{txOutAddress=otherAddress} = addr == otherAddress
-// getContinuingOutputs _ = traceError "Lf" -- "Can't get any continuing outputs"
-
pub fn get_continuing_outputs(ctx: ScriptContext) -> List