Add new acceptance test scenario 048
This commit is contained in:
5
examples/acceptance_tests/048/aiken.lock
Normal file
5
examples/acceptance_tests/048/aiken.lock
Normal file
@@ -0,0 +1,5 @@
|
||||
# This file was generated by Aiken
|
||||
# You typically do not need to edit this file
|
||||
|
||||
requirements = []
|
||||
packages = []
|
||||
3
examples/acceptance_tests/048/aiken.toml
Normal file
3
examples/acceptance_tests/048/aiken.toml
Normal file
@@ -0,0 +1,3 @@
|
||||
name = 'aiken-lang/acceptance_test_048'
|
||||
version = '0.0.0'
|
||||
description = ''
|
||||
@@ -0,0 +1 @@
|
||||
addr1w9z47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdcd0futm
|
||||
@@ -0,0 +1,5 @@
|
||||
{
|
||||
"type": "PlutusScriptV2",
|
||||
"description": "Generated by Aiken",
|
||||
"cborHex": "4e4d01000022253335734944526161"
|
||||
}
|
||||
@@ -0,0 +1 @@
|
||||
4d01000022253335734944526161
|
||||
@@ -0,0 +1 @@
|
||||
addr_test1wpz47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdck8aqy7
|
||||
33
examples/acceptance_tests/048/lib/tests.ak
Normal file
33
examples/acceptance_tests/048/lib/tests.ak
Normal file
@@ -0,0 +1,33 @@
|
||||
test foo_1() {
|
||||
let a = False
|
||||
when a is {
|
||||
a if a -> False
|
||||
_ -> True
|
||||
}
|
||||
}
|
||||
|
||||
test foo_2() {
|
||||
let point = (14, 42)
|
||||
when point is {
|
||||
(x, _) if x > 100 -> False
|
||||
(x, _) if x > 10 -> True
|
||||
_ -> False
|
||||
}
|
||||
}
|
||||
|
||||
test foo_3() {
|
||||
let point = (14, 42)
|
||||
when point is {
|
||||
(x, y) if x == 14 && y <= 100 -> True
|
||||
_ -> False
|
||||
}
|
||||
}
|
||||
|
||||
test foo_4() {
|
||||
let a = False
|
||||
let point = (14, 42)
|
||||
when point is {
|
||||
(x, y) if !a -> x + y == 56
|
||||
_ -> False
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user